Напишите программу, которая в последовательности натуральных чисел определяет максимальное число, кратное 5. программа получает на вход количество чисел в последовательности, а затем сами числа. в последовательности всегда имеется число, кратное 5. количество чисел не превышает 1000. введённые числа не превышают 30 000. программа должна вывести одно число – максимальное число, кратное 5». в программе кумир
n - количество чисел
i - цикловая переменная
a - натуральное число,
кратное 5
Язык програмирования:
Паскаль
var
n,i,a,max: integer;
begin
readIn(n);
max := -1;
for i := 1 to n do
begin
readIn(a);
If (a mod 5 = 0) and (a > max)
then
max := a;
end;
writeIn(max)
end.
Программа на Кумире прилагается.