2001.upto(3e3){|y|g=y%19+1 e=(11*g+15+(5+8*c=y/100+1)/25-x=3*c/4-12)%30 e+=1 if e==25&&g>11||e==24 n=44-e n+=n<21?30:0 n+=7-(5*y/4-x-10+n)%7 puts"%02d %s, 0#{y}"%(n<32?[n,:MARCH]:[n-31,:APRIL])}