Day of the week: Difference between revisions

No edit summary
Line 2,142:
 
=={{header|M2000 Interpreter}}==
Str$( number, format$) use Visual Basic 6 format
<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,"")),"ddddw")=Locale$(0x30)"1" Then {
Print Year
}
}
 
</lang>
{{out}}
Anonymous user