Надо ! 1. составить алгоритм табулирования функции: y=lg(x+x^2)-8; x[-0.5; 15]; h=1.

const
  h = 1;
var
  x: real;
begin
  x := -0.5;
  while (x <= 15) do
  begin
    writeln('y(', x, ') = ', ln(x + sqr(x)));
    x := x + h;
  end;
end.