三角形内切圆的面积
题目描述：给出三角形三边的边长，求此三角形内切圆的面积。

输入：三个正实数a、b、c（满足三角形三边关系），表示三角形三边边长。
输出：三角形内切圆的面积，结果四舍五入到小数点后2位
输入样例： 3 4 5
输出样例： 3.14
程序：①②③④⑤

PROGRAM PROGRAM1;
VAR
     A,B,C,R,S,T:REAL;
BEGIN
      READ(A,B,C);
       S :=(  a+b+c  )/2;
       T:=  SQRT  (S*(S-A)*(S-B)*(S-C));
       R:=T/S;
       WRITELN(3.1415927 * R *  R   :0:  2   ;
END.