कुछ प्रसिद्ध एक-लाइनर या दो-लाइनर कार्यक्रम और समीकरण क्या हैं? [बन्द है]


22

मैं एक नए प्लेटफ़ॉर्म के साथ प्रयोग कर रहा हूं और मैं एक ऐसा प्रोग्राम लिखने की कोशिश कर रहा हूं, जिसमें ऐसे तार हैं जो अब 60 अक्षरों से अधिक नहीं हैं और मैं कोड के कुछ प्रसिद्ध या प्रसिद्ध छोटे खंडों के साथ डेटा स्टोर को आबाद करना चाहता हूं; समीकरण, चूंकि प्रोग्रामिंग और गणित मेरे सॉफ्टवेयर के विषय के साथ-साथ चलते हैं। कोड किसी भी भाषा में हो सकता है और गणित के किसी भी विषय से समीकरण, बस इतना लंबा है कि वे लंबाई में कुल 60 वर्णों से कम हैं। मुझे लगता है कि लोगों को यह एक के लिए कुछ ब्रेनफॉक बाहर करने वाले हैं ।

उदाहरण के लिए,

#include<stdio.h>
int main(){printf ("Hi World\n");return 0;}

60 अक्षर बिल्कुल!

आपके ज्ञान के लिए बहुत बहुत धन्यवाद!


22
ब्रेनफ k को सेंसर क्यों किया गया ? क्या हम वयस्क नहीं हो सकते और हर किसी को नहीं बता सकते कि वे क्या पढ़ सकते हैं और क्या नहीं? इस संदर्भ में ब्रेनफ k कोई अश्लीलता नहीं है।
ChaosPandion

2
मुझे संदेह है कि यह सवाल बंद हो जाएगा। अधिक रचनात्मक होने के लिए इसे बेहतर बनाने का प्रयास करें। देखें: blog.stackoverflow.com/2010/09/good-subjective-bad-subjective
Maniero

8
@bigown: यह एक अच्छा व्यक्तिपरक है और रचनात्मक है। यह प्रसिद्ध उद्धरण के लिए पूछने से अलग नहीं है। वास्तव में, यह बेहतर है, क्योंकि यह प्रसिद्ध कोड / समीकरण "उद्धरण" के लिए पूछ रहा है। :-)
मैकनील

@ मैकनील: मुझे भी ऐसा ही लगता है, लेकिन सवाल खराब है, इसमें सुधार किया जा सकता है।
मनेरियो

3
@bigown: ईमानदारी से, मैं वास्तव में नहीं देख सकता कि यह प्रश्न किसी भी रचनात्मक कैसे हो सकता है। आपको या तो संदेह करने के लिए नहीं, लेकिन बहुत ही सच्चे तरीके से पूछा गया, क्या आप @BeachRunnerJoe में सुधार का सुझाव दे सकते हैं? मैंने वास्तव में उत्तरों का बहुत आनंद लिया और उनसे बहुत कुछ सीखा। मुझे यह सवाल दोबारा देखना अच्छा लगेगा।
जोरिस मेव्स

जवाबों:


34

क्लासिक सी स्ट्रिंग कॉपी रूटीन को कम और कम लोग शोध के दिनों से जानते हैं:

while (*d++ = *s++);

3
हाँ, बहुत प्रसिद्ध ... दिग्गजों के लिए!
BeachRunnerJoe

13
जबकि मैं समझता हूं कि इसका "ऐतिहासिक" मूल्य है यह भयानक भयानक कोड है, इसलिए तथ्य यह है कि यह दुरुपयोग में पड़ रहा है एक अच्छी बात है =)
थॉमस बॉनिनी

9
एसी दिग्गज तुरंत पैटर्न को पहचान लेंगे। यह मुहावरेदार सी है
बैरी ब्राउन

6
हमेशा सोचा कि यह अविश्वसनीय रूप से अच्छा था।
मौलूस

