仕事

ユーザーが入力する日付の曜日名を計算するプログラムまたは関数を作成します。

入出力

入力は文字列ですYYYYMMDD。

入力値の例：

20110617：2011年6月17日
19040229：1904年2月29日
06661225：666年12月25日
00000101：1月1日、0
99991231：9999年12月31日

すべての入力が有効であるとみなすことができます。ゼロ年は有効であることに注意してください。

出力は、間の整数である0と6。各整数は曜日名を表します。この整数のように、どの整数が曜日名を表すかを自由に決定できます

0：月曜日
1：火曜日
2：水曜日
...
6：日曜日

（順番に）またはこれ

0：月曜日
1：水曜日
2：日曜日
...
6：土曜日

（順不同）。

テストケース

曜日出力の入力（この例では[0..6-> Monday..Sunday]が使用されます。）

20110617金曜日4
19500101日曜日6
22220202土曜日5
19000228水曜日2
19000301木曜日3
19450815水曜日2
19040229月曜日0
19040301火曜日1
17760704木曜日3
20000228月曜日0
20000229火曜日1
20000301水曜日2
20121223日曜日6
00000401土曜日5
66660606水曜日2
59161021土曜日5

制限

あなたはしてはならない使用どのように、タイムスタンプまたは日付に関連する機能/クラスの種類を/ ... DateにクラスJava/ JavaScript/ ActionScript、またはgetdateで機能PHP。

現在、多くの人々が使用しているグレゴリオ暦を使用する必要があります。

もちろん、最短のコードが優先されます。2つのコードの長さが同じ場合、最も高い投票数のコードが勝ちます。

（期限：+1投票数が多い（または等しい）コードが5つ以上ある場合。）

ルビー、95 92文字

0：Mondayを使用した単純明快なRuby実装、...

p ((y=(d=gets.to_i)/(k=100)/k-((m=d/k%k)<3?1:0))+y/4-y/k+y/400+"squsptrotqro"[-m].ord+d%k)%7

PHP- 101 97 103 125文字

• 坂本アルゴリズム
• 0 =日曜日

コード

<?php fscanf(STDIN,"%4d%2d%2d",$y,$m,$d);@$a=a032503514624;$y-=$m<3;$z=$y+1;echo($y+$y/4%$z-$y/100%$z+$y/400%$z+$a[$m]+$d)%7;

注意

残念ながら、PHPの動的で弱い型付けのため、各除算操作を明示的にフロアリングしないと、坂本アルゴリズムは正しく機能しません。

C-129

main(y,m,d,s)
{
    scanf("%04d%02d%02d",&y,&m,&d);
    y-=s=86400;
    d+=y+"-addgbegcfadf"[m];
    m>2?y++:0;
    putchar(48+(d+y/4-y/100+y/400+s+s)%7);
}

これは、少なくとも私のシステム（Linux x86）では、除算がゼロに丸める方法を乱用します。

マジック定数には86400、2つの目的があります。

• 曜日に影響を与えることなく、年から減算してマイナスにします。これにより、部門が切り捨てられるのではなく切り上げられるようになります。
• 月曜日が0になるように日数をシフトします。

1日の秒数でもあります。

Javascript、126 123文字

坂本のアルゴリズムを使用して0 =日曜日：

prompt().replace(/(....)(..)(..)/,function(_,y,m,d){y-=m<3;alert((+d+y-~(y/4)+~(y/100)-~(y/400)+ +".621462403513"[+m])%7)})

分裂が崩壊する可能性があると思うが、今は見えない。

編集：部門を改善しました（~~できる場合は必要ありません~）。

Pythonの2、83 116 113 109バイト

坂本のアルゴリズムを実装します。ゴルフの提案を歓迎します。オンラインでお試しください！

編集： 私はこの年齢前に修正する必要がありました。ジョナサンアランの提案から-6バイト+実際にコードを修正するための+2バイト。

def w(s):m=int(s[4:6]);y,d=int(s[:4])-(m<3),int(s[6:]);return(y+y/4-y/100+y/400+int('032503514624'[m-1])+d)%7

Perl-110バイト

perl -p source.plまたはperl -pe 'here-is-code'を使用して実行するソリューションを次に示します。

s/((..)(..))(..)(..)/(1+3*$1+$2-2*($1%4+$2%4)-(2<$4?$4+(1&$4&&4-(8&$4)):(2^$4)+(!($3%4)-!-$3+!($2%4)))+$5)%7/e

テストケースをコピーして標準入力に貼り付けます。

これは、変数、文字列定数、および除算のない唯一のコードのようです。

JavaScript（ES6）、73バイト（非競合）

d=>(w=new Date(d[s="slice"](0,4),d[s](4,6)-1,d[s](-2)).getDay())-(w?1:-6)

それを試してみてください

f=
d=>(w=new Date(d[s="slice"](0,4),d[s](4,6)-1,d[s](-2)).getDay())-(w?1:-6)
o.innerText=f(i.value="59161021")
oninput=_=>i.value.length==8&&(o.innerText=f(i.value))

<input id=i type=number><pre id=o>