найти среднее арифметическое цифр натурального числа n.( использовать частично стандартный алгоритм накопления суммы)
5-9 класс
|
var i,n,sum:integer;
begin
readln(n);
while n>0 do begin
i:=i+1;
sum:=sum+(n mod 10);
n:=n div 10;
end;
writeln(sum/i);
end.
Другие вопросы из категории
a.к компьютеру подключена флэш-память
1. вывод текста на печать
2. выбор рабочих цветов
3. работа с рисунком
Читайте также
изведение всех цифр этого числа а так же колличество больших шестии
исло. Вход: файл input.txt, содержащий только натуральное число n. Ограничения: 1 ≤ n ≤ 1000000. Выход: файл output.txt, содержащий одно натуральное число – n-е по счету сверхнечетное число. Пример: input.txt output.txt 13 35
верно ли,что первая цыфраа данного числа чётная?
3)найти все трёхзначные числа,которые состоят из разных цыфр,а их сумма равна А(А вводится с клавиатуры)
4)найти все симметричные натуральные числа(палиндромаиз промежутка от А до В(А и В вводится с клавиатуры)
вычислил их среднее арифметическое и так обрадовался, что потерял число B. Помогите Васе восстановить потерянное число.
на вход натуральные числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 – признак окончания ввода, не входит в последовательность).
2)Найти среднее арифметическое всех целых чисел от a до 200 (значения a и b вводятся с клавиатуры; a>=200);