m:-readln([A,B,C]),format("~d
",round(A/2*sqrt(B^2-((B^2-C^2+A^2)/2/A)^2))),m.