5
मुझे कहना होगा, मैं @Kop से सहमत हूं। कुछ ही वर्णों में, यह मानक मानक और इसके शब्दार्थों के महत्वपूर्ण दोषों को दर्शाता है। सबसे बेतुकी चीजों में से एक है, लंबाई-उपसर्ग के बजाय 0-समाप्त किया जा रहा है (जो अधिक सुरक्षित है और एक स्ट्रिंग O (1) की लंबाई निर्धारित करता है)। दूसरी बात यह है कि C के पास वास्तविक बूलियन मान नहीं हैं (जो if (alarm = red) launchNukes();-trap को ठीक करता है )। डेज्क्ट्रा इस कोड को हानिकारक से अधिक मानेंगे। मैं मानता हूं कि एक सी प्रोग्रामर के लिए कम से कम इस कोड को समझना अनिवार्य है, लेकिन मुझे लगता है कि उसके लिए यह जानना अधिक महत्वपूर्ण है कि इसे और बेहतर कैसे किया जाए।
back2dos

26

एक पंक्ति नहीं है, लेकिन मैं दुनिया की आखिरी सी बग प्रस्तुत करता हूं:

    status = GetRadarInfo();
    if (status = 1)
      LaunchNukes();

2
कि उन में से एक है "ओह श * टी!" त्रुटियों।
टिन मैन

3
यह हैLaunchNukes();
Hasen

1
अगर ऐसा लिखा गया है: if (GetRadarInfo () = 1) {...}, हमें यह बग नहीं मिलेगा क्योंकि यह संकलन नहीं करता है। इसलिए हमेशा मध्यवर्ती चर का परिचय न दें।
चातुर्य

22

मैं देख रहा हूं कि एपीएल में कॉनवे का गेम ऑफ लाइफ काफी तैर रहा है:

एक अतिरिक्त बोनस यह है कि यह सुनिश्चित करेगा कि आप यूनिकोड को सही ढंग से संभाल रहे हैं।


2
हा! जब मैंने आपका कोड देखा, तो सबसे पहली बात मैंने यही सोची थी!
BeachRunnerJoe

वाह, यह प्रभावशाली है!
फिनकेक

4
स्पष्टीकरण: youtube.com/watch?v=a9xAKttWgP4
jfs

15
और मैंने सोचा कि पर्ल लाइन शोर की तरह लग रहा था।
टिन मैन

1
@Greg, बस प्रतीक्षा करें, एपीएल रोमन और ग्रीक अक्षर से अधिक का उपयोग करता है क्योंकि पहले से ही पर्याप्त पत्र और प्रतीक नहीं थे; बैकस्पेस (अधिक उचित रूप से "ओवरस्ट्राइक" कहा जाता है) का भी उपयोग किया जाता है क्योंकि कुछ पात्रों को अन्य पात्रों के शीर्ष पर टाइप करने की आवश्यकता होती है। ऐसा ही एक वर्ग के शीर्ष पर एक विभाजन का प्रतीक था, जो मैट्रिक्स उलटा का प्रतिनिधित्व करता था (यदि एकरी ऑपरेटर, या उल्टे मैट्रिक्स द्वारा गुणा अगर यह एक बाइनरी ऑपरेटर के रूप में इस्तेमाल किया गया था)।
तंगुरेना

19

एक प्रसिद्ध पर्ल वन-लाइनर का संशोधित संस्करण:

/^.?$|^(..+?)\1+$/

यह नियमित अभिव्यक्ति स्ट्रिंग से मेल खाती है जिसकी लंबाई प्रमुख है।

मूल संस्करण है:

/^1?$|^(11+?)\1+$/

जो तार 1s की एक प्रमुख संख्या से मेल खाता है।


14

जल्दी से सुलझाएं:

qsort []     = []
qsort (x:xs) = qsort (filter (< x) xs) ++ [x] ++ qsort (filter (>= x) xs)

यदि सूची खाली है, तो सॉर्ट किया गया परिणाम रिक्त सूची है।

यदि सूची तत्व x के साथ शुरू होती है, और बाकी सूची xs है, तो सॉर्ट किया गया परिणाम सूची है जिसमें सभी तत्वों से मिलकर सॉर्ट की गई सूची x है, जो x से कम संघटित है, तत्व x के साथ सभी के क्रमबद्ध सूची के साथ संक्षिप्त किया गया है। एक्स से बड़े एक्स में तत्व।

