Предмет: Информатика,
автор: gamzaev56
составить программу вычисления суммы цифр 5-значного числа вводимого с клавиатуры где N вводиться с клавиатуры
Ответы
Автор ответа:
0
uses crt;
var s,i,x : integer;
begin
Read(x);
For i:=1 to 5 do begin
s:=s + (x mod 10);
x:=x div 10;
end;
Write (s);
end.
Язык - ПаскальABC
Если хочешь можешь еще сделать проверку на пятизначное число.
var s,i,x : integer;
begin
Read(x);
For i:=1 to 5 do begin
s:=s + (x mod 10);
x:=x div 10;
end;
Write (s);
end.
Язык - ПаскальABC
Если хочешь можешь еще сделать проверку на пятизначное число.
Похожие вопросы
Предмет: История,
автор: svetlya40k
Предмет: Математика,
автор: timurkonup
Предмет: Русский язык,
автор: DEXtopZED
Предмет: Геометрия,
автор: ждлорп
Предмет: Математика,
автор: ilya49