подскажите что неправильно в коде на паскаль

Question

var x,F: real; 
begin 
 write('x='); readln(x); 
 If (x>1) then F:=exp(3*ln(sin(2*x)))-cos(sqr(x))else; 
 If (x<1) then F:=sqrt(abs(ln(sqr(x))+2))else; 
 write(F) 
end.

Елена Морозова · Accepted Answer

Незнаю как Паскаль а поссать захотелось)!

Ксения Лучкова · Answer

На глаз в 6 строке ";"в конце пропущена.

Екатерина Черепашкина · Answer

убери елсе в 4 и 5 строке