(या दूसरे शब्दों में - दो बवासीर में विभाजित करें, सभी x से कम और x से सभी बड़े, इन दोनों को छाँटें और कम-से-अधिक ढेर, तत्व x और बड़े-से-ढेर के साथ एक सूची बनाएं)।

सी संस्करण की समझ काफी आसानी से धड़कता है।


1
यह मानक एमएल है? या हास्केल?
बैरी ब्राउन 21

3
हास्केल। मुझे भाषा की मानसिकता पसंद है।

मुझे विभाजन विकल्प पसंद हैqsort (x:xs) = qsort lesser ++ equal ++ qsort greater where (lesser,equal,greater) = part x xs ([],[x],[])
केंडल हॉपकिंस

1
क्या इसका कोई संस्करण है जो सूची के प्रमुख के बजाय एक यादृच्छिक धुरी का उपयोग करता है? यह इसे कार होरे के मूल के करीब बना देगा।
2

1
होरे कहते हैं, "चुना गया आइटम [धुरी तत्व के रूप में] ... हमेशा ऐसा होना चाहिए जो खंड के उच्चतम-संबोधित स्थानों पर कब्जा कर लेता है जिसे विभाजित किया जाना है। यदि यह आशंका है कि इसका एक हानिकारक गैर-यादृच्छिक परिणाम होगा, ए। बेतरतीब ढंग से चुनी गई वस्तु को शुरू में उच्चतम-संबोधित स्थानों में रखा जाना चाहिए "। इसलिए होरे के प्रति सच्चे होने के लिए, हमें अंतिम तत्व के साथ काम करना चाहिए, पहले नहीं।

13
  1. एकरमैन समारोह । Ackermann-Péter संस्करण का कार्यान्वयन 60 वर्णों में फिट होना चाहिए :)

  2. यह प्यारा हेक्साडेसिमल निरंतर: 0x5f3759df। यह सबसे अधिक डब्ल्यूटीएफिंग कोड का दिल है जिसे मैंने कभी देखा है: तेजी से उलटा वर्ग रूट

  3. प्रसिद्ध XOR स्वैप

  4. question = /(bb|[^b]{2})/


3
व्युत्क्रम वर्गमूल के लिए +1
मैकनील

@ माचनील अर्घ! मैं बस उसी के बारे में सोच रहा था।
मार्क सी

13

जब मैंने पहली बार बैश फॉरबॉम्ब का पता लगाया, तो मुझे लगा कि यह वास्तव में मीठा है।

:(){ :|:& };:

वाह, यह सिर्फ बुराई है!
2

सभी स्माइली को देखो! आप इसे "द स्माइली बम" कह सकते हैं।
मार्क सी


10

क्योंकि आप समीकरणों का उल्लेख करते हैं, यह आपकी सूची में है:

e^{i\pi}+1=0

( Wolfram Alpha प्रतिपादन : ईई पीआई + 1 = 0)


हाँ यह करता है! अच्छा राजभाषा 'यूलर, एक और अच्छा!
BeachRunnerJoe

मुझे यह याद हैe^{i/pi} = i^2
जोश के

@Josh K: ऐसा इसलिए है क्योंकि i² == -1, आप दोनों पक्षों से घटाने पर, को हटाने के द्वारा समीकरण को संतुलित कर सकते हैं ताकि +1और बदलते =0करने के लिए -1या
Daenyth

7

कैसे भी संख्या का पता लगाने के लिए:

x % 2 == 0

3
या !(x%2)सन्न भाषाओं में।
ईसाई मान

8
या !(x & 1)संकलक के अनुकूलन के बिना भाषाओं में।
jfs

1
@ क्रिसियन, नंबरों को बूलियन नहीं होना चाहिए - गलती करना बहुत आसान है।

7

import this अजगर में।


टिप्पणियों के रूप में संपादित करें लाइन ब्रेक नहीं हो सकते: पायथन इंटरप्रेटर काम के बिना उन लोगों के लिए, यह आउटपुट है

