challenge 年間カレンダー

nを入力としてn年の年間カレンダーを返すプログラムを作ってください
少なくとも日曜日と土曜日が判別出来るようにしてください
出力は標準出力でもファイルでも構いません
デザインは各自のお好みで

出力例1:
(y-calendar 2008)=>
#=Saturday, @=Sunday
2008/1 1 2 3 4 #5 @6 7 ...
2008/2 1 #2 @3 4 5 6 7 ...
...
2008/12 1 2 3 4 5 #6 @7 ...

出力例2:
(y-calendar 2008)=>
        M T W T F S S M
2008/ 1   1 2 3 4 5 6 7 ...
2008/ 2         1 2 3 4 ...
...
2008/12 1 2 3 4 5 6 7 8 ...

出力例3:
(y-calendar 2008)は2008.htmlを出力する
2008.htmlの中身
----
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN"
       "http://www.w3.org/TR/html4/strict.dtd">
<html>
<head>
<title>2008 calendar</title>
<style type="text/css">
* {font-family: monospace;}
span {margin: 0px 3px;}
span.sunday {color:red;font-weight:bold;}
span.saturday {color:blue;font-weight:bold;}
dd ul li{display:inline;}
</style>
</head>
<body>
<h1>2008 calendar</h1>
<dl>
<dt>2008/1</dt>
<dd><ul>
<li><span class="weekday">1</span></li>
<li><span class="weekday">2</span></li>
<li><span class="weekday">3</span></li>
<li><span class="weekday">4</span></li>
<li><span class="saturday">5</span></li>
<li><span class="sunday">6</span></li>
...
</ul></dd>
...
</dl>
</body>
</html>
----

Posted feedbacks - なでしこ

とりあえず表示例1で書いてみました

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
●yCalendar(year)
    monthとは整数
    dayとは整数
    "{year} calendar (#=Saturday, @=Sunday)"を表示
    12回
        month=回数
        "{year}/{month}"を継続表示
        (daysOfMonth(year,month))回
            day=回数
            もし("{year}/{month}/{day}"の曜日="土")ならば
                " #{day}"を継続表示
            違えば、もし("{year}/{month}/{day}"の曜日="日")ならば
                " @{day}"を継続表示
            違えば
                " {day}"を継続表示
        改行を継続表示
    
●daysOfMonth(year,month)
    nextYearとは整数
    nextMonthとは整数
    もし(month=12)ならば、nextMonth=1。nextYear=year+1
    違えば、nextMonth=month+1。nextYear=year
    "{year}/{month}/1"と"{nextYear}/{nextMonth}/1"の日数差

yCalendar(2008)

Index

Feed

Other

Link

Pathtraq

loading...