(while 1(let[n(read)m #(= 0(mod n%))](println n'is(if(if(m 100)(m 400)(m 4))'a"not a")"leap year.")))
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page