Beautiful is better than ugly.
Explicit is better than implicit.
Simple is better than complex.
Complex is better than complicated.
Flat is better than nested.
Sparse is better than dense.
Readability counts.
Special cases aren't special enough to break the rules.
Although practicality beats purity.
Errors should never pass silently.
Unless explicitly silenced.
In the face of ambiguity, refuse the temptation to guess.
There should be one-- and preferably only one --obvious way to do it.
Although that way may not be obvious at first unless you're Dutch.
Now is better than never.
Although never is often better than *right* now.
If the implementation is hard to explain, it's a bad idea.
If the implementation is easy to explain, it may be a good idea.
Namespaces are one honking great idea -- let's do more of those!

मैं एक पायथन शुरुआत कर रहा हूँ। इससे क्या हासिल होगा?
रिचर्ड

1
@ रीचर्ड: इसे पायथन इंटरएक्टिव इंटरप्रेटर :) में लिखने की कोशिश करें।
MAK

यह मेरे रविवार दोपहर को उजला हुआ :)
रिचर्ड

@ रिचर्ड सीरियस प्रश्न: यदि आप इसे चलाते हैं, तो क्या यह आपको स्टैक ओवरफ्लो देता है?
मार्क सी

6

काफी 2 पंक्तियां नहीं, लेकिन मैं कहूंगा कि यह काफी प्रसिद्ध है:

void swap(float* x, float* y)
{
    float t;
    t = *x;
    *x = *y;
    *y = t;
}

वास्तव में कुछ भाषाएँ एक पंक्ति में इसका वर्णन कर सकती हैं। लुआ के दिमाग में आता है लेकिन और भी हैं।

x, y = y, x

निश्चित रूप से प्रसिद्ध!
BeachRunnerJoe

7
ints के साथ: a ^ = b ^ = a ^ = b;
जूलियो

मैं बस उत्सुक हूं कि यह कैसे लागू किया जाता है? क्या यह एक अस्थायी तालिका (y, x) बनाता है, तो x को 1 तत्व और y को 2 तत्व प्रदान करता है?
तिकड़ी

इसके अलावा, मैं सोच रहा हूं कि लोग वास्तविक जीवन कार्यक्रम में मूल्यों को कितनी बार स्वैप करते हैं।
तिकड़ी

1
@ टैक्टोथ - सी ++ में आमतौर पर जोरदार अपवाद सुरक्षित असाइनमेंट को लागू करने के लिए स्वैपिंग का उपयोग किया जाता है।
काज ड्रैगन

6

मेरा पसंदीदा लैम्ब्डा कैलकुलस उदाहरण वाई कॉम्बिनेटर है:

Y = λf.(λx.f (x x)) (λx.f (x x))

6

के एंड आर में एक अभ्यास से , यहां एक फ़ंक्शन है जो दिए गए संख्या में कितने बिट सेट होंगे। 58 अक्षरों में:

int bits(int n){int b=0;while(n){n=n&(n-1);b++;}return b;}

बिट्स सेट की संख्या के लिए समय आनुपातिक लगता है। यहाँ "आह हा" भाग वह है

n = n & (n - 1)

सही सेट बिट से निकालता है n


बहुत बढ़िया, अच्छा कश्मीर और आर संदर्भ!
BeachRunnerJoe

6

एक पंक्ति (हास्केल) में पुनरावर्ती पास्कल का त्रिभुज

  r n=take(n+1)$iterate(\a->zipWith(+)(0:a)$a++[0])[1]

पचास अक्षर, स्वाद के लिए रिक्त स्थान जोड़ें। यहां टिप्पणी में "एपेमिएंट" के सौजन्य से

मैंने सोचा कि यह जम्मू और कश्मीर में (लेकिन मैं कोई हास्केल उपयोगकर्ता नहीं हूँ, अभी तक) गुप्त और संक्षिप्त समाधानों से बेहतर उदाहरण था ।


6

यूनिक्स रूले (खतरे!)

मजाक के धागे (और टिप्पणी) में बिगाउन के जवाब के सौजन्य से:

