quantity = 0
amount = 0
n = int(input("Введите число: "))
while (n != 0):
if ((n > 9 and n < 100) and (n % 7 == 0)):
quantity += 1
amount += n
n = int(input())
print(quantity, amount)
arithmetic_mean = amount / quantity
print("Среднее арифметическое двузначных чисел, которые делятся на 7 = ", arithmetic_mean)
Объяснение:
quantity = 0 // Переменная, хранящая количество чисел, подходящих под условие "Двузначные числа, которые делятся на 7"
amount = 0 // Переменная, хранящая сумму чисел, подходящих под условие "Двузначные числа, которые делятся на 7"
n = int(input("Введите число: ")) // Ввод первого целочисленного значения n
while (n != 0): // Пока переменная n ≠ 0
if ((n > 9 and n < 100) and (n % 7 == 0)): // Если 9 < n < 100 И остаток от деления n на 7 = 0
quantity += 1 // Прибавляем 1 к переменной, хранящей количество чисел
amount += n // Прибавляем само число к переменной, хранящей сумму чисел
n = int(input()) // Снова вводим целочисленное значение n
arithmetic_mean = amount / quantity // Вычисление среднего арифметического
print("Среднее арифметическое двузначных чисел, которые делятся на 7 = ", arithmetic_mean) // Вывод ответа
program okr;
var
n,i :integer;
s,l,r,c : real;
begin
s:= 0;
write('Введите количество окружностей:');
readln(n);
for i := 1 to n do
begin
write('Введите радиус окружности №',i);
readln(r);
c:= pi * 2 * r;
s:= s + c;
writeln('Длина этой окружности:',c:0:2);
end;
writeln('Итоговая длина всех окружностей:',s:0:2);
end.