Submission #108649

---

Source Code Expand

open Printf
open Scanf
open String
open List
open Int64

let dir x =(*
	if 113<=x && x<=337 then "NNE"
	else if x<=562 then "NE"
	else if x<=787 then "ENE"
	else if x<=1012 then "E"
	else if x<=1237 then "ESE"
	else if x<=1462 then "SE"
	else if x<=1687 then "SSE"
	else if x<=1912 then "S"
	else if x<=2137 then "SSW"
	else if x<=2362 then "SW"
	else if x<=2587 then "WSW"
	else if x<=2812 then "W"
	else if x<=3037 then "WNW"
	else if x<=3262 then "NW"
	else if x<=3487 then "NNW"
	else *)"N";;

let solve x yy =
	let y = (yy * 100 / 60 + 5) / 10 in
	if y<=2 then printf "C 0\n"
	else if y<=15 then printf "%s 1\n" (dir x)
	else if y<=33 then printf "%s 2\n" (dir x)
	else if y<=54 then printf "%s 3\n" (dir x)
	else if y<=79 then printf "%s 4\n" (dir x)
	else if y<=107 then printf "%s 5\n" (dir x)
	else if y<=138 then printf "%s 6\n" (dir x)
	else if y<=171 then printf "%s 7\n" (dir x)
	else if y<=207 then printf "%s 8\n" (dir x)
	else if y<=244 then printf "%s 9\n" (dir x)
	else if y<=284 then printf "%s 10\n" (dir x)
	else if y<=326 then printf "%s 11\n" (dir x)
	else printf "%s 12\n" (dir x);;
	
scanf "%d %d" solve;;

Submission Info

Judge Result