Question

Программисты ! Выручайте !!Паскаль!!

Разработать программу ввода данных. Количество элементов заранее неизвестно.
Вводится последовательность двухзначных чисел (ввод прекратить, когда будет введено не двухзначное число). Вывести среднее арифметическое последовательности.

Answer 1

begin

 ReadSeqIntegerWhile(p -> Abs(p).InRange(10,99)).Average.Println

end.