9класс информатика,решите в форме паскаль

9класс информатика,решите в форме паскаль
Гость
Ответ(ы) на вопрос:
Гость
const n = 27; var a:array[1..n] of integer; i,max:integer; begin   max:=-20;   for i:=1 to 27 do begin     a[i]:=random(41)-20;     if a[i]>max then max:=a[i];     write(a[i]:4);   end;   writeln;   writeln('Максимальное: ',max); end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы