Anonymous user
Day of the week: Difference between revisions
no edit summary
No edit summary |
No edit summary |
||
Line 2,140:
end
end</lang>
=={{header|M2000 Interpreter}}==
<lang M2000 Interpreter>
\\ 0x30 for locale Sunday
Print "December 25 is a Sunday in:"
For Year=2008 to 2121 {
if Str$(Date("25/12/"+str$(Year,"")),"dddd")=Locale$(0x30) Then {
Print Year
}
}
</lang>
{{out}}
<pre>
2011
2016
2022
2033
2039
2044
2050
2061
2067
2072
2078
2089
2095
2101
2107
2112
2118
</pre>
=={{header|M4}}==
| |||