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

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

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

↓

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

arinasuper000

29.12.2021 22:27

Последним васиным испытанием для вас будет вспомнить детство и нарисовать лодочку. напишите функцию picture(ﬁle_name, width, height, sky_color, ocean_color, boat_color,...

osipolara

12.02.2022 00:42

Как в кумире нарисовать розу ветров при рисователя? напишите алгоритм....

SherlockAlya

09.11.2021 05:27

Запустите интегрированую среду программирования ведите программный код...

zlatochkagr

08.11.2020 22:47

Определите значение переменной c после выполнения следующего фрагмента программы. a:= 10; b:= 6; b:= b+а; if a 2*b then if b –3 then c:= a–2*b else c:= 2*a else c:=...

alinatitova228

03.12.2021 04:51

Куда сместится спрайт при нажатии стрелки влево? А) вправо Б) вверх В) влево С) вниз...

yekaterinak977

30.01.2021 22:33

В таблице приведены за и количество найденных по ним страниц некоторого сегмента сети Интернет. маленький 1000 удаленький 2500 маленький удаленький 300 какое количество...

Diana6079

14.05.2020 04:20

Какого типа гиперссылки не существует...

sasha07022005

05.04.2021 23:20

Выберите действия конструирования модели дома Установите верные опции, которые использовались, их могут быть несколько.Создадим наш дом размерами 10 на 12 на 5 м.Строим...

Гогенцоллерн

06.06.2020 08:28

Расположите по порядку оформление автооглавления.Ссылки- Добавить текст, выбираем уровень Оглавление -Автособираемое оглавление, Выделяете текст который необходимо...

мротмсс

12.06.2021 05:12

Виды и типы диаграмм?Элементы диаграмм...

Ответ:

lotoskei

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 Оформи подписку