曜日と月は注目を集めているようですが、誰もその週を気にしていないようです。私はそれを変更する時だと思います。したがって、あなたの仕事は、日付が与えられたときに、その年の現在の週に対応する1〜53の整数を出力するプログラムまたは関数を書くことです。

この課題では、年の最初の日曜日が年の初めを表すと言うので、1月1日が第1週と見なされるのは、日曜日になる場合のみです。

• 入力は、明示的に間の日付の週番号を（ちょうどあなたの答えにフォーマットを指定）を含まない任意の日付フォーマットすることができ1JAN1900、および31DEC2100。
• 出力は1〜53の整数です
• 入力/出力を提供する標準的な方法を使用できます。

テストケース

17MAY2017 -> 20

3JAN2013 -> 53

1JAN2017 -> 1

17MAY1901 -> 19

31DEC2100 -> 52

7JUL2015 -> 27

• これはコードゴルフなので、すべての標準ゴルフ規則が適用され、最短コード（バイト単位）が優先されます。

オーム、12 33バイト

編集：「％U」のエッジケースを修正しました。

IΩDÖ?┼╓y≤s"-12-31"C"%F"╓₧Ω
"%U"╓&

入力はタイムスタンプであると仮定します。来る説明。

オンラインでお試しください！

MATL、50バイト

間違いを指摘してくれた@Neilと@NickCliffordに感謝、現在修正済み

ZO1)TThXJYOXIGYO&:8XO!s310=sJ4B-YOIq&:8XO!s310=sX\

オンラインでお試しください！または、すべてのテストケースを確認します。

説明

これは、MATLにある3つの日付/時刻変換関数を使用します。

• XO：日付と時刻を文字列形式に変換します。
• YO：日付と時刻をシリアル日付番号に変換します。
• ZO：日付と時刻をコンポーネントのベクトルに変換します。

MATLは8XO!s310=sパーツを再利用するための呼び出し可能な関数を定義できないため、週「0」が52または53になるかどうかを判断するのはコストがかかりました。分岐のあるループによって再利用すると、1バイトしか節約できず、説明が複雑になるため、おそらく価値はありません。

また、[年、月、日]配列として日付を入力すると、何かが得られる可能性があります。しかし、私は3つすべての日付関数を使用しません:-)

入力'17MAY2017'を例として考えます。

       % Implicit input
       % STACK: '17MAY2017'
ZO     % Convert to date vector
       % STACK: [2017 5 17]
1)     % Get first entry: year
       % STACK: 2017
TTh    % Append [1 1]
       % STACK: [2017 1 1]
XJ     % Copy to clipboard J
YO     % Convert to date number
       % STACK: 736696
XI     % Copy to clipboard I
GYO    % Push input again. Convert to date number
       % STACK: [736696 736832]
&:     % Binary range
       % STACK: [736696 736697 736698 ... 736832]
8XO    % Convert to date string with format 'ddd': day of week
       % STACK: ['Sun'; 'Mon'; 'Tue'; ... ; 'Wed']
!s     % Sum of each row (chars are interpreted as code points)
       % STACK: [310 298 302 ...  288]
310=   % Compare with 310 (sum of 'Sun')
       % STACK: [1 0 0 ... 0]
s      % Sum of array. If is 0, it needs to be transformed into 52 or 53,
       % depending on the number of Sundays the previous year contains.
       % STACK: 20
J      % Paste from clipboard J
       % STACK: 20, [2017 1 1]
4B-    % Push [1 0 0] and subtract element-wise
       % STACK: 20, [2016 1 1]
YO     % COnvert to date number
       % STACK: 20, 736330
I      % Paste from clipboard I
       % STACK: 20, 736330, 736696
q      % Subtract 1
       % STACK: 20, 736330, 736695
&:     % Binary range
       % STACK: 20, [736330 736331 736332 ... 736695]
8XO    % Convert to date string with format 'ddd': day of week
       % STACK: 20, ['Fri'; 'Sat'; 'Sun'; ... ; 'Sat']
!s     % Sum of each row (chars are interpreted as code points)
       % STACK: 20, [289 296 310 ... 296]
310=   % Compare with 310 (sum of 'Sun')
       % STACK: 20, [0 0 1 ... 0]
s      % Sum of array
       % STACK: 20, 52
X\     % 1-based modulo
       % STACK: 20
       % Implicit display

JavaScript（ES6）、82 80バイト

入力をとして受け取ります(year,month,day)。

let f =

(y,m,d)=>-~((((x=new Date(y,m-1,d))-new Date(y,0,1))/864e5+372-x.getDay())/7%53)

console.log(f(2017, 5,17)) // 20
console.log(f(2013, 1, 3)) // 53
console.log(f(2017, 1, 1)) // 1
console.log(f(1901, 5,17)) // 19
console.log(f(2100,12,31)) // 52
console.log(f(2015, 7, 7)) // 27

JavaScript（Firefox 34以降）、70バイト

with(new Date())y.value=getFullYear(),m.value=getMonth()+1,d.value=getDate()+1
f=
(y,m,d)=>new Date(y,--m,d-new Date(y,m,d).getDay()).toLocaleFormat`%U`

<div oninput=w.value=f(y.value,m.value,d.value)><input id=y type=number><input id=m type=number min=1 max=12><input id=d type=number min=1 max=31><input id=w readonly placeholder=Output>

指定された日付を含む週の最初の日を見つけ、その日の週番号（ゼロになることはありません）を見つけます。

パイソン2、70の、64バイト

入力=> (year,month,day)

from datetime import*;lambda*v:int(date(*v).strftime('%U'))or 53

print(f(2017, 5,17)) #20
print(f(2013, 1, 3)) #53
print(f(2017, 1, 1)) #1
print(f(1901, 5,17)) #19
print(f(2100,12,31)) #52
print(f(2015, 7, 7)) #27

-6バイト、@ ovsのおかげ

JavaScript（Firefoxのみ）、77バイト

文字列として日付を取ります：ie Jan 1, 2017

s=>+new Date(s)[k='toLocaleFormat']`%U`||new Date(s.slice(-4)-1,11,31)[k]`%U`

PHP、125バイト

for($w=53,$a=0;($c=date_create)($argn)>=$n=date_modify($c("07JAN1900"),"+$a week");$a++)$w=date_format($n,z)<7?1:$w+1;echo$w;

オンラインでお試しください！

PHP、28バイト

日曜日ではなく月曜日のバージョン

<?=date(W,strtotime($argn));

オンラインでお試しください！

C＃、138 123 121バイト

namespace System.Globalization{d=>CultureInfo.CurrentCulture.Calendar.GetWeekOfYear(d,(CalendarWeekRule)1,(DayOfWeek)0);}

そのために組み込まれていることがわかりましたが、それはかなり大きいです...

namespace System.Globalization
{
    Func<DateTime, int> f = d =>
        CultureInfo.CurrentCulture.Calendar.GetWeekOfYear(d, (CalendarWeekRule)1, (DayOfWeek)0);
 }

Powershell、260 + 8 = 268バイト

-DateTimeフラグのため+8バイト

引数を"day month year"フォーマットとして受け入れます。

function W([datetime]$DateTime = (Get-Date)) {
$cultureInfo = [System.Globalization.CultureInfo]::CurrentCulture
$cultureInfo.Calendar.GetWeekOfYear($DateTime,$cultureInfo.DateTimeFormat.CalendarWeekRule,$cultureInfo.DateTimeFormat.FirstDayOfWeek)
}

Powershellのエキスパートではなく、ゴルフはできません

テストケース

>W -DateTime "11 March 2015"
11