let rec(!)?(n=ldexp 0.5(read_int()mod 72))i=Printf.printf"-%.f to %.f
"n(n-.1.);!0;;!0