Организовать беспрерывный ввод чисел с клавиатуры, пока пользователь не введёт 0. После ввода нуля, показать на экран количество чисел, которые были введены, их общую сумму и среднее арифметическое. Нужно написать программу, используя цикл с параметром(for i:= A to B do). Помогите пожалуйста!