Ответы на вопрос:
Program zadacha; var n, x, i, max: integer; begin max: =0; writeln ('введите количество чисел'); readln (n); for i: =1 to n do begin readln (x); if (x mod 4=0) and (x> max) then max: =x; end; writeln (max) end.
Популярно: Информатика
-
ClarisVerbis08.06.2022 19:52
-
Ludo4ka12301.03.2023 01:34
-
encl326.09.2021 04:20
-
princess8205.02.2021 19:04
-
lanaruden03.06.2021 11:04
-
kilmetovalmas1429.11.2020 06:38
-
jono102.04.2021 10:21
-
кис8814.05.2020 17:10
-
Пианино55513.10.2021 03:25
-
Kolosov7725.06.2020 19:46