Ошибку 207 при вычислении выражения - Turbo Pascal

Формулировка задачи:

При Вводе a=1 b=2 x=2 Выдает ошибку 207 Помогите
program perimetr;
uses crt;
var a,b,x,y:real;
begin
clrscr;
writeln('vvesti  a');
readln(a);
writeln('vvesti  b');
readln(b);
writeln('vvesti  x');
readln(x);
if x<3 then y:=a*x+b*b;
if x=3 then y:= 0 else y:=exp((1/3*ln(2*a-b)))-3/x;
writeln('y=',y:0:2);
 readln;
end.

Код к задаче: «Ошибку 207 при вычислении выражения - Turbo Pascal»

textual
program perimetr;
uses crt;
var
y,a,b,x:real;
begin
clrscr;
writeln('vvesti  a');
readln(a);
writeln('vvesti  b');
readln(b);
writeln('vvesti  x');
readln(x);
if x<3 then y:=a*x+b*b;
if x=3 then y:= 0 else y:=exp((1/3*ln(2*a-b)))-3/x;
writeln('y=',y:5:2);
readln;
end.

11   голосов, оценка 3.818 из 5


СОХРАНИТЬ ССЫЛКУ