Question

Помогите с информатикой. Даю 50 баллов.
Напишите программу которая в последовательности натуральных чисел определяет среднее арифметическое чисел последовательности, оканчивающихся на 3 или на 7. Программа получает на вход количество чисел в последовательности, а затем сами числа. В последовательности всегда число оканчивающееся на 3 или на 7. Количество чисел не превышает 1000. Введенные числа не превышают 30000. Программа должна вывести одно число - среднее арифметическое чисел последовательности, оканчивающихся на 3 или на 7. Ответ можно вывести с любым числом знаков после десятичной точки.

Answer 1

begin

 var n := ReadInteger;

 ReadSeqInteger(n).Where(p -> (p mod 10 = 3) or

          (p mod 10 = 7)).Average.Print

end.

Это на паскаль ABC.NET