Задание:
Составить программу вычисления суммы цифр 5-значного числа вводимого с клавиатуры где N вводиться склавиатуры
Решение:
Uses crt; var s,i,x: integer; beginRead (x); For i: =1 to 5 do begin s: =s+(x mod 10); x: =x div 10; end; Write (s); end. Язык — ПаскальABCЕсли хочешь можешь еще сделать проверку на пятизначное число.
Знаете другой ответ?