Прошу помощи с 3 задачками. Они весьма легкие, но сейчас уже не имею не возможности,

Прошу помощи с 3 задачками. Они весьма легкие, но сейчас уже не имею не возможности,не сил их выполнять, ибо комп вообще весьма далеко. Буду благодарен за решения! Программа в Pascale 1. Дано N целых чисел. Найти среднее арифметическое. 2. Вывести первых N целых чисел кратных 7. 3. Вводится последовательность чисел пока не введен 0. Найти количество четных чисел в наборе.