Задан массив А (15), заполненный датчиком случайных чисел из интервала [-20,20]. Найти и вывести на печать минимальный элемент

Question

Информатика

Сашуля

8 февраля, 01:21

Задан массив А (15), заполненный датчиком случайных чисел из интервала [-20,20]. Найти и вывести на печать минимальный элемент

+3

Ответы (1)

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

Ермолай · Answer 1

Program n1;

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

min, i: integer;

begin

randomize;

a[1]:=random (41) - 20;

min:=a[1];

for i:=2 to 15 do

begin

a[i]:=random (41) - 20;

if a[i]
end;

write (min) ;

end.