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

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

Нажмите на рекламу ниже и сразу увидите ответ

↓

Популярные вопросы:

kekngh

07.11.2021 23:57

Python мен pygame Тақырыптарының терминдеріне қатысты сөзжұмбақ құрастырындар...

nastasiia1989

24.06.2020 18:57

С какой целью авторы текстов включают в документы ссылки и сноски...

Lizzka1301

09.11.2021 12:09

Назовите два типа внутренней памяти, используемой для хранения компьютерных данных, которые могут быть непосредственно доступны процессору...

polinabaysha

10.08.2020 23:29

Граф называется неориентированным, если его вершины соединены...

sverhrazum123

01.07.2020 18:35

Установите последовательность действий разархивации файла в winrar....

лиза2741

07.11.2021 09:41

Обозначим через m& n поразрядную конъюнкцию неотрицательных целых чисел m и n. например, 14& 5 = 11102& 01012 = 01002 = 4. для какого наименьшего неотрицательного...

Eva345678

03.07.2021 13:49

Год на планете Z делится на месяцы. Все месяцы длятся по M дней. От начала года D дней. Запишите дату так, как это делают на Земле. 9.11 — означает, что идет 9-ый день 11-ого...

nenovaolya

14.07.2022 19:45

Оқу тапсырмасы Төмендегі әр сөздің алдына немесе соңына бір сөзді тіркеп, сөзтіркесін жаз. Сөз тіркестерінің ретімен мәтінді әңгімеле.- медальбалуан- сайысСар-КекенПоддубный...

nsyruzzx

10.08.2022 22:06

5-тапсырма. 56 бет/стр. Тірек сөздерді пайдаланып, 7-8 сөйлем құрап жаз. Используя опорные слова составьте составьте 7-8 предложений...

диана2376

10.11.2021 02:06

Физика Что одинаково для всех звуков, производимых оркестром? ответ пояснить. а) амплитуда; б) тембр; с) высота; д) скорость....

Ответ:

helpmy123

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 оценок)

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

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