Найдите ошибку Program prim2; Var x, y: real; Begin For x:=-10 to 10 do Begin y:-sqr (x); Writeln ( x,' ', y) end; End.
Нет ошибок. я говорю точно потому что я изучал несколько языков программирования
здесь точно есть ошибка
У тебя написано y:-sqr (x) Но насколько я понимаю, там должно быть так: y:=sqr (x) Удачи тебе :)
это я случайно