Day of the week: Difference between revisions
m
→{{header|Commodore BASIC}}: Reformat and retitle output.
(→{{header|Atari BASIC}}: Add implementation) |
m (→{{header|Commodore BASIC}}: Reformat and retitle output.) |
||
Line 627:
200 DEF FNXS(Y) = FND7(FNRD(Y) - 6):REM 6 DAYS BEFORE THE END OF THE YEAR
210 REM TRY OUR TARGET YEARS AND OUTPUT THE ONES THAT MATCH
220
230 PRINT CHR$(147);"CHRISTMASES ON SUNDAY";Y1;"-";Y2;CHR$(13)
260
270 PRINT
</lang>
{{Out}}
<pre>
2011 2016 2022 2033
|