Question

Написать две программы в Pacsal


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


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


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

Answer 1

Решение задач прекрепил ниже.

56e217c4c47e54caf171392bea602fd5.txt

35592ac9b8c4c8b1e035694338b4ad00.txt