Написать программу на паскале (цикл repeat)
Задано натуральное число N, вычислите сумму его цифр.
N=1024
Ответы
Ответ дал:
0
Ответ:
Вот программа
Объяснение:
var
N, s: integer;
begin
read(N);
s := 0;
repeat
s := s + N mod 10;
N := N div 10;
until N = 0;
writeln(s);
end.
Вас заинтересует
1 год назад
1 год назад
1 год назад
6 лет назад
6 лет назад