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

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

Задать свой вопрос
1 ответ
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
Если хочешь можешь еще сделать проверку на пятизначное число.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт