本程序运用的万年历的计算公式: d=a-1+(a-1)/4-(a-1)/100+(a-1)/400+c 其中a为年c为该日期在本年中的天数，d取整数，当d/7余数0时是星期天，余数1时是星期一依此类推。 -This procedure used the formula for calculating the calendar: d = a-1+ (A-1)/4- (a-1)/100+ (A-1)/400+ C for the year in which a date for