谁能帮我用PASCAL解这个题：已知三角形ABC中的三边分别为25.76，74.03，59.31，求三角形ABC的面积。

海伦公式：
设三角形三边为a,b,c
p=(a+b+c)/2
则S^2=p(p-a)(p-b)(p-c)
Program area;
var
a,b,c,p,s:real;
begin
readln(a,b,c);
p:=(a+b+c)/2;
s:=sqrt(p*(p-a)*(p-b)*(p-c));
writeln(s)
end.

用海伦公式嘛