(PascalABC)Что не так? Подскажите...

[Gidus]

Program z2;
Var x,y:real;
Begin
Readln(x);

IF 1<x<1.3 Then y:=sqrt(2.5x)+1 else IF x<=1 then y:sqr(sqr(x))-1 else y:sqr(sin(x));

Writeln('y=',y);
End.

Вот такая вот ошибка:

Program1.pas(5) : Встречено 'x', а ожидалось ';'

[p51x]

1<x<1.3 так условия не записываются, читайте про and
y:sqr - это что? где = ?

[type_Oleg]

Сообщение от Gidus

2.5x

может лучше 2.5*x ?