Есть ответ 👍

Попомгите записать 5 пример на языке паскаль

265
356
Посмотреть ответы 1

Ответы на вопрос:


Var m : array[1..50] of integer;   i,max : integer; begin   max: =0;   for i: =1 to 50 do   begin     m[i]: =random(100);     if m[i]> max then max: =m[i];   end;   writeln(max); end.

Популярно: Информатика