Дано натуральное число n. Выведите в порядке возрастания все трёхзначные числа, сумма...

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

Дано натуральное число n. Выведите в порядке возрастания все трёхзначные числа, сумма цифр которых равна n.


Информатика (12 баллов) | 184 просмотров
Дан 1 ответ
0 голосов

Если Pascal:

var

n: byte;

i: integer;

begin

readln(n);

for i:=100 to 999 do

if ((i mod 10) + ((i div 10) mod 10) + (i div 100)) = n then writeln(i);

end.

(82 баллов)
0

А можно в питоне?