Five weekends: Difference between revisions
Content added Content deleted
(→{{header|D}}: adding GAP) |
|||
Line 74: | Line 74: | ||
end; |
end; |
||
r := FiveWeekends(1900,2100);; |
r := FiveWeekends(1900, 2100);; |
||
n := Length(r[1]); |
n := Length(r[1]); |
||
# 201 |
# 201 |
||
Length(r[2]); |
Length(r[2]); |
||
# 29 |
# 29 |
||
r[1]{[1..5]}; |
r[1]{[1 .. 5]}; |
||
# [ "Mar-1901", "Aug-1902", "May-1903", "Jan-1904", "Jul-1904" ] |
# [ "Mar-1901", "Aug-1902", "May-1903", "Jan-1904", "Jul-1904" ] |
||
r[1]{[n-4..n]}; |
r[1]{[n-4 .. n]}; |
||
# [ "Mar-2097", "Aug-2098", "May-2099", "Jan-2100", "Oct-2100" ]</lang> |
# [ "Mar-2097", "Aug-2098", "May-2099", "Jan-2100", "Oct-2100" ]</lang> |
||