Дано трехзначное число найдите сумму его цифр

0 голосов
68 просмотров

Дано трехзначное число найдите сумму его цифр


спросил от (12 баллов) в категории Информатика
оставил комментарий от Кандидат Наук (31.5k баллов)

Язык программирования?

оставил комментарий от Начинающий (168 баллов)

ты имеешь в виду создать этому вопросу программу для вычисления?

оставил комментарий от Кандидат Наук (31.5k баллов)

Вопрос задан по информатике, так что думаю да

оставил комментарий от Начинающий (168 баллов)

может с помощью pascal ABC или C++

оставил комментарий от Архангел (142k баллов)

Язык не указан, каждый волен писать на любом.

оставил комментарий от Архангел (142k баллов)

Или даже просто нарисовать блок-схему - это тоже решение.

1 Ответ

0 голосов
ответил от Кандидат Наук (31.5k баллов)

//дано трехзначное число найдите сумму его цифр
var x,y,i:word;
begin
writeln('Введите трехзначное число');
readln (x);
while (999  begin
     writeln('Вы ввели не трехзначное число попробуйте еще раз');
    readln (x);
  end;
for i:=1 to 3 do // число делиться на цифры
      begin
        y:=y+x mod 10;
        x:=x div 10;
      end;
writeln('Сумма цифр данного числа ',y);
end.

...