old/PAS/STRINGANALYZE/TEST.PAS

uses strcalc;
var
 a : string;
begin
{ readLn(a);}
 a:='x^2*sqrt(15-x^2)/10';
 WriteLN(strfunc(a,3):0:5);
end.