Найдите ошибку:
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);
Ещё счётчик цикла должен быть целочисленный. Var x: integer, а у тебя real
Program prim2;
Var y: real;
x:integer;
Begin
For x:=-10 to 10 do
Begin
y:=sqr(x);
Writeln(x, , y)
end;
End.
Я кстати вообще не знаю зачем для вычисления корня Вы взяли тип real.
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
