• Вопрос по информатике:

    Напишите программу, которая вводит трехзначное число и находит сумму цифр этого числа.

    • Автор:

      lucia

  • Ответ:

    var

    a,b,c,n,s: integer;

    begin

    readln(n);

    if ((n>99) and (n<1000)) then

    begin

    a:=n div 100;

    b:=n div 10 mod 10;

    c:=n mod 10;

    s:=a+b+c;

    writeln('Сумма трех цифр равна ',s);

    end else writeln('Введите трехзначное число!');

    end.

    Объяснение:

    • Отвечал:

      merclekoch
    • 0

    Ответов нет, но ты это испарвиш!

Еще 4 ненужных тебе вопроса, но это важно для поиска