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