Задать вопрос
ИнформатикаИнформатика
31 января, 18:16

Задается положительное целое число N. Нужно вывести сумму его цифр

+4
Ответы (1)
  1. 31 января, 20:05
    0
    Program asd;

    var i, n:integer;

    begin

    read (n) ;

    while n>0 do begin

    i:=i + n mod 10;

    n:=n div 10;

    end;

    write (i) ;

    end.
Знаете ответ на вопрос?
Не уверены в ответе?
Правильный ответ на вопрос 👍 «Задается положительное целое число N. Нужно вывести сумму его цифр ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы
Главная » Информатика » Задается положительное целое число N. Нужно вывести сумму его цифр
Регистрация Забыл пароль