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

Найти сумму чисел заданного натурального числа. блок схема, программа

Ответ:

TheSniper

06.07.2020 11:26

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

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

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

alexclark169

06.09.2022 07:44

какова мощность алфавита, с которого записано сообщение, содержащее 4096 символов, если его объем составляет 5,5 Килобайта...

Alisacollins1

12.03.2022 12:23

В каких областях человеческой деятельности используется компьютер...

567545676676

04.11.2020 05:22

Выбери программы, которые относятся к системному программному обеспечению. Верных ответов:2 C++ Проигрыватель Windows Antivirus Kaspersky WinRar Pascal...

asd000fgh000

11.11.2020 01:42

Восточная Сибирь В субарктическом климатическом поясе расположен(а) 1)Красноярск 2)Чита 3)Абакан 4)Норильск...

dmitriidimaro

24.11.2022 19:57

с физикой с решением и и дано 1.В тонкой рассеивающей линзе получено изображение в 5 раз меньшепредмета. Определите фокусное расстояние линзы, если предмет находится на расстоянии...

America555

30.10.2021 05:59

Choose a, b or c.1. Would you like chips with your burger?a. manyb. a fewc. a little2. How bananas do you need for thebanana cake?a. muchb. manyc. a few3. Don t give me cheese....

AleksaKiki

19.10.2020 13:48

Добрый день! Это география 7-ой класс! В Южной Америке есть бананы, апельсины, кофе и сахарный тростник??? Скажите мне...

Zhenya13551

19.10.2020 13:48

Мини-проект «КАК ЖИВОТНЫЕ ПОЛЬЗУЮТСЯ ОРУДИЕ ТРУДА»?...

myatlick

08.08.2020 16:30

Решите неравенства: 1)22x+5 3(6x-1) 2)x²-11x+24⩾0...

Vanpal03

09.10.2022 21:28

Объем цилиндра равен 18пи см в кубе. Зная что радиус основания 3 см найдите высоту...

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

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