Question

ДАЮ +20 БАЛЛОВ ТОМУ КТО РЕШИТ
Напишите программу, которая в последовательности натуральных чисел определяет среднее арифметическое значение двухзначных чисел, кратных 5. Программа получает на вход количество чисел в последовательности, а затем сами числа. В последовательности всегда имеется число, кратное 5. Количество чисел не превышает 100. Введённые числа не превышают 300. Программа должна вывести одно число

Answer 1

===== PascalABC.NET ====

begin

 ReadSeqInteger(ReadInteger)

     .Where(p -> p.InRange(10,99) and (p mod 5 =0))

     .Average

     .Println

end.