Ответы на вопрос:
Var a : array[1..12] of integer; i,max : integer; begin for i: =1 to 12 do begin; read(a[i]); if a[i]> max then max: =a[i]; end; writeln(max); end.
Популярно: Информатика
-
galitskovao27.06.2020 08:11
-
zuzin7723.06.2021 16:58
-
Mahaeva3325.02.2020 17:23
-
kostetXD26.06.2020 19:31
-
Куземченко01.12.2021 18:45
-
sbabean21910.01.2021 10:06
-
MSТигруля11.07.2021 15:39
-
Савелий18725.12.2021 08:10
-
alina13lina8711.06.2022 04:30
-
kiranovm1406.05.2023 21:56