Задание
Из представленных действий составьте программу, которая получает на вход количество чисел в последовательности, а затем сами числа. В последовательности натуральных чисел определить максимальное число, кратное 4. В последовательности всегда имеется число, кратное 4. Количество чисел не превышает 1000. Введённые числа не превышают 30 000. Программа должна вывести одно число — максимальное число, кратное 4.
- var n, a, k, g: integer;
- begin
- g:=0; readln\(n\);
- for k:=1 to n do
- begin
- readln\(a\);
- if \(a mod 4 = 0\) and \(a\\gt g\) then
- g:=a;
- end;
- writeln\(g\);
- end.