Друк дати всіх неділь у 2017 році в наступному форматі: dd.mm.yyyy.
Очікуваний вихід:

01.01.2017
08.01.2017
15.01.2017
22.01.2017
29.01.2017
05.02.2017
12.02.2017
19.02.2017
26.02.2017
05.03.2017
12.03.2017
19.03.2017
26.03.2017
02.04.2017
09.04.2017
16.04.2017
23.04.2017
30.04.2017
07.05.2017
14.05.2017
21.05.2017
28.05.2017
04.06.2017
11.06.2017
18.06.2017
25.06.2017
02.07.2017
09.07.2017
16.07.2017
23.07.2017
30.07.2017
06.08.2017
13.08.2017
20.08.2017
27.08.2017
03.09.2017
10.09.2017
17.09.2017
24.09.2017
01.10.2017
08.10.2017
15.10.2017
22.10.2017
29.10.2017
05.11.2017
12.11.2017
19.11.2017
26.11.2017
03.12.2017
10.12.2017
17.12.2017
24.12.2017
31.12.2017

Python 2 , 81 байт

x=0
exec"print'%05.2f.2017'%(x%30.99+1.01);x+=7+'0009ANW'.count(chr(x/7+40));"*53

Спробуйте в Інтернеті!

Немає бібліотек дат, обчислює дати безпосередньо. Основна хитрість - трактувати значення dd.mmяк десяткове значення. Наприклад, 16.04.2017(16 квітня) відповідає номеру 16.04. Номер друкується в форматі xx.xxз .2017додається.

День і місяць обчислюються арифметично. Щотижня додається 7 днів, виконаних як x+=7. Взяття рукоятки xпо модулю 30.99шляхом віднімання, 30.99коли число дня стає занадто великим. Це поєднує -31скидання днів із +0.01збільшенням місяця.

Перехід передбачає, що кожен місяць має 31 день. Місяці з меншим числом днів коригуються, натискаючи xвгору на певні числа тижнів +[8,8,8,17,25,38,47].count(x/7). Цей список складається з числа тижнів, що закінчуються цими короткими місяцями, 8утричі, оскільки лютого на 3 дні не вистачає 31.

Цей список можна стиснути у рядок, приймаючи значення ASCII плюс 40. Зсув +40можна уникнути, використовуючи недруковані символи, і можна отримати доступ до нього коротше як об'єкт байтів у Python 3.

PHP, 48 байт

