Решить задачу: найти наименьший четный элемент. Использовать паскаль

Question

97

Решить задачу: найти наименьший четный элемент. Использовать паскаль

категория: информатика

ответить

в избранное ссылка

genyapr · Accepted Answer

86

genyapr

31 августа 2022

var a: array [1… 100] of integer; i,n,min: integer; Begin randomize; n: =100; for i: =1 to n do begin a[i]: =random (n*10) — 10*n div 2; write (x[i]: 4); if i mod 10=0 then writeln; end; min: =1; for i: =1 to n do begin if x[i] комментировать

в избранное ссылка отблагодарить

Знаете ответ?

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: