Напишите программу, которая в последовательности натуральных чисел определяет наименьшее число, оканчивающееся на 5 или 9. Программа получает на вход натуральные числа, количество введенных чисел неизвестно, последовательность чисел заканчивается числом 0. Количество чисел не превышает 1000. Введённые числа не превышают 30000.
Если желаемым языком являлся паскаль,
var a, min : integer;
BEGIN
min := 30000; read(a);
while not(a = 0) do begin
if (a mod 10 = 5) or (a mod 10 = 9) then
if a < min then min := a;
read(a);
end;
write(min);
END.