Doomsday rule: Difference between revisions
m
→{{header|FORTRAN}}: RC uses Fortran, not FORTRAN
Bwana Pete (talk | contribs) (Inserted a Fortran Version of the algorithm) |
m (→{{header|FORTRAN}}: RC uses Fortran, not FORTRAN) |
||
Line 730:
M= 4 D= 2 Y= 2101 DAY=SATURDAY</pre>
=={{header|
<syntaxhighlight lang="FORTRAN">
program someday ! Calculates the day that a week falls on
Line 951:
2101-04-02 (April 2, 2101) : Saturday
</pre>
=={{header|FreeBASIC}}==
<syntaxhighlight lang="freebasic">dim shared as ubyte fdoom(0 to 1, 1 to 12) = {_
| |||