Анюта
подскажите что неправильно в коде на паскаль
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.
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.
Незнаю как Паскаль а поссать захотелось)!
На глаз в 6 строке ";"в конце пропущена.
убери елсе в 4 и 5 строке