Day of the week of Christmas and New Year: Difference between revisions

{{trans|Python}}

V thisXMas = Time(2021, 12, 25)

V thisXMasDay = Int(thisXMas.strftime(‘%w’))

V nextNewYearDay = Int(nextNewYear.strftime(‘%w’))

V nextNewYearDayAsString = weekDays[nextNewYearDay]

{{out}}

=={{header|Ada}}==

with Ada.Calendar.Formatting;

Info (Christmas_Day);

Info (New_Years_Day);

{{out}}

<pre>

=={{header|ALGOL W}}==

Re-using code from the [[Day of the week]] task.

string(10) array dayName( 0 :: 6 );

integer procedure Day_of_week ( integer value d, m, y );

write( "25th of December 2021 is a ", dayName( Day_of_week( 25, 12, 2021 ) ) );

write( " 1st of January 2022 is a ", dayName( Day_of_week( 1, 1, 2022 ) ) )

{{out}}

<pre>

=={{header|AutoHotkey}}==

FormatTime, newYear , 20220101, dddd

{{out}}

<pre>Christmas Day, 2021 : Saturday

=={{header|AWK}}==

# syntax: GAWK -f WHAT_WEEKDAYS_WILL_CHRISTMAS_AND_NEW_YEAR.AWK

BEGIN {

exit(0)

}

{{out}}

<pre>

=={{header|BASIC}}==

20 DIM D$(6)

30 FOR I=0 TO 6: READ D$(I): NEXT

130 DATA Saturday,Sunday,Monday,Tuesday,Wednesday,Thursday,Friday

140 DATA 2021,12,25

{{out}}

<pre>12/25/2021 is a Saturday

=={{header|BCPL}}==

let dayofweek(y,m,d) = valof

$( show(2021,12,25)

show(2022,1,1)

{{out}}

<pre>12/25/2021 is a Saturday

=={{header|C}}==

#include <stdio.h>

#include <time.h>

}

return 0;

{{out}}

<pre>2021-12-25 is a Saturday

=={{header|CLU}}==

own days: array[string] := array[string]$

