(while 1(#(println%'is(if(>(mod%(if(>(mod% 50)0)4 16))0)"not a"\a)"leap year.")(read)))