Question

Даны целые положительные числа. Ввод осуществляется до тех пор, пока не будет введён 0. Найти сумму и среднее арифметическое введённых чисел

Answer 1

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

begin

 var s, n, p: integer;

 s := 0;

 n := 0;

 repeat

   Read(p);

   if p = 0 then

     break;

   s += p;

   n += 1

 until False;

 Write('Сумма = ', s, ', ср.арифм = ', s/n)

end.

Answer 2

Для решения данной задачи, можно использовать следующий алгоритм:

1. Инициализировать переменные суммы и счетчика чисел со значением 0.
2. Создать цикл, который будет выполняться до тех пор, пока не будет введено число 0.
3. Внутри цикла считывать целое число с помощью ввода пользователя.
4. Проверить, равно ли введенное число 0. Если да, то выйти из цикла.
5. Если число не равно 0, увеличить счетчик чисел на 1 и добавить введенное число к сумме.
6. После выхода из цикла, вычислить среднее арифметическое, разделив сумму на количество чисел.
7. Вывести полученную сумму и среднее арифметическое.

Вот пример реализации данного алгоритма на языке Python:

pythonCopy code
sum = 0
count = 0

while True:
    number = int(input("Введите число: "))
    if number == 0:
        break
    sum += number
    count += 1

average = sum / count

print("Сумма:", sum)
print("Среднее арифметическое:", average)

Этот код будет запрашивать у пользователя ввод чисел до тех пор, пока не будет введен 0. Затем он вычислит сумму и среднее арифметическое введенных чисел и выведет результаты.