HOME | Карта сайта
Нюшка2002
ответ дан

С клавиатуры вводится целое число от 1 до 999. Напиши программу, которая выводит "Да", если сумма цифр этого числа больше 10, и "Нет" в остальных случаях.

Ответ :

BobbyFresnel

===== PascalABC.NET =====

begin

 var n := ReadInteger('Введи натуральное число:');

 var s := 0;

 while n > 0 do

 begin

   s += n mod 10;

   n := n div 10;

 end;

 if s > 10 then

   Println('Да')

 else

   Println('Нет')

end.

Другие вопросы - Информатика

znanija.uk.to