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 10:36, 15 April 2023
, 1 year agono edit summary
(Day of the week of Christmas and New Year in various dialects BASIC (BASIC256, QBasic, True BASIC, XBasic and Yabasic)) |
No edit summary |
||
Line 469:
<pre>25/12/2021 is a Saturday
1/1/2022 is a Saturday</pre>
=={{header|Delphi}}==
{{works with|Delphi|6.0}}
{{libheader|Controls,SysUtils,StdCtrls}}
Delphi libraries make this easy.
<syntaxhighlight lang="Delphi">
procedure DoChristmasNewYear(Memo: TMemo);
var D: TDate;
begin
D:=EncodeDate(2021,12,25);
Memo.Lines.Add(FormatDateTime('"Christmas Day, 2021 is on: " dddd ', D));
D:=EncodeDate(2022,1,1);
Memo.Lines.Add(FormatDateTime('"New Years Day, 2022 is on: " dddd ', D));
end;
</syntaxhighlight>
{{out}}
<pre>
Christmas Day, 2021 is on: Saturday
New Years Day, 2022 is on: Saturday
</pre>
=={{header|Draco}}==
| |||