题目描述:
给出三角形三边的边长,求此三角形内切圆(如下图所示,三角形的内切圆是和三角形三边都相切的圆)的面积。
输入:
三个正实数a、b、c(满足a+b>c,b+c>a,c+a>b), 表示三角形三边的边长。
输出:
三角形内切圆的面积,结果四舍五入到小数点后面2位。
输入样例:
3 4 5
输出样例:
3.14
程序:
program program1; var a, b, c, r, s, t: real; begin read(a, b, c); s := ( 1 ) / 2; t := 2 (s * (s - a) * (s - b) * (s - c)); r := t / s; writeln(3.1415927 * r * 3 : 0 : 4 ); end.