Mavedi
5 год назад
Задание 2.Сумма цифр.Вводтся целое пложительное числоa меньше или равно 109.Найдите сумму цифр введённого числа .1)Соберите программу путем выбор а правильных команд из представленного выше набора.Текст программы:............................................?Всего команд в программе:.....................?2)Составьте тест для проверки правильности решения задачи. таблица в приложениеПожалуста сделайте прошу вас Пожалуйста посчитайте!!даю 25 б
ОТВЕТЫ
Fertig Alke
Oct 24, 2020
var a,b,s:integer;
begin
Readln(a);
while a>0 do
begin
b:=a mod 10;
s:=s+b;
a:= a div 10;
end;
writeln ('s = ', s);
end.
109
s = 10
11
s = 2
67
s = 13
46
s = 10
21
s = 3
begin
Readln(a);
while a>0 do
begin
b:=a mod 10;
s:=s+b;
a:= a div 10;
end;
writeln ('s = ', s);
end.
109
s = 10
11
s = 2
67
s = 13
46
s = 10
21
s = 3
513
Смежные вопросы:
