Question

Осуществить ввод целых чисел (ввод осуществляется до тех пор,пока не будет введён 0) и подсчитать их сумму и среднее арифметическое введённых положительных чисел. Использовать оператор repeat.

Answer 1

program z8_1;
uses crt;
var
i:shortint;
k,n:byte;
s:integer;
sa:real;
begin
clrscr; i:=1;
repeat
read(i);
if i>0 then begin
k:=k+1;
s:=s+i;
end;
until i=0;
sa:=s/k;
write('Количество чисел:',k,' Сумма чисел:',s,'Среднее арифметическое:',sa:4:2);
readkey
end.

Answer 2

Конечно, вот пример кода на языке программирования Python, который осуществляет ввод целых чисел до тех пор, пока не будет введен 0, после чего подсчитывает сумму и среднее арифметическое введенных положительных чисел, используя оператор `repeat`:

# Инициализация переменных
sum_positive = 0  # Сумма положительных чисел
count_positive = 0  # Количество положительных чисел

# Цикл ввода чисел с использованием оператора repeat
while True:
    try:
        number = int(input("Введите целое число (для завершения введите 0): "))
        
        if number == 0:
            break  # Выход из цикла при вводе 0
        
        if number > 0:
            sum_positive += number
            count_positive += 1
    except ValueError:
        print("Ошибка! Введите целое число.")

# Проверка на наличие положительных чисел
if count_positive > 0:
    average_positive = sum_positive / count_positive
    print(f"Сумма положительных чисел: {sum_positive}")
    print(f"Среднее арифметическое положительных чисел: {average_positive}")
else:
    print("Не было введено положительных чисел.")

Этот код предлагает пользователю вводить целые числа до тех пор, пока не будет введен 0. Введенные положительные числа суммируются, и затем рассчитывается и выводится сумма и среднее арифметическое этих положительных чисел.