while($t<53)echo gmdate("d.m.2017
",605e3*$t++);

PHP, 46 байт (для негативних зсувів UTC)

while($t<53)echo date("d.m.2017
",605e3*$t++);

Python 2 , 90 79 байт

-5 байт за допомогою xnor (уникайте підрахунку самих тижнів)
-1 байт завдяки xnor (додайте ще в e за 605000 як 605e3)

from time import*
i=0
exec"print strftime('%d.%m.2017',gmtime(i));i+=605e3;"*53

Спробуйте в Інтернеті!

0секунд з часу епохи - 00:00:00 1 січня 1970 року, що, як і 2017 рік, не було високосним. 605000секунди - 1 тиждень, 3 хвилини, 20 секунд. Якщо додати 52 з цих "тижнів", це не переносить нас після півночі.

Bash + coreutils, 44 байти

seq -f@%f 0 605e3 32e6|date -uf- +%d.%m.2017

при збереженні -uGMT можна зберегти 2 байти

• Завдяки цифрової Trauma точки з -fпараметра Я для dateяких економить 10 байт;
• А використання в 2017 форматної рядку зберігає більше байт, ідея якого від відповіді дається user63956

• @0 є 1970-1-1
• 605000становить один тиждень ( 604800) плюс 200 сек
  • 200 сек. повинні просто працювати, оскільки у році є всього 52 тижні
• @32000000 просто трохи більше року

PowerShell, 51 47

0..52|%{date((date 2017-1-1)+7.*$_)-u %d.%m.%Y}

Досить прямолінійний. 2017-01-01 - це неділя, так це кожні наступні сім днів. Ми можемо зберегти два байти, якщо нам потрібен лише сценарій, який працює у моєму житті:

0..52|%{date((date 17-1-1)+7.*$_)-u %d.%m.%Y}

Excel VBA 106 91 79 байт

Sub p()
For i = #1/1/2017# To #12/31/2017#
If Weekday(i) = 1 Then MsgBox i
Next
End Sub

збережено 15 байт завдяки @Radhato

Якщо припустити, що 1/1/2017 є неділею, це збереже ще 12 байт.

Sub p()
For i = #1/1/2017# To #12/31/2017#
MsgBox i
i = i + 6
Next
End Sub

Дякуємо @Toothbrush 66 байт

Sub p:For i=#1/1/2017# To #12/31/2017#:MsgBox i:i=i+6:Next:End Sub

Редагувати: (Sub та End Sub не потрібні) 52 байти

For i=#1/1/2017# To #12/31/2017#:MsgBox i:i=i+6:Next

PHP, 67 байт

Використовуючи факт, PHP автоматично присвоює значення 1 недекларованим змінним циклу та, використовуючи епохи Linux,

<?php for(;54>$t+=1;)echo date("d.m.Y\n",604800*($t)+1482624000);?>

k6, 32 байти

`0:("."/|"."\)'$2017.01.01+7*!53

Коротке пояснення:

                2017.01.01+7*!53 /add 0, 7, 14, ..., 364 to January 1st
   ("."/|"."\)'$                 /convert to string, turn Y.m.d into d.m.Y
                                 /   split by ".", reverse, join by "."
`0:                              /output to stdout (or stderr), line by line

На жаль, це, здається, працює лише в інтерпретаторі, що працює лише із закритим джерелом.

Пайк , 26 24 байти

53 Fy17y"RVs6)c"%d.%m.%Y

Спробуйте в Інтернеті!

53 F                     - for i in range(53):, printing a newline between each
    y17y"                -  Create a time object with the year 2017. (Month and days are initialised to 1.)
         RV  )           -  Repeat i times:
           s6            -   Add 1 week
              c"%d.%m.%Y -  Format in "dd.mm.yyyy" time

Або 11 байт

Якщо дозволено ігнорувати вихідний формат

y17y"52VDs6

Спробуйте в Інтернеті!

y17y"       - Create a time object with the year 2017. (Month and days are initialised to 1.)
     52V    - Repeat 52 times:
        D   -  Duplicate the old time
         s6 -  Add 1 week

R, 79 67 58 байт

cat(format(seq(as.Date("2017/01/01"),,7,53),"\n%d.%m.%Y"))

Перший січень, будучи неділею, цей фрагмент створює послідовність днів, кожні 7 днів, починаючи з 01-01-2017 по 31-12-2017, відформатує їх у потрібний формат і роздрукує.

Befunge-98 (PyFunge) , 99 95 93 85 байт, Залишає заднім рядком

Усі оптимізації зробив @JoKing завдяки їм

s :1g2/10g\%:d1p10g\`+:b`#@_:1\0d1g#;1+:a/'0+,a%'0+,'.,j;a"7102"4k,d1g7+
>8><><>><><>

Спробуйте в Інтернеті!

Я відчував, що тут ми пропускаємо деяку езостерику, тому я прийняв рішення моєю улюбленою езотеричною мовою.

Пояснення :
>8><><>><><>кодує тривалість 12 місяців
sЗберігати старий день у порожньому просторі.
:1g2/Отримайте значення ASCII з нижнього рядка та розділіть його на два. Це дає нам тривалість заданого місяця. Ex: 8 = 56 в ASCII => 56 / 2 = 28 => Місяць (лютий) має 28 днів
10g\%Отримайте раніше збережений день і модулюйте його за тривалістю місяця, що дозволяє нам перевести дату в наступний місяць
:d1pЗберегти копію нового оновленого дня
10g\`+Тест, якщо стара дата > нова дата => ми перейшли в наступний місяць => додати 1 до місяця лічильника
:b`випробуванню , якщо місяць лічильник> 11 , що означає , що ми досягли кінця року ( з використанням 0 індексації)
#@_на основі попереднього , якщо припинити програму
:1\0d1g Reorder стеки так це виглядає так:Month, 1, Month, 0, Day
#пропустити наступну інструкцію (duh)
1+:a/'0+,a%'0+,'.,Перетворити число на 1 індексацію, надрукувати, додати a .в кінці
j;Використовуйте 0 зі стека, щоб не стрибати, і знову використовуйте ;для переходу до розкладу друку, потім використовуйте 1 для переходу до ;наступного час
a"7102"4k,Друк 2017\n
d1gОтримати знову значення дня 7+Додайте тиждень перед повторенням

JavaScript, 111 106 байт

for(i=14833e8;i<1515e9;i+=605e6)console.log(new Date(i).toJSON().replace(/(....).(..).(..).*/,'$3.$2.$1'))

Примітка. Консоль Stack Exchange недостатньо довга для відображення всього списку, тому ось перша половина як окремий фрагмент:

for(i=14833e8;i<15e11;i+=605e6)console.log(new Date(i).toJSON().replace(/(....).(..).(..).*/,'$3.$2.$1'))

Спеціальний формат коштує мені 40 байт ...

Perl 5 , 64 байти

use POSIX;print strftime"%d.%m.%Y\n",0,0,0,7*$_+1,0,117for 0..52

Спробуйте в Інтернеті!

Дане завдання було 2017 року, а не будь-який рік, тому я твердо кодував:

• 117 (що хибно за 2017 рік, 1900 + 117)
• +1, оскільки 1 січня - неділя 2017 року
• 0..52, оскільки у 2017 році є 53 неділі

POSIX є основним модулем і завжди встановлюється за допомогою Perl5. Робити те ж саме, не використовуючи модулі в 101 байті, видаляючи пробіл:

$$_[5]==117&&printf"%02d.%02d.%d\n",$$_[3],$$_[4]+1,$$_[5]+1900
  for map[gmtime(($_*7+3)*86400)],0..1e4

Рубін, 75 байт

Безпосереднє рішення, щоб визначити дати з Time.

t=Time.new 2017
365.times{puts t.strftime("%d.%m.%Y")if t.sunday?
t+=86400}

SAS, 52 50 байт

Збережено 2 байти завдяки @ user3490.

data;do i=20820to 21184 by 7;put i ddmmyyp10.;end;

Математика 90 84 байт

Досить багатослівний. numbermaniac та Скотт Мілнер зберегли відповідно 5 та 1 байт.

Column[#~DateString~{"Day",".","Month",".","Year"}&/@DayRange["2017","2018",Sunday]]

VBA, 81 байт (можливо 64)

Sub p()
For i = 0 To 52
MsgBox format(42736 + i * 7, "dd.mm.yyyy")
Next i
End Sub

Моє перше повідомлення. Спираючись на рішення newguy, знімаючи чек на будні та просто вказуючи кожні 7-й день. Видалення фініків економить 12 байт. 42736 - 1/1/2017. Формат дати виходу залежить від налаштування системи. Це дозволено? Якщо це так, це 64 байти, тому що вам не потрібен метод форматування .

MsgBox #1/1/2017# + i * 7

AHK , 67 байт

d=20170101
Loop,52{
FormatTime,p,%d%,dd.MM.yyyy
Send,%p%`n
d+=7,d
}

Нічого магічного тут не відбувається. Я намагався знайти коротший засіб, FormatTime але не зміг.

Java 8+, 104 100 99 байт

()->{for(int t=0;t<53;)System.out.printf("%1$td.%1$tm.2017%n",new java.util.Date(t++*604800000L));}

Java 5+, 109 105 104 байт

void f(){for(int t=0;t<53;)System.out.printf("%1$td.%1$tm.2017%n",new java.util.Date(t++*604800000L));}

Використовує можливості дати printf формату.

Перевірте самі!

Економія

1. 104 -> 100: змінив значення циклу та множину.
2. 100 -> 99: гольф петлі

T-SQL, 94 байт

DECLARE @ INT=0,@_ DATETIME='2017'W:SET @+=1SET @_+=7PRINT FORMAT(@_,'dd.MM.yyy')IF @<52GOTO W

якщо вам не подобається SQL GOTO або WHILE, ось CTE з 122 байтами

WITH C AS(SELECT CAST('2017'AS DATETIME)x UNION ALL SELECT x+7FROM C WHERE X<'12-31-17')SELECT FORMAT(x,'dd.MM.yyy')FROM C

Ruby, 60 + 7 = 67 байт

Використовує -rdateпрапор.

(d=Date.new 1).step(d+365,7){|d|puts d.strftime"%d.%m.2017"}

Groovy, 81 77 63 60 56 байт

d=new Date(0);53.times{printf('%td.%<tm.2017%n',d);d+=7}

Вищезазначене може бути запущено як грубий сценарій.

Мій перший запис про гольф з кодом. На щастя, 1970 рік не був високосним, тому можна використовувати його як базу.

Завдяки Деннісу, ось ось: Спробуйте в Інтернеті!

C #, 138 111 102 байт

Збережено ще 9 байт завдяки Йохану дю Тойте !

Збережено 27 байт завдяки пропозиціям Кевіна Круїссена !

()=>{for(int i=0;i<53;)Console.Write(new DateTime(2017,1,1).AddDays(7*i++).ToString("dd.MM.yyyy\n"));}

Анонімна функція, яка друкує всі неділі 2017 року.

Повна програма за допомогою методу unolfolf:

using System;

class P
{
    static void Main()
    {
        Action f =
        ()=>
        {
            for (int i = 0; i < 53; )
                Console.Write(new DateTime(2017, 1, 1).AddDays(7 * i++).ToString("dd.MM.yyyy\n"));
        };



        f();
    }
}

C #, 110 109 байт

using System;()=>{for(int i=42729;i<43100;Console.Write(DateTime.FromOADate(i+=7).ToString("dd.MM.yyy\n")));}

Ви можете насолоджуватися цією програмою онлайн тут

У цьому розчині ми:

• Використовуйте дату автоматизації OLE (OADate), щоб уникнути "AddDay ()" від дати.
  FromOADate()здаються великими, але це дорівнюєnew DateTime(2017,1,1)

• Почніть цикл в останню неділю 2016 року, щоб дозволити нам збільшити +=лише оператор . Цей оператор повертає значення після приросту.

• Збільшення на 7 днів, щоб перейти з неділі на неділю до друку дати.

• Ми зупиняємось, як потрапила остання неділя 2017 року.

• Використовуйте Debugзамість, Consoleщоб зберегти два символи

• Уникайте явного оголошення змінної та призначення

TSQL, 112 105 байт

SELECT CONVERT(VARCHAR,DATEADD(d,number*7,42734),104)FROM master..spt_values WHERE type='p' AND number<53

Демо

T-SQL конвертувати синтаксис

JavaScript (ES6), 123 байти

Це мій перший пост тут, привіт!

a=x=>`0${x}.`.slice(-3);[].map.call('155274263153',(x,i)=>{for(j=0;j<4+(2633>>i&1);j++)console.log(a(+x+j*7)+a(i+1)+2017)})

Це рішення використовує жорстко кодовані дані і розроблено спеціально для 2017 року. Він не покладається на API без дати та часу.

Що стосується цифр у рядку 155274263153, то кожна цифра є своєю цифрою і позначає першу неділю кожного місяця поспіль. Вихід за весь рік можна отримати шляхом послідовного додавання 7 до них.

Що з магічним числом 2633, яке використовується в циклі?
Ну ... 2633(десятковий) - 101001001001у двійковій. Що тепер це може 1означати? Починаючи праворуч, встановлюється 1-й, 4-й, 7-й, 10-й та 12-й біти. Це відповідає місяцям, які мають п'ять неділь, на відміну від тих, у яких лише чотири. Golfed вниз до цього влучним висловом, він спочатку виглядав наступним чином : for(j=0;j<4+ +[0,3,6,9,11].includes(i);j++).

Я здогадуюсь, що решта частин є досить зрозумілими.

T-SQL, 79 77 байт

Після допомоги Сальману А вдосконалити свою відповідь . Я вирішив написати власне за допомогою циклу і PRINT.

Я закінчив це рішення в 90 байт.

DECLARE @d DATETIME=42734 WHILE @d<43100BEGIN PRINT CONVERT(VARCHAR,@d,104)SET @d=@d+7 END

Потім я подивився на поточного лідера в T-SQL, який складав 94 байти від WORNG ALL з цією відповіддю . Цей хлопець знайшов дуже хороші хитрощі.

1. Назвіть лише змінну @
2. Цикл за допомогою GOTOфактичного LOOP
3. Збережіть один символ, використовуючи FORMATзамість CONVERT. (Лише SSMS2012 +)

Використовуючи ці хитрощі, це рішення було приведено до розв'язку, нижче якого - 79 байт.

DECLARE @ DATETIME=42734G:PRINT FORMAT(@,'dd.MM.yyy')SET @+=7IF @<43100GOTO G

Октава , 37 байт

Набагато коротше, ніж усі інші мови для гольфу, і він навіть пов'язаний з Jelly! Шлях до Октави! :)

disp(datestr(367:7:737,'DD.mm.2017'))

Спробуйте в Інтернеті!

На щастя, рік 2 ADвиглядає точно так само, як і рік 2017 AD. Обидва починаються і закінчуються в неділю, і не є високосним. Це економить багато байтів, оскільки 367:7:737це зовсім трохи коротше, ніж 736696:7:737060.

Це перетворює кількість днів з моменту 01.01.0001у рядок у форматі DD.mmіз заднім числом .2017.

Haskell , 133 130 байт

import Data.Time.Calendar
((\[f,g,h,i,j]->i:j:'.':f:g:".2017\n").drop 5.show)=<<take 53(iterate(addDays 7)$fromGregorian 2017 1 1)

Спробуйте в Інтернеті!

Без календарної бібліотеки 148 144 140 байт

(\l->last l!l++length l!l++"2017\n").fst.span(>0).(<$>scanl((+).(+28))0[3,0,3,2,3,2,3,3,2,3,2]).(-)=<<[1,8..365]
a!_=['0'|a<=9]++show a++"."

Це смішно, оскільки використання оператора для функції padding зберігає два байти, навіть якщо другий аргумент не використовується, оскільки потрібно менше дужок - p(last l)довше, ніж last l!l. Працює, обчислюючи day/monthпари, віднімаючи сукупні дати початку місяця від дня року. Дати початку місяця стискаються як ( scanl((+).(+28))0[3,0,3,2,3,2,3,3,2,3,2]). Число місяця - це кількість позитивних елементів, а число дня - останній позитивний елемент.

Спробуйте в Інтернеті!

C #, 116 114 113 байт

for(long i=(long)636188256e9;i<636502857e9;i+=(long)605e10)Out.Write(‌​new DateTime(i).ToString("dd.MM.yyyy\n"));

Можна запускати в інтерактивних вікнах Visual Studio (або будь-який інший C # REPL на базі Roslyn)

Внизу до 113 байтів: завдяки Кевіну Крейсейну.