• Дано трехзначное число. Найдите сумму его цифр.
    Входные данные
    Вводится целое положительное число. Гарантируется, что оно соответствует условию задачи.
    Выходные данные
    Выведите ответ на задачу.

    (Примеры:входные данные-179,выходные данные-17) Решить в ПАСКАЛЕ

Ответы 1

  • var a,s:integer;begin;readln(a);while a<>0 dobegin;s:=s+(a mod 10);a:=a div 10;end;write(s);end.
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years