《计算圆周率π的近似值》课件.pptVIP

3.设计一个算法计算1900年1月1日之后的任何一天是星期几？用VB程序实现这一算法。 ? 算法流程图 ???? 界面设计 ???? 程序代码 ???? 示例程序 星期计算问题 平时在日常生活中遇到这样的问题，忘记了几月几日是星期几，一般会采用这样的方法，从一个已知的某天开始推算，先计算已知星期几的这一天距要推算的那天共相差几天，然后将天数除以7取余数，最后就可以推算出星期几了。 已知公元元年1月1日是星期一，再计算需推算的日子离元年1月1日相距多少天（W），再用天数W除以7的余数加上1就是星期几了，余0就是星期一，余1就是星期二.……，但是在计算天数时会发现由于中间会经历平年（365天）、闰年（366天），每年的不同月份天数也不相同，这样计算量是很大的，计算也十分困难。 德国数学家克里斯蒂安?蔡勒（Christian Zeller，1822-1899）在1886年推导出了一个解决此问题的著名的蔡勒公式， w =[c/4]-2*c+y+[y/4]+[13*(m+1)/5]+d-1 其中，c是年份的前2位，y是年份的后两位，m是月份，d是日数。1月和2月要按上一年的13月和 14月来算，这时c和y均按上一年取值，［］表示取整。