10. 1
11. вообще зависишь от программы... Ну а так лично у Меня на компе можно создашь все списки: 1;2;3
Фух, наконец-то х) Давненько не рисовал примитивами, но вот:) Аргументом процедуры New выступает номер "треугольника", а константа Center носит координаты начала, её можете каверкать как угодно, в пределах... Ну, 30..150 где-то, максимум только размерами окна диктуется))
<span>D) в документ можно добавить сколько угодно декоративных текстов.
</span>
Это программа должна выдать сразу? До какого значения? Конечная цифра задается с клавиатуры?
<h3>PascalABC.NET 3.4.2, сборка 1881 от 19.11.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
SeqGen(ReadInteger, 1, 1, (i, j)-> i + j).Println
end.
<h2>И это - всё !</h2>