Hari dalam seminggu dan bulan dalam setahun tampaknya mendapat banyak perhatian tetapi tampaknya tidak ada yang peduli dengan minggu dalam setahun. Saya percaya ini saatnya untuk mengubahnya, jadi tugas Anda adalah menulis program atau fungsi yang ketika diberi tanggal menghasilkan bilangan bulat antara 1 dan 53 yang sesuai dengan minggu berjalan tahun ini.

Untuk keperluan tantangan ini, kita akan mengatakan bahwa hari Minggu pertama tahun itu menandai awal tahun sehingga satu - satunya kasus ketika 1 Januari dianggap sebagai minggu 1 adalah ketika jatuh pada hari Minggu.

• Input dapat berupa format tanggal apa pun yang tidak secara eksplisit menyertakan nomor minggu (cukup cantumkan format dalam jawaban Anda) untuk tanggal antara 1JAN1900dan 31DEC2100.
• Output adalah bilangan bulat antara 1 dan 53
• Anda dapat menggunakan metode standar apa pun untuk menyediakan input / output.

Uji Kasus

17MAY2017 -> 20

3JAN2013 -> 53

1JAN2017 -> 1

17MAY1901 -> 19

31DEC2100 -> 52

7JUL2015 -> 27

• Ini adalah kode-golf sehingga semua aturan standar golf berlaku, dan kode terpendek (dalam byte) menang.

Ohm , 12 33 byte

EDIT : Memperbaiki kasing tepi untuk "% U".

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

Asumsikan input bisa berupa cap waktu. Penjelasan yang akan datang.

Cobalah online!

MATL , 50 byte

Terima kasih kepada @Neil dan @NickClifford karena menunjukkan kesalahan, sekarang diperbaiki

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

Cobalah online! Atau verifikasi semua kasus uji .

Penjelasan

Ini menggunakan tiga fungsi konversi tanggal / waktu yang ada di MATL:

• XO: mengonversi tanggal dan waktu ke format string;
• YO: mengonversi tanggal dan waktu ke nomor tanggal seri;
• ZO: konversi tanggal dan waktu ke vektor komponen.

Menentukan apakah minggu "0" harus menjadi 52 atau 53 itu mahal, karena MATL tidak dapat mendefinisikan fungsi yang dapat dipanggil untuk menggunakan kembali 8XO!s310=sbagian itu. Menggunakan kembali dengan cara loop dengan cabang hanya menghemat satu byte , dan menyulitkan penjelasan, jadi mungkin tidak sepadan.

Juga, sesuatu dapat diperoleh dengan memasukkan tanggal sebagai array [tahun, bulan, hari]; tetapi saya tidak akan menggunakan ketiga fungsi tanggal :-)

Pertimbangkan input '17MAY2017'sebagai contoh.

       % 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 byte

Mengambil input sebagai (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 byte

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>

Bekerja dengan menemukan hari pertama dalam minggu yang berisi tanggal yang diberikan, kemudian menemukan nomor minggu hari itu (yang tidak pernah nol).

Python 2, 70 64 byte

Input => (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 byte, terima kasih kepada @ovs

JavaScript (Hanya Firefox), 77 byte

Mengambil tanggal sebagai string: mis Jan 1, 2017

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

PHP, 125 Bytes

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;

Cobalah online!

PHP, 28 Bytes

Versi untuk Senin, bukan Minggu

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

Cobalah online!

C #, 138 123 121 byte

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

Ternyata ada built-in untuk itu, meskipun agak besar ...

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

Powershell, 260 + 8 = 268 byte

+8 byte karena -DateTimebendera

Terima argumen sebagai "day month year"format.

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

Bukan ahli Powershell, tidak bisa bermain golf

Kasus cobaan

>W -DateTime "11 March 2015"
11