<h3>Ошибка</h3>
<em>Вы забыли поставить вторую запятую после x</em>
writeln('x=',x' ','f(',x,')=',f);
<em>Исправленный вариант</em>
writeln('x=',x,' ','f(',x,')=',f);
<em />
<h3>Верный код программы</h3>
Program table;
var f,x: real;
begin
writeln;{перевод курсора на начало следующей строки}
x:=-1;
while x<=1 do begin
f:=sqr(x)+1;
writeln('x=',x,' ','f(',x,')=',f);
x:=x+0.1;
end;
end.