Ошибка 41: Типы оперантов не соответствуют операции.
program lab1;
var
fx, x: real;
begin;
writeln('Enter X:');
readln(x);
if sqr(x)>2 and sqr(x)<5 then fx:=sqr(x)*x+1
else if sqr(x)<2 or sqr(x)=2 then fx:=x-3
else fx:=x+4;
writeln('The answer is:',fx);
end.
Что сделать?
Скобки поставить
program lab1;
var
fx, x: real;
begin;
writeln('Enter X:');
readln(x);
if (sqr(x)>2) and (sqr(x)<5) then fx:=sqr(x)*x+1
else if (sqr(x)<2) or (sqr(x)=2) then fx:=x-3
else fx:=x+4;
writeln('The answer is:',fx);
end.
Нужно правильно представить интервалы:
2 < x² < 5
x² ≤ 2
x² ≥ 5
Т. е. однозначно определено:
if x*x >=5 then fx := x + 4
else x*x >= 2 then fx := x*x*x + 1
else fx := x - 3;
⇢