Ответы на вопрос:
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.
Популярно: Информатика
-
Саша1281131.12.2022 21:25
-
mashyanova29.03.2021 07:54
-
Rostik999905.03.2021 23:52
-
yulyatigayali11.01.2020 21:20
-
balashova129629.02.2020 19:07
-
kirilnavrotskykiril21.08.2020 08:54
-
lizamrio115.03.2023 07:06
-
marinapizdec20.08.2021 17:51
-
dima102508.11.2021 19:13
-
KavaiiGot26.06.2020 23:15