Составить на языке PASCAL программу вычисления значения функции (номер 6)

begin
  var n:=ReadInteger('n=');
  var a,b,x,y:real;
  Writeln('Введите a,b,x,y'); Read(a,b,x,y);
  var F:=cos(Power(x,a-b))/(Abs(Power(y,4)-Power(y,5))+5.4)+n*n;
  Writeln('F=',F)
end.


n= 14
Введите a,b,x,y
1.35 0.58 6.2 3.19
F=195.99743737259