p@main=do l<-readLn;putStrLn$show l++" is "++(if l`mod`4==0&&l`mod`100/=0||l`mod`400==0then""else"not ")++"a leap year.";p
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page