Найти количество всех целых трехзначных чисел и вывести их на экран сумма цифр которых равна заданному числу d

!! паскаль через цикл пока по схеме

Про любых? есть тема?  

Потому что так надо.......!
Воооооот как-то так.

Здесь в цикл while входят операторы   if quess == secret   и  else:
чтобы они не входили в цикл while  нужно их сдвинуть влево на границу слова while

while quess ! = secret .......
.....................................
        tries = tries+1;
if quess == secret ........

else:
     ....................