leap year by kozima

while 1=1do
let a=read_int()in
Printf.printf"%d is %sa leap year.
"a(if a>a/4*4||a mod 100=0&a mod 400>0then"not "else"")done

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

download

return to the top page