[0:"Saturday", "Sunday", "Monday", "Tuesday",

stream$putl(po, date$unparse_date(d) || " is a " || day_of_week(d))

end

{{out}}

<pre>25 December 2021 is a Saturday

=={{header|COBOL}}==

PROGRAM-ID. XMASNY.

MULTIPLY 7 BY D7.

COMPUTE D = D - D7 + 1.

{{out}}

<pre>25/12/2021 is a Saturday

=={{header|Cowgol}}==

record Date is

print_nl();

i := i + 1;

{{out}}

<pre>25/12/2021 is a Saturday

=={{header|Draco}}==

word year;

byte month, day

writeln(" is a ", day_name(dates[i]))

od

{{out}}

<pre>12/25/2021 is a Saturday

=={{header|F_Sharp|F#}}==

// Show day of week for Christmas Day, 2021 and New Year's Day, 2022. Nigel Galloway: December 1st., 2021

printfn $"Christmas Day 2021 is a %s{string(System.DateTime(2021,12,25).DayOfWeek)}. New Years Day 2022 is a %s{string(System.DateTime(2022,1,1).DayOfWeek)}."

{{out}}

<pre>

=={{header|Factor}}==

{{works with|Factor|0.99 2021-06-02}}

kernel sequences ;

: .holidays ( seq -- ) [ dup holidays msg printf ] each ;

{{out}}

<pre>

=={{header|FreeBASIC}}==

#include "string.bi" 'contains functions for formatting text strings

print "Christmas Day 2021 is on a "; format(christmas,"dddd")

{{out}}<pre>

Christmas Day 2021 is on a Saturday

=={{header|J}}==

Sat

(weekday 2022 01 01){::;:'Sun Mon Tue Wed Thu Fri Sat'

=={{header|jq}}==

{{works with|jq}}

Years, output format, and output are exactly as for [[#Wren|Wren]].

["Sunday", "Monday","Tuesday", "Wednesday", "Thursday", "Friday", "Saturday"];

1578, 1590, 1642, 1957, 2020, 2021, 2022, 2242, 2245, 2393

{{out}}

As for [[#Wren]]

=={{header|Julia}}==

See also https://docs.julialang.org/en/v1/stdlib/Dates/#Dates.format-Tuple{TimeType,%20AbstractString}

for year in [1578, 1590, 1642, 1957, 2020, 2021, 2022, 2242, 2245, 2393]

" and Christmas: ", Dates.format(DateTime(year, 12, 25), "E, U d, Y"))

end

<pre>

Year 1578, New Years's Day: Sunday, January 1, 1578 and Christmas: Monday, December 25, 1578

=={{header|ooRexx}}==

Call wkd 2021,12,25

Call wkd 2022,01,01

dt=.DateTime~new(y,m,d)

say d'.'m'.'y 'is a' wd[dt~weekday]

<pre>25.12.2021 is a Saturday

01.01.2022 is a Saturday<</pre>

=={{header|Perl}}==

use strict; # https://rosettacode.org/wiki/What_weekdays_will_Christmas_and_New_Year

print "$_->[0] ", qw( Sunday Monday Tuesday Wednesday Thursday Fridat Saturday )

[(localtime timelocal(0, 0, 12, @{$_}[1..3]))[6]], "\n";

{{out}}

<pre>

=={{header|Phix}}==

<span style="color: #008080;">with</span> <span style="color: #008080;">javascript_semantics</span>

<span style="color: #008080;">include</span> <span style="color: #004080;">timedate</span><span style="color: #0000FF;">.</span><span style="color: #000000;">e</span>

<span style="color: #008080;">end</span> <span style="color: #008080;">procedure</span>

<span style="color: #7060A8;">papply</span><span style="color: #0000FF;">({</span><span style="color: #000000;">1578</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">1590</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">1642</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">1957</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">2020</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">2021</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">2022</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">2242</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">2245</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">2393</span><span style="color: #0000FF;">},</span><span style="color: #000000;">nyc</span><span style="color: #0000FF;">)</span>

<small>Note the builtin timedate type does not officially support dates prior to ''1752''... the fact that the first three lines agree with other entries on this page is pure luck.</small>

{{out}}

=={{header|PL/I}}==

day_name: procedure(year,month,day) returns(char(9) varying);

declare days(0:6) char(9) varying;

(F(2),A,F(2),A,F(4),A,A);

end;

{{out}}

<pre>12/25/2021 is a Saturday

=={{header|PL/M}}==

BDOS: PROCEDURE(F,A); DECLARE F BYTE, A ADDRESS; GO TO 5; END BDOS;

EXIT: PROCEDURE; GO TO 0; END EXIT;

END;

CALL EXIT;

{{out}}

<pre>12/25/2021 IS A SATURDAY

=={{header|Python}}==

import datetime

nextNewYearDayAsString = weekDays[nextNewYearDay]

print("Next new year is on a {}".format(nextNewYearDayAsString))

{{out}}

<pre>

<code>dayofweek</code> is defined at [[Day of the week#Quackery]].

$ "Sun" $ "Mon"

$ "Tues" $ "Wednes"

2021 christmas day echo$ cr

{{out}}

=={{header|Raku}}==

.say for (flat 2020..2022, (1500 .. 2500).roll(7)).sort.map: {

"In {$_}, New Years is on a { @d-o-w[Date.new($_, 1, 1).day-of-week % 7] }, " ~

"and Christmas on a { @d-o-w[Date.new($_, 12, 25).day-of-week % 7] }."

{{out|Sample output}}

<pre>In 1578, New Years is on a Sunday, and Christmas on a Monday.

=={{header|Ring}}==

weekdays = ["Mon","Tues","Wednes","Thurs","Fri","Satur","Sun"]

dow = timelist()[15]

func nameof day

{{out}}

<pre>working...

=={{header|Ruby}}==

This uses the same years as the Raku example. The Ruby Date class does however take the calendar reform (default 1582) into account, so the days for 1578 differ from all other languages so far.

years = [1578, 1590, 1642, 1957, 2020, 2021, 2022, 2242, 2245, 2393]

puts "In #{year}, New year's day is on a #{ny}, and Christmas day on #{xmas}."

end

{{out}}

<pre>In 1578, New year's day is on a Wednesday, and Christmas day on Thursday.

The actual days for 1578 may have been different as the Gregorian calendar didn't start until 1582.

var years = [1578, 1590, 1642, 1957, 2020, 2021, 2022, 2242, 2245, 2393]

var xmas = Date.new(year, 12, 25).weekDay

System.print("In %(year), New year's day is on a %(newYear), and Christmas day on %(xmas).")

{{out}}

=={{header|XPL0}}==

int Year, Month, Day; \Works for years 1583 onward

int DayOfWeek, Names;

Text(0, "This New Year's Day is on a ");

Text(0, WeekDay(2022, 1, 1)); CrLf(0);

{{out}}