Пять бит степень двойки берем с избытком 2 в пятой 32
Повторяешь условия цикла, заданое количество раз
Циклом делаешь просто y раз к x прибавляешь x
// PascalABC.NET 3.1, сборка 1218 от 12.04.2016
begin
5.To(12).Tabulate(x->x*x+1).Println
end.
<u><em>Результат:</em></u>
(5,26) (6,37) (7,50) (8,65) (9,82) (10,101) (11,122) (12,145)