English Deutsch Français Italiano Español Português 繁體中文 Bahasa Indonesia Tiếng Việt ภาษาไทย
所有分類

由於最近程式作業是設計萬年曆

需要有這一項數據

麻煩大家解答囉,謝謝

2005-05-11 19:32:14 · 13 個解答 · 發問者 酷企鵝 1 in 科學 天文與太空

13 個解答

請參考此網站來作程式設計(請點選)
圖片參考:http://sean.o4u.com/ap/calendar/title.gif
 但請注意其備註事項、著作權之引用,其中包括Q: 我可把這個程式放在我的個人網站,或寄給好友分享嗎?A: 只要不改變原始程式及註解說明,放於非營利性質的網站是可以的。自由使用範圍: 學校、學會、公會、公司內部、程式研究、個人網站供人查詢使用。

2005-05-14 01:38:13 補充:
樓上,讚!!

2005-05-11 19:43:42 · answer #1 · answered by JanetC 7 · 0 0

現在是什麼狀況= =

2005-05-24 18:05:49 · answer #2 · answered by 憨憨♂ 1 · 0 0

立志當貴婦
我喜歡
發薪水比較重要

2005-05-21 05:38:50 · answer #3 · answered by Anonymous · 0 0

CODE2501
的回答太帥了

雖然完全看不懂!

2005-05-19 15:02:03 · answer #4 · answered by Anonymous · 0 0

我都只想放假那一天~

2005-05-18 09:35:04 · answer #5 · answered by Anonymous · 0 0

人生苦短....別想那麼多了...我都只想發薪是哪一天= ="

2005-05-13 21:27:38 · answer #6 · answered by ? 2 · 0 0

好多不同的答案,我想發問者要頭痛了....

2005-05-13 18:13:08 · answer #7 · answered by 千里不留名 7 · 0 0

不嫌棄的話,參考一下我過去寫過的萬年曆程式,這是用BASIC的,但算式應該都還適用吧。

這是以現今的曆法推算的。不對應過去的舊曆法,但運算上不用以西元元年作基準

INPUT "An year:"; y: z = y - 1
PRINT SPC(11); "A.D."; USING "####"; y
FOR m = 1 TO 12: md = md + da
 IF m = 2 AND y / 400 = INT(y / 400) THEN da = 29: GOTO 1
 IF m = 2 AND y / 4 = INT(y / 4) AND y / 100 > INT(y / 400) THEN da = 29: GOTO 1
 IF m = 2 THEN da = 28: GOTO 1
 IF m = 4 OR m = 6 OR m = 9 OR m = 11 THEN da = 30 ELSE da = 31
1 DATA JANUARY, FEBRUARY, MARCH, APRIL, MAY, JUNE, JULY
 DATA AUGUST,SEPETEMBER,OCTOBER,NOVEMBER,DECEMBER
 READ wow$: g = LEN(wow$) / 2: PRINT TAB(15 - g); wow$
 PRINT " SU MO TU WE TH FR SA"
  FOR day = 1 TO da
   fd = (z + INT(z / 4) - INT(z / 100) + INT(z / 400)) MOD 7 + 1
    wd = (fd + md + day - 1) MOD 7
   PRINT TAB(wd * 4 + 1); USING "####"; day;
  NEXT day
PRINT : PRINT : NEXT m: END

2005-05-13 08:12:12 · answer #8 · answered by VBC 7 · 0 0

Sunday!!!!

十六世紀以前西方採用[儒略曆].它分一年為12個月,一﹑三﹑五﹑七﹑八﹑十﹑十二月為大月,每月31日,四﹑六﹑九﹑十一月為小月,每月30日,二月平年為28日,閏年為29日.平年共365日,閏年共366日.凡公元年份能被4整除的,為閏年.
實施儒略曆到十六世紀後期,累差已約10天.為了消除這個差數,格雷果里十三世把儒略曆1582年10月 4日(星期四)的下一天定為格雷果里曆10月15日,中間銷去10天,同時還修改了置閏的法則,公元年數被4除盡的仍為閏年,但對世紀年(如1600,1700,……),只有能被400除盡的才為閏年.

剩下的請自己算.
或參考中研院網站http://www.sinica.edu.tw/~tdbproj/sinocal/luso.html

另外,http://you168.idv.tw/lm09.htm並沒有考慮上述改曆的因素,求出的結果不對

2005-05-12 18:03:26 · answer #9 · answered by ? 3 · 0 0

星期一

2005-05-12 10:28:09 · answer #10 · answered by 秉達 7 · 0 0

fedest.com, questions and answers