РЕШИТЕ ДЛЯ 8 КЛАССА БЕЗ ЗАУМНЫХ ВЕЩЕЙ ПРИ ПОМОЩИ ИФ,ВАЙЛ и

РЕШИТЕ ДЛЯ 8 КЛАССА БЕЗ ЗАУМНЫХ ВЕЩЕЙ ПРИ Поддержки ИФ,ВАЙЛ и тд в ПАСКАЛЕ АБЦ.
Напишите программку, которая в последовательности натуральных чисел определяет сумму всех чисел, кратных 7 и оканчивающихся на 3. Программа получает на вход натуральные числа, количество введённых чисел безызвестно, последовательность чисел заканчивается числом 0 (0 присимвол окончания ввода, не входит в последовательность). Количество чисел не превышает 100. Введённые числа не превышают 300. Программа должна вывести одно число: сумму всех чисел, кратных 7 и оканчивающихся на 3.
Входные данные:73,13,14,133,63,0.
Выходные данные:196