¦WΘ1š-1šVтFY`2ô0Kθ4ÖUD2Qi\28X+ë<7%É31α}‹iY¬>0ëY1¾ǝDÅsD12‹i>1ë\1Dǝ¤>2}}ǝVY})DJIJk18+£35.£¬.•4ιõ÷‡o‹ƶ¸•2ôs`UÐ3‹12*+>13*5÷s3‹Xα©т%D4÷®т÷©4÷®·()DćsćsO7%._s€нT‰J«7ô»
प्रारूप में इनपुट [day, month, year]। प्रमुख के साथ आउटपुट 0एकल अंक दिनों के लिए है, और लोअरकेस moके माध्यम से su(यदि titlecase अनिवार्य है +1 बाइट जोड़ा जा सकता है)।
इसे ऑनलाइन आज़माएं या सभी परीक्षण मामलों को सत्यापित करें ।
पवित्र बकवास .. यह सबसे लंबे समय तक 05AB1E उत्तर के लिए मेरा नया रिकॉर्ड हो सकता है, और फिर मैंने कुछ बहुत ही जटिल अस्की -कला चुनौतियों को शामिल किया है ... >>> संपादित करें: हम्म ठीक है, लगभग ..; पी
महत्वपूर्ण नोट: 05AB1E में दिनांक वस्तुओं या गणनाओं के लिए कोई भी भवन नहीं है। आज की तारीखों के संबंध में एकमात्र बिलिन आज का वर्ष / महीना / दिन / घंटा / मिनट / सेकंड / माइक्रोसेकंड है।
तो इस वजह से, आपके द्वारा देखे जाने वाले लगभग सभी कोड पिछले और अगले दिनों की गणना के लिए मैनुअल गणना हैं (वर्षों में संक्रमण को ध्यान में रखते हुए और लीप वर्षों को ध्यान में रखते हुए), और ज़ेलर की बधाई का उपयोग करके सप्ताह के दिन की गणना करें ।
कोड के विशाल भागों को मेरा पहले के 05AB1E उत्तर से कॉपी किया जाता है , जो नीचे दिए गए स्पष्टीकरण के लिए भी प्रासंगिक होगा।
स्पष्टीकरण:
हम पिछले महीने के पहले दिन पर जाकर शुरू करते हैं:
¦ # Remove the first item (the days) from the (implicit) input
W # Get the minimum (without popping the list itself)
# (since the year is guaranteed to be above 1599, this is the month)
Θ # Check if its exactly 1 (1 if 1, 0 if in the range [2,31])
1š # Prepend a 1 as list (so we now have either [1,1] or [1,0]
- # Subtract this from the month and year
1š # And prepend a 1 for the day
V # Pop and store this first day of the previous month in variable `Y`
फिर मैं उस तारीख को स्टार्ट डेट के रूप में उपयोग करता हूं, और अगले 100 दिनों की गणना करता हूं:
тF # Loop 100 times:
Y`2ô0Kθ4ÖUD2Qi\28X+ë<7%É31α}‹iY¬>0ëY1¾ǝDÅsD12‹i>1ë\1Dǝ¤>2}}ǝV
# Calculate the next day in line
# (see the linked challenge above for a detailed explanation of this)
Y # And leave it on the stack
}) # After the loop: wrap the entire stack into a list, which contains our 100 days
फिर, इनपुट-तिथि के साथ मध्य के रूप में, मैं केवल 17 से पहले छोड़ देता हूं और उस सूची से इनपुट-दिनांक के बाद 17:
DJ # Duplicate the 100 dates, and join the day/month/year together to strings
IJ # Push the input, also joined together
k # Get the 0-based index of the input in this list
# (the joins are necessary, because indexing doesn't work for 2D lists)
18+ # Add 18 to this index (18 instead of 17, because the index is 0-based)
£ # Only leave the first index+18 items from the 100 dates
35.£ # Then only leave the last 35 items
अब हमारे पास अपने 35 दिन हैं। अगला चरण सप्ताह के दिन की गणना करना है, और आउटपुट-टेबल का हेडर बनाना है:
¬ # Get the first date of the list (without popping the list itself)
.•4ιõ÷‡o‹ƶ¸• # Push compressed string "sasumotuwethfr"
2ô # Split it into chunks of size 2
s # Swap to get the first date again
`UÐ3‹12*+>13*5÷s3‹Xα©т%D4÷®т÷©4÷®·()DćsćsO7%
# Calculate the day of the week (sa=0; su=1; ...; fr=6)
# (see the linked challenge above for a detailed explanation of this)
._ # Rotate the list of strings that many times
मेरा यह 05AB1E टिप देखें (अनुभाग संपीड़ित तार शब्दकोश का हिस्सा नहीं कैसे? ) को समझने के लिए क्यों .•4ιõ÷‡o‹ƶ¸•है "sasumotuwethfr"।
फिर हम अपनी पहले की बनाई गई सूची के आधार पर तालिका को भरने के लिए दिन बनाते हैं। हम हेडर के साथ एक साथ विलय करेंगे। जिसके बाद हम अंतिम परिणाम प्रिंट कर सकते हैं:
s # Swap to get the list of dates again
€н # Only leave the first item of each date (the days)
T‰ # Take the divmod 10 of each
J # Join those divmod results together
# (we now have leading 0s for single-digit days)
« # Merge this list together with the header list
7ô # Split it into chunks of size 7
» # Join each inner list by spaces, and then each string by newlines
# (and output the result implicitly)
