Антон, давай ещё раз с заданием. Напиши программу в паскале заполнения массива из 15 элементов случайными числами из диапазона [-5,10] и поиска максимального элемента.

korol23 korol23    1   25.12.2020 22:12    1

Ответы
khsush khsush  24.01.2021 22:13

var x:integer;

a:array[0..14] of integer;

begin

 for var i:=0 to 14 do

 begin

   a[i]:=random(16)-5;

   writeln(a[i]);

   if x<a[i] then x:=a[i];

 end;

 writeln;

 writeln('Максимальное число в массиве = ',x);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика