Doomsday rule: Difference between revisions
Content deleted Content added
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) = {_
|