Tak z _FIXED_ by ksk

let rec(!)_=Printf.printf"%d
"(Scanf.scanf"%d %d %d
"($));!0and($)x y z=if x>y then if y>z&(x-y-1)mod 10<5then y else((x-5$y)z$(y-5$z)x)((z-5$x)y)else z;;!0

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

download

return to the top page