Составить программу вычисления суммы цифр 5-значного числа вводимого с клавиатуры где n вводиться с клавиатуры

азамат126 азамат126    2   24.05.2019 22:10    1

Ответы
aytac200505 aytac200505  01.10.2020 11:05
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
Если хочешь можешь еще сделать проверку на пятизначное число.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика