西暦 to 和暦 in diff DouKaku?

西暦を和暦に変換するプログラムを書いてください。元号の切り替わる日など、複数の表記が可能な場合には両方表示し、西暦が無効な日付の場合には「範囲外」と表示するようにしてください。対応すべき日付は明治元年以降とします。

>a.py 1868/12/2
明治1年12月2日

>a.py 1926/12/24
大正15年12月24日

>a.py 2007/12/01
平成19年12月1日

>a.py 1926/12/25
大正15年12月25日昭和1年12月25日

>a.py 1868/1/2
範囲外

>a.py 1868/100/2
範囲外

see: 和暦西暦対応表

すいません、余計なプリント文が混じってましたので修正します。

--- 5234.txt    2008-01-09 01:43:00.000000000 +0900
+++ 5234.txt.diff       2008-01-09 01:42:50.000000000 +0900
@@ -20 +20 @@
-            (return-from to-japanese-date (princ "範囲外")))
+            (return-from to-japanese-date "範囲外"))
@@ -38 +38 @@
-      (princ "範囲外")))   ;日付のパターンにマッチしない場合は範囲外
+      "範囲外"))   ;日付のパターンにマッチしない場合は範囲外

範囲外チェックのバグを発見したので修正します。(2007/2/29を受け付けてしまう)

--- dk122.bug.ml        2008-01-10 00:41:21.000000000 +0900
+++ dk122.ml    2008-01-11 00:18:28.000000000 +0900
@@ -17 +17 @@
-let mtab = [| 0; 31; 29; 31; 30; 31; 30; 31; 31; 30; 31; 30; 31 |]
+let mtab = [| 0; 31; 28; 31; 30; 31; 30; 31; 31; 30; 31; 30; 31 |]

DouKaku?

西暦 to 和暦

Posted feedbacks - diff

Index

Feed

Other

Link

Pathtraq