Написать две программы в Pacsal Каждую строчку прокомментировать для чего она в программе Pascal - ЭТО ВАЖНО

1. На вход программы поступает неизвестное количество целых чисел, ввод заканчивается нулём. Найти среднее арифметическое всех двузначных чисел, которые делятся на 7.

2. На вход программы поступает неизвестное количество целых чисел, ввод заканчивается нулём. Найти максимальное из введённых чётных чисел.