Day of the week of Christmas and New Year: Difference between revisions
Day of the week of Christmas and New Year (view source)
Revision as of 08:22, 7 December 2021
, 2 years agoadd FreeBASIC
(Ada version) |
(add FreeBASIC) |
||
Line 125:
In 2245, New Years is on a Wednesday, and Christmas is on a Thursday.
In 2393, New Years is on a Friday, and Christmas is on a Saturday.
</pre>
=={{header|FreeBASIC}}==
<lang freebasic>#include "vbcompat.bi" 'contains functions for dealing with dates and times
#include "string.bi" 'contains functions for formatting text strings
dim as double christmas = DateSerial(2021, 12, 25) 'enter the dates of the two holidays
dim as double newyears = DateSerial(2022, 01, 01)
print "Christmas Day 2021 is on a "; format(christmas,"dddd")
print "New Year's Day 2022 is on a "; format(newyears, "dddd")</lang>
{{out}}<pre>
Christmas Day 2021 is on a Saturday
New Year's Day 2022 is on a Saturday
</pre>
|