Найти значение функции y=x^2+1 на отрезке [5; решить в паскале

// PascalABC.NET 3.1, сборка 1218 от 12.04.2016
begin
  5.To(12).Tabulate(x->x*x+1).Println
end.

Результат:
(5,26) (6,37) (7,50) (8,65) (9,82) (10,101) (11,122) (12,145)