Напишите программу, которая в последовательности целых цисел вычисялет сумму всех чисел, кратны 5 или 9. Программа получает на вход целые числа, колличество введеных чисел неизвестно, последовательность чисел заканчивается числом 0 (0 - признак окончания ввода, не входит в последовательность).
Колличество чисел не привышает 20. Введенные числа по модулю не привыщают 1500.
Программа должна вывести одно число: сумму всех чисел, кратных 5 или 9.
Входные данные: -15; 99; 8; 0
Выходные данные: 84
Answers & Comments
Прикрепляю текст программы во вложения.
===PascalABC.NET===