Несколько раз пыталась сделать, но все время в паскале выдает разные ошибки, если не сложно кто-нибудь решите, пожалуйста!

// PascalABC.NET var   a,c,x,f,y:real; begin   Write('a,c,x,f=');   Read(a,c,x,f);   y:=7*Sqrt(Power(a,5)-4*c)*Cos(Sqr(Tan(5)))/   (Sin(2)*Power(Cos(x-a*a),4))*   Power(a,2*x+1)*Sqrt(Abs(Cos(Sin(x*x))));   Writeln('y=',y) end.   Результат a,c,x,f=5 3 3 3 y=13459606.2123948