Day of the week: Difference between revisions
no edit summary
(→{{header|Python}}: Added a datetime variant) |
No edit summary |
||
Line 4,248:
2118
</pre>
=={{header|Yabasic}}==
{{trans|FreeBASIC}}
<lang Yabasic>sub wd(m, d, y)
If m < 3 Then // If m = 1 Or m = 2 Then
m = m + 12
y = y - 1
End If
Return mod((y + int(y / 4) - int(y / 100) + int(y / 400) + d + int((153 * m + 8) / 5)), 7)
End sub
// ------=< MAIN >=------
For yr = 2008 To 2121
If wd(12, 25, yr) = 0 Then
Print "Dec 25 ", yr
EndIf
Next</lang>
=={{header|zkl}}==
| |||