> restart:s1:=subs(x=2.3,A*x^4+B*x^3+C*x^2+D*x+F-3.57);
> s2:=subs(x=4.5,A*x^4+B*x^3+C*x^2+D*x+F-2.35);
> s3:=subs(x=5.32,A*x^4+B*x^3+C*x^2+D*x+F-6.21);
> s4:=subs(x=21.3,A*x^4+B*x^3+C*x^2+D*x+F-5.22);
> s5:=subs(x=12.37,A*x^4+B*x^3+C*x^2+D*x+F-8.73);
> fsolve({s1,s2,s3,s4,s5},{A,B,C,D,F});
> Sol:=subs(%,A*x^4+B*x^3+C*x^2+D*x+F);
> subs(x=4.5,Sol);
>