area of triangle by xsd

while()=Printf.printf"%.f
"(Scanf.scanf"%f %f %f
"(fun a b c->let($)p q=p*.((a+.b+.c)/.2.-.q)in 1.$a$b$c$0.)**0.5)do()done

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return to the top page