Я пытаюсь скопировать часть Treeview во всплывающее меню, и мне совсем не повезло. Я просто не могу заставить рекурсию работать, и я знаю, что, вероятно, делаю все это неправильно. Возьмите этот пример изображения (который является скриншотом...

Сколько натуральных чисел меньше 1000, сумма цифр которых равна 6? Не знаю, как начать это с помощью Pascal. На Python мой скрипт будет выглядеть примерно так: a = 1 b = 1000 for i in range(a,b): ........ Я не знаю, как получить доступ к...