Question

25 баллов.
Язык PascalABC

1. Напишите программу, которая в последовательности натуральных чисел определяет количество четных чисел, некратных 6 (, < >).. Программа получает на вход количество чисел в последовательности, а затем сами числа. Количество чисел не превышает 100. Введённые числа не превышают 300. Избранные числа всегда есть. Программа должна вывести одно число.

2. Напишите программу, которая в последовательности натуральных чисел определяет сумму 3-хзначных чисел, оканчивающихся на 7 и среднее значение суммы таких чисел. Программа получает на вход количество чисел в последовательности, а затем сами числа. Количество чисел не превышает 1000. Введённые числа не превышают 30 000. Программа должна вывести два числа. Если избранных чисел нет, то программа должна вывести «нет».