Войти Регистрация Спроси ai-bota

Дано число. найти среднее арифметическое его цифр

Ответ:

nhxjjxjx

02.10.2020 00:37

Var a,s:integer;
begin
readln(a);
s:=0;
While a>9 do
begin
s:=a mod 10;
a:=a div 10;
end;
s:=s+a;
writeln(s);
end.

0,0(0 оценок)

Популярные вопросы: Информатика

alena250880

14.05.2021 17:21

Какие команды нужно выполнить для того, чтобы увеличить количество инструментов, расположенных в окне?...

dolgikof

03.03.2020 05:20

Заменить отрицательные элементы массива их квадратами и посчитать кол-во замен...

Ксюшка1521

10.01.2021 18:33

Вычислить сумму чисел x и y, при x=1d(16),y=61(8). результат представьте в двоичной системе счисления....

hophip2

03.07.2021 07:06

Посчитайте, сколько примерно байт содержит одна страница вашего учебника. выразить полученные числа в килобайтах...

nikzarubenko

20.12.2020 10:38

Перевести числа из десятичной системы счисления в двоичную 276...

Fredbreyn

07.05.2020 20:05

Вычислите значение выражения 10101 +10011 2 2 ответ запишите в двоичной системе счисления....

Одиннадцатиклассниц9

09.02.2020 21:24

Выполните на компьютере все программы в данном параграфе...

darkishlord

09.02.2020 21:24

Всем . пытался перейти с 10винды на 7с команд. перезапускаю вылазит ,,anoperation system wasn t found. try disconnecting any drivers that don t contain an operation system....

anastasiyanast29

16.04.2020 10:19

Придаточные нуливого типа НУЖЕН ОТВЕТ...

Женечка5551

30.07.2020 18:05

Округлить число до указанного разряда: а) до единиц: 43,26; г) до Тысячных: 9,02356;б) до десятых: 0,2734; д) до высшего разряда: 643,6753.в) до сотых: 24,9785;...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку