Вычислить заданное целочисленное выражение для данных a,b в формате INTEGER, используя условный оператор IF — Pascal(Паскаль)

var
 a,b:integer;
 x:real;
begin
 readln(a,b);
 if a>b then x:=(a/b)-1
  else
   if a=b then x:=-25
    else
     if a<b then x:=(a*a*a-5)/a;
 writeln(x);
end.