Написать программу которая задает массив случайным образом и ищет минимальный элемент

Question

Информатика

Гаря

19 июня, 22:58

Написать программу которая задает массив случайным образом и ищет минимальный элемент

+3

Ответы (1)

Знаете ответ на вопрос?

Олимпиада · Answer 1

Const n=10;

var a:array[1 ... n] of integer;

min, i:integer;

begin

Randomize;

for i:=1 to n do begin

a[i]:=random (51) ;

write (a[i],' ') ;

end;

writeln;

min:=a[1];

for i:=2 to n do

if a[i]
writeln ('min = ', min) ;

end.

Пример:

26 23 27 25 35 8 40 17 43 23

min = 8