На языке программирования Pascal составить программу, которая находит среднее арифметическое чисел, введенных с клавиатуры. Концом ввода чисел считать ввод 0. (числа 22 и 66)
// PascalABC.NET 3.4
begin
ReadSeqIntegerWhile(n->n<>0).Average.Println
end.