Напишите программу, которая в последовательности натуральных чисел определяет сумму двухзначных чисел, кратных 5. Программа получает на вход натуральные числа,
количество введённых чисел неизвестно, последовательность чисел заканчивается
числом 0 (0 - признак окончания ввода, не входит в последовательность).
Количество чисел
превышает 1000. Введённые числа
не превышают 30000.
Программа должна вывести одно число: сумму двухзначных чисел, кратных 5.
Пример работы программы:
не
Выходные данные
Входные данные
45
22
45
120
0

на пайтоне без типа строка​

тина123болото тина123болото    1   20.04.2021 23:52    5

Ответы
0674167692 0674167692  21.04.2021 01:00

var n,i,a,min: integer;

begin

readln(n);

min:=30001

for i:=1 to n do

begin

readln(a)

if (a mod 10 = 4) and (a < min)

then min:= a;

end;

writeln(min)

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика