टीआई-बेसिक (ओएस 5.2+ के साथ टीआई -84 प्लस सीई), 64 बाइट्स
getDate
"It's "+toString(Ans(1))+" already, folks, go home.
TI-Basic एक टोकन भाषा है। कुछ कमांड ( getDate
और toString(
, आदि), और सभी लोअरकेस अक्षर दो-बाइट्स हैं और यहां इस्तेमाल होने वाली हर चीज एक-एक बाइट है।
स्पष्टीकरण:
getDate # 3, store {Y,M,D} in Ans
"It's "+toString(Ans(1))+" already, folks, go home. # 61, implicitly return required string with Y from getDate
टीआई-बेसिक (ओएस 5.1 के साथ टीआई -84 प्लस सीई), 108 बाइट्स
{0,1→L1
getDate
Ans(1)L1→L2
LinReg(ax+b) Y1
Equ►String(Y1,Str0
sub(Str0,1,length(Str0)-3→Str0
"It's "+Str0+" already, folks, go home.
TI-Basic एक टोकन भाषा है। अधिक जटिल उपयोगकर्ता चर ( , , , ), कुछ आदेश ( , , , , ), और सभी छोटे अक्षरों दो बाइट्स और सब कुछ किसी और यहां इस्तेमाल प्रत्येक बाइट से एक है कर रहे हैं।Y1
L1
L2
Str0
LinReg(ax+b
getDate
sub(
Equ►String(
length(
OS 5.2 ने एक toString(
कमांड जोड़ा , जो इस सबमिशन के लगभग आधे हिस्से को अवलोकित करता है, जो इस एल्गोरिथ्म पर आधारित है ।
स्पष्टीकरण:
{0,1→L1 # 8 bytes
getDate # 3 bytes, store {Y,M,D} list in Ans
Ans(1)L1→L2 # 10 bytes, multiply L1 by the year and store in L2
LinReg(ax+b) Y1 # 5 bytes, take a linear regression of the points specified by each pair of corresponding coordinates in L1 and L2 and store it in Y1
Equ►String(Y1,Str0 # 8 bytes, convert Y1 to a string
sub(Str0,1,length(Str0)-3→Str0 # 18 bytes, remove the "X+0" from LinReg
"It's "+Str0+" already, folks, go home. # 56 bytes, implicitly return the required output