Question

Написать произвольную рекурсивную программу для pascal ABC использующую repeat и/или else и вычисляющую... что-нибудь, главное чтоб была примерно на ~15 строк (можно и больше и меньше),чтоб работала и короткое объяснение её работы

Answer 1

Ответ:

прога с комментариями на фото

Объяснение:

вводим последовательность цифр через ентер, концом последовательности значит цифра 0, считаем среднее арифметическое четных цифр, если не было введено ни одного четного, выводим, нет четных