统计周期内黑色星期五个数

黑色星期五是指某天既是13号又是星期五。13号在星期五的情况比在其他情况少吗?为了回答这个问题,编写一个程序,计算每个月的13号落在周一到周日的次数。给出n年的一个周期,要求计算从1900年1月1日至1900+n-1年12月31日中13号落在周一到周日的次数,n为正整数且不大于400,(已知1900年1月1日是星期一)