Question

Что делать если выдает ошибку? Пишет: встречено \"Begin\" а ожидалось выражение. program Func; var x, y: real;integer: Begin ReadLn(x); (abs(2.x - 5) + sqr(b)).sqr(x); Writeln(\'y(x)=\', y); end.

Answer 1

Ответ:

нужно begin

Объяснение:

Answer 2

Ошибка в строке "(abs(2.x - 5) + sqr(b)).sqr(x);". Необходимо исправить на "(abs(2 * x - 5) + sqr(y)).sqr(x);", так как вместо "b" должно быть "y", а умножение числа на переменную в языке Pascal записывается через знак "*".

Исправленный код:

program Func;
var
x, y: real;
begin
ReadLn(x);
y := (abs(2 * x - 5) + sqr(y)).sqr(x);
Writeln('y(x)=', y);
end.