Составьте таблицу значений функции у=х^2-9х+4 на отрезке [-8; 8] c шагом 1(программа 9 класса)

// PascalABC.NET 3.0, сборка 1157 от 02.02.2016
var
  x:integer;
begin
  for x:=-8 to 8 do Writeln(x:3,sqr(x)-9*x+4:6) 
end.

Результат  выполнения программы:
 -8   140
 -7   116
 -6    94
 -5    74
 -4    56
 -3    40
 -2    26
 -1    14
  0     4
  1    -4
  2   -10
  3   -14
  4   -16
  5   -16
  6   -14
  7   -10
  8    -4