Составить программу на языке PASCAL для расчета таблицы значений заданной функции. Не могу понять где ошибка в коде
Program Nikon;
var c,x,y:real;
begin
x:=0.5;
readln(y);
C:=2sqr(x+y);
writeln(c);
end.
Program Nikon;
var c,x,y:real;
begin
x:=0.5;
readln(y);
C:=2sqr(x+y);
writeln(c);
end.