Question

Найдите ошибку
Program prim2;
Var x, y: real;
Begin 
For x:=-10 to 10 do
Begin
y:-sqr (x);
Writeln ( x,' ', y)
end;
End.

Answer 1

нет ошибок. я говорю точно потому что я изучал несколько языков программирования

Answer 2

У тебя написано
y:-sqr (x)
Но насколько я понимаю, там должно быть так:
y:=sqr (x)
Удачи тебе :)