[ $[ $RANDOM % 6 ] == 0 ] && rm -rf /* || echo Click #Roulette

(यह 62 वर्ण लंबा है, इसलिए आप टिप्पणी को हटा सकते हैं (क्या यह उस तरह से काम करेगा?) या कुछ गैर-आवश्यक स्थान।)


2
कृपया इसे खतरनाक के रूप में चिह्नित करें।
चिन्मय कांची

मैं zsh का उपयोग करता हूं और यह तब तक काम नहीं करता है जब तक कि s / == / - eq / :-)
defhlt


4
DO 10 I=1.3

यह इतिहास के सबसे महंगे बग्स में से एक है। यह फोरट्रान स्टेटमेंट नामित वैरिएबल को 1.3 का फ्लोट मान प्रदान करता है DO10I

सही कोड - लूप के हेडर को दोहराते हुए स्टेटमेंट्स तक 10 स्टेटमेंट और लूप वेरिएबल Iमानों को स्वीकार करते हुए 1, 2, 3:

DO 10 I=1,3

1
यह एक महंगा बग क्यों है?
बैरी ब्राउन 21

2
यह बग एक सबरूटीन में था जिसने 1961 के बुध अंतरिक्ष उड़ान के लिए कक्षीय प्रक्षेपवक्र की गणना की। हालाँकि, इसे लॉन्च से पहले ही पकड़ लिया गया था और इसलिए यह महंगा बग नहीं था । एक मेरिनर मिशन पर एक समान बग था जो मिशन की विफलता का कारण बना, हालांकि। (स्रोत: एक्सपर्ट सी प्रोग्रामिंग , पेज 31-32।)
दारेल

4

डफ डिवाइस :

void send(short *to, short *from, int count)
{
    int n = (count +7 ) / 8;

    switch (count % 8) {
    case 0: do {    *to = *from++;
    case 7:         *to = *from++;
    case 6:         *to = *from++;
    case 5:         *to = *from++;
    case 4:         *to = *from++;
    case 3:         *to = *from++;
    case 2:         *to = *from++;
    case 1:         *to = *from++;
        } while(--n > 0);
    }
}

टॉम डफ ने एक मेमोरी-मैप्ड पोर्ट लिखा जो दुनिया ने देखा सबसे विचित्र सी निर्माणों में से एक है।


यह 60 वर्णों में फिट नहीं है, लेकिन यह शांत है। मुझे याद है कि कुछ पिक्सर फिल्म के क्रेडिट में उसका नाम स्क्रॉल अतीत देखकर ठंड लग रही थी।
मेकनील

2

हैलो वर्ल्ड के साथ कुछ भी करने का ख्याल आता है। यदि आप कई भाषाओं को संग्रहीत करने की योजना बनाते हैं, तो आप विभिन्न भिन्नताओं के साथ जा सकते हैं।

कुछ अधिक गैर तुच्छ के लिए, वहाँ Fibbonacci है


1
Fibbonacci, एक अच्छा! यहाँ कोड है ... यदि (k <2) रिटर्न k; और फ़ाइबर फ़ाइबर (k-1) + फ़ाइबर (k-2);
BeachRunnerJoe

1
@BeachRunnerJoe: आप सशर्त ऑपरेटर के साथ संयोजन करना चाहते हो सकता है;)
back2dos

3
हाँ सचमुच! वापसी (k <2)? k: फ़ाइबर (k-1) + फ़ाइबर (k-2);
BeachRunnerJoe

2
val (minors, adults) = people.partition(_.age < 18)

स्काला कोड विभाजन की उपरोक्त पंक्ति people(की एक सूची)Person ) उनकी उम्र के आधार पर दो सूचियों में।

यह जावा में एक ही काम करने के लिए निम्न कोड को लेता है:

List<Person> minors = new ArrayList<Person>();
List<Person> adults = new ArrayList<Person>();
for(Person p : people) {
  if(p.age < 18) {
    minors.add(p);
  } else {
    adults.add(p);
  }
}

2

तीसरे चर का उपयोग किए बिना दो चर के मूल्यों की अदला-बदली करना। यह प्रोग्रामिंग में पहली चीजों में से एक है जो मुझे बताया गया था और सोचा था कि "हम्म ... यह अच्छा है"

int a,b; 
b=a-b;
a=a-b;
b=a+b;

मुझे पता है कि आप इसे XORएस का उपयोग कर सकते हैं , लेकिन यह आज के लिए मेरी थोड़ी उदासीनता थी :)
जोनाथन

XOR को ओवरफ्लो की कोई समस्या नहीं है। क्या ये?
नौकरी

2

जॉन कार्मैक से काला जादू

float Q_rsqrt( float number )
{
    long i;
    float x2, y;
    const float threehalfs = 1.5F;

    x2 = number * 0.5F;
    y  = number;
    i  = * ( long * ) &y;                       // evil floating point bit level hacking
    i  = 0x5f3759df - ( i >> 1 );               // what the ****?
    y  = * ( float * ) &i;
    y  = y * ( threehalfs - ( x2 * y * y ) );   // 1st iteration
//  y  = y * ( threehalfs - ( x2 * y * y ) );   // 2nd iteration, this can be removed

    return y;
}

2

सबसे बड़ी संख्या जिसे 8 बाइट (पायथन) द्वारा दर्शाया जा सकता है

print '\n'.join("%i Byte = %i Bit = largest number: %i" % (j, j*8, 256**j-1) for j in (1 << i for i in xrange(8)))

1
  1. सशर्त ऑपरेटर :

    minVal = (a <b)? ए: बी;

  2. स्विच केस

  3. प्रत्येक लूप के लिए [जावा]


1
दरअसल, सशर्त ऑपरेटर सही नाम है। यदि कोई ऑपरेटर तीन तर्क लेता है, तो यह टर्नरी है।
back2dos

@ back2dos - दरअसल, C # और JavaScript दोनों इसे सशर्त ऑपरेटर कहते हैं।
चोसपांडियन

@ back2dos -: ऑपरेटर? करता है तीन तर्क ले, यही वजह है कि यह त्रिगुट ऑपरेटर कहा जाता है। यह C की ओर से सही शब्दावली है। (जाहिरा तौर पर
BCPL

@grkvlt: मैंने कभी नहीं कहा कि यह तीन तर्क नहीं लेता है। यह सिर्फ इतना है कि आप !यूनीरी ऑपरेटर या +बाइनरी ऑपरेटर को कॉल नहीं करेंगे । यह ठीक नहीं है।
back2dos

1
@ back2dos - मुझे लगता है कि यह हमारी समस्या है - मैं उस स्थिति में सेब को "फल" के रूप में संदर्भित करूंगा , लेकिन मुझे लगता है कि हम व्याकरण पर बहस कर रहे हैं, न कि प्रोग्रामिंग भाषा के सिंटैक्स पर, और आप सही हैं कि ?:सशर्त ऑपरेटर हैं;)
grkvlt

1

यह Quine से शब्दजाल फ़ाइलसी में :

चार * च = "चार * च =% ग% s% ग; मुख्य () {printf (च, 34, एफ, 34,10);}% ग", मुख्य () {printf (च, 34, एफ, 34,10);}

वहाँ भी एक LISP संस्करण है, भी, लेकिन आप कई अन्य लोगों के आसपास तैर सकते हैं , बहुत अधिक किसी भी भाषा में आप इमेजिंग कर सकते हैं ...


1

euler की पहचान जो गणित ब्रह्मांड में सबसे सुंदर संख्याओं को जोड़ती है: 1, 0, e, i और π: e ^ i (=) + 1 = 0



1
int gcd(int a, int b)
{
   while(b>0)
   {
      int t = a%b;
      a=b;
      b=t;
   }
   return a;
}

शायद प्रसिद्ध नहीं, लेकिन मेरे पसंदीदा में से एक। अधिकांश के लिए यह तुरंत स्पष्ट नहीं है कि यह क्यों काम करता है।


1

यह 60 अक्षरों से थोड़ा अधिक है, लेकिन यह वास्तव में परिवर्तनीय नामकरण पर निर्भर करता है (इसलिए मैं इसमें शामिल हूं!)

readLines (rdr: StreamReader) =
      seq {नहीं rdr.EndOfStream
                rdr.ReadLine ()} का उत्पादन करें

एफ # में लाइन द्वारा एक सीक्वेंस लाइन में एक फ़ाइल पढ़ने के लिए अच्छा फ़ंक्शन।

हमारी साइट का प्रयोग करके, आप स्वीकार करते हैं कि आपने हमारी Cookie Policy और निजता नीति को पढ़ और समझा लिया है।
Licensed under cc by-sa 3.0 with attribution required.