কোডে 99 বাগ

47

কোডে 99 বাগ

কম্পিউটার সায়েন্সের জন্য "দেওয়ালে বিয়ারের 99 টি বোতল" এর অভিযোজন যেখানে বোতলগুলি হ্রাসের পরিবর্তে বাগগুলি বৃদ্ধি পায় ইন্টারনেটে প্রায়শই পুনরায় পোস্ট করা হয়। এখানে টি-শার্টের উদাহরণ ।

আমি মনে করি যে বিস্তৃত বিভিন্ন ভাষার জুড়ে সম্ভাব্য পুনরাবৃত্তি এবং এলোমেলো সংখ্যা জেনারেশন এবং এটি করার সবচেয়ে দক্ষ উপায়গুলি খুঁজে পাওয়া আকর্ষণীয় হবে interesting

99 বোতল বিয়ার নিয়ে করার মতো আরও কয়েকটি চ্যালেঞ্জ রয়েছে তবে কারও কাছে বর্ধমান ও হ্রাসের সংখ্যা নেই বলে মনে হয়!

চ্যালেঞ্জ

আপনার প্রোগ্রাম বা ফাংশনটি কোনও ইনপুট নেবে না এবং তারপরে মুদ্রণ করা উচিত

কোডে 99 বাগ

কোডে 99 বাগ

একটিকে নীচে নামান এবং এটি চারপাশে প্যাচ করুন

কোডে এক্স বাগ

(খালি রেখা)

যেখানে এক্স হ'ল পূর্বের পূর্ণসংখ্যা বিয়োগ 1 প্লাসের মধ্যে একটি এলোমেলোনা পূর্ণসংখ্যা [-15,5] হয়।
আপনি বিয়োগফল 1 টি এলোমেলো পূর্ণসংখ্যায় একীভূত করতে পারেন, সুতরাং [-16,4] এর সীমাটি মঞ্জুর করে।
সীমাগুলি একচেটিয়া হতে পারে, সুতরাং বিয়োগ বর্ধন (-16,6) বা (-17,5)।

এলোমেলো পূর্ণসংখ্যাগুলি সমানভাবে বিতরণ করতে হবে না কেবল তাদের সকলকেই সম্ভব হতে হবে।

প্রোগ্রামটি সর্বদা 99 বাগ দিয়ে শুরু হয়।

আপনি "1 বাগ" এর ব্যাকরণগত ত্রুটি উপেক্ষা করতে পারেন।

প্রোগ্রামগুলির থামানো উচিত যখন বাগের সংখ্যা 0 বা নেতিবাচক হয় এবং মুদ্রণ হয়

কোডে 0 বাগ

নেগেটিভ সংখ্যার ত্রুটি কখনই হওয়া উচিত নয়। শেষের মতো দেখতে হবে

কোডে ওয়াই বাগগুলি

কোডে ওয়াই বাগগুলি

একটিকে নীচে নামান এবং এটি চারপাশে প্যাচ করুন

কোডে 0 বাগ

(খালি রেখা)

কোডে 0 বাগ

একটি চলন্ত নতুন লাইন গ্রহণযোগ্য।

  • আপনার কোড একটি সম্পূর্ণ প্রোগ্রাম বা একটি ফাংশন হতে পারে।
  • কোনও ইনপুট নেই।
  • আউটপুট stdout বা ফিরে আসতে হবে।
  • লগগুলিতে সতর্কতা / ত্রুটি / এসটিডিআরআর ততক্ষণ ঠিক আছে যতক্ষণ না এসটিডিআউটটিতে প্রয়োজনীয় পাঠ্য রয়েছে। আরও তথ্যের জন্য এখানে দেখুন ।

এটি কোড-গল্ফ তাই বাইটের মধ্যে সংক্ষিপ্ততম কোডটি জয়ী।

উদাহরণ আউটপুট

প্রতিবার -11 বাগের জন্য ছড়িয়ে বিন উদাহরণ আউটপুট আটকে দিন

code-golf  random 
— স্যাম ডিন
সূত্র
1
সম্পর্কিত: 1 2 (পার্থক্য: এই চ্যালেঞ্জের মধ্যে আউটপুট নির্বিচারে দীর্ঘ হতে পারে)।
— ব্যবহারকারী 202729
16
এলোমেলো সংখ্যার সাইনটি উল্টানো থাকলে আরও বাস্তবসম্মত দৃশ্য হবে!
— স্টিভি গ্রিফিন
9
আমি হতাশ, যে প্রয়োজনীয়তাগুলি অন্তর্ভুক্ত করে না যে একবারে কোনও নেতিবাচক সংখ্যার মুখোমুখি হওয়ার পরে প্রোগ্রামটি একটি ত্রুটিযুক্ত হওয়া আবশ্যক, ক্রাশ হওয়া, সর্বোচ্চ ইনট বা অনুরূপে উপচে পড়া;)।
— allo
3
"এলোমেলো পূর্ণসংখ্যাগুলি সমানভাবে বিতরণ করতে হবে না কেবল তাদের সকলকেই সম্ভব হতে হবে।" xkcd.com/221
— আইভো বেকার 30'18
2
এটি লজ্জাজনক 99 এর কোনও এলোমেলো সংখ্যা জেনারেশন নেই।
— জোনাথন অ্যালান

উত্তর:

18

আর , 182 140 138 135 বাইট

n=99;while(n)cat(n,b<-" bugs in the code
",n,b,"take one down and patch it around
",n<-max(0,n-sample(21,1)+5),b,"
",c(n,b)[!n],sep="")

এটি অনলাইন চেষ্টা করুন!

এলোমেলো সংখ্যা জেনারেশনে যুক্তিসঙ্গতভাবে ভাল থাকাকালীন স্ট্রিং এবং প্রিন্টিংয়ের ক্ষেত্রে আর ভয়ানক। জেসি প্রায় এক বিলিয়ন বাইট খুঁজে পেয়েছিল এবং এটিকে গল্ফ করার নতুন উপায় খুঁজে বের করে!

— : Giuseppe
সূত্র
1
জেসি সেই সমস্ত বাইট কোথায় পেল? এটি কি কেবল ঘটনা বা জেসি সক্রিয়ভাবে তাদের সন্ধান করেছিল?
— স্টিভি গ্রিফিন
2
— জেসি
— জেসি
+5আপনি অন্য 2 বাইট ব্যয় হয় না ? শুধু না কেন sample(26,6))?
— বনাঞ্চল বিশেষজ্ঞ
2
@ থ্রি ফরেস্টকোলজিস্ট পিপিসিজিতে স্বাগতম! আমি আপনাকে sample
— পরামর্শটি
11

জাভা 8, 161 160 বাইট

v->{String s="",t=" bugs in the code\n";for(int i=99;i>0;s+=i+t+i+t+"Take one down and patch it around\n"+((i-=Math.random()*21+4)<0?0:i)+t+"\n");return s+0+t;}

-1 বাইট @ জোনাথন অ্যালানকে ধন্যবাদ ।

এটি অনলাইনে চেষ্টা করুন।

ব্যাখ্যা:

v->{                   // Method with empty unused parameter and String return-type
  String s="",         //  Result-String, starting empty
         t=" bugs in the code\n";
                       //  Temp-String we use multiple times
  for(int i=99;i>0;    //  Start `i` at 99, and loop as long as it's larger than 0
    s+=                //   Append to the result-String:
       i+t             //    The first line of the verse
       +i+t            //    The second (duplicated) line of the verse
       +"Take one down and patch it around\n"
                       //    The third line of the verse
       +((i-=Math.random()*21-4)
                       //    Decrease `i` by a random integer in the range [-16, 4]
         <0?0:i)       //    If `i` is now negative, set it to 0
        +t+"\n");      //    And append the fourth line of the verse
  return s             //  Return the result,
         +0+t;}        //  appended with an additional line for 0 at the very end
— কেভিন ক্রুইজসেন
সূত্র
মনে হচ্ছে আপনি কোনও rকিছুর জন্য ব্যবহার করছেন না ?
— ওওবালেন্স
1
সরানো ,rএখনও কাজ করে বলে মনে হচ্ছে: অনলাইনে চেষ্টা করে দেখুন!
— কামিল দ্রাকারী
@ ওউবালেন্স ওফস .. আমি কেন সেখানে পেলাম তা নিশ্চিত নয় ..>।> লক্ষ্য করার জন্য ধন্যবাদ
— কেভিন ক্রুইজসেন
1
i - = ... + 5 একটি সংরক্ষণ করে (যদিও আমি মনে করি পরিধিটি [-16 4] হওয়া উচিত [-15,5] নয়)
— জোনাথন অ্যালান
1
@ ওউবালেন্স হ্যাঁ আর ব্যবহার করা হয়নি, কারণ তিনি জাভা ব্যবহার করছেন ;-)
— আনন্দ রকজ মে'১৮
10

পাওয়ারশেল , 137 135 133 131 বাইট

$b=' bugs in the code';for($a=99;$a){,"$a$b"*2;"Take one down and patch it around";$a+=-16..4|Random;if($a-lt0){$a=0}"$a$b`n"}"0$b"

এটি অনলাইন চেষ্টা করুন!

"কোডের বাগগুলি" বিভাগটি $bপরে ব্যবহারের জন্য সংরক্ষণ করা হয়েছে। সেট $aকরে 99, একটি forলুপে প্রবেশ করে $a। প্রথমে আমরা দুটি স্ট্রিংয়ের অ্যারে তৈরি করি ," "*2, স্ট্রিংটি হ'ল "X bugs in the code"।

পরবর্তী কেবল স্ট্রিং "Take one down and patch it around"। তারপরে আমরা ব্যাপ্তিটি থেকে পূর্ণসংখ্যা $aনির্বাচন করে বৃদ্ধি করি । এর পরে, আমরা একটি if ব্যবহার করে সর্বনিম্ন শূন্য হতে বাতাব । তারপরে স্ট্রিং ।Random[-16,4]$aif($a-lt0){$a=0}"Y bugs in the code"

অবশেষে, লুপটি শেষ হওয়ার পরে, আমরা "0 bugs in the code"পাইপলাইনে স্ট্রিংটি রাখি । এই সমস্ত স্ট্রিং পাইপলাইন থেকে সংগ্রহ করা হয়েছে এবং একটি অন্তর্নিহিত Write-Outputআমাদের বিনামূল্যে তাদের মধ্যে নতুন লাইন দেয়।

forলুপের পরিবর্তে লুপ ব্যবহার করে দুটি বাইট সংরক্ষণ করা হয়েছে while। নিজস্ব বিভাগে
সরিয়ে দুটি বাইট সংরক্ষণ করা হয়েছে $b।
অ্যাড্রিয়ান ব্ল্যাকবার্নকে ধন্যবাদ দুটি বাইট সংরক্ষণ করা।

— AdmBorkBork
সূত্র
আপনি replace a = (0, $ a) [$ a-gt0] প্রতিস্থাপন করতে পারেন; কয়েক বাইটের জন্য যদি ($ a-lt0) {$ a = 0 with সহ
— অ্যাড্রিয়ান
@ অ্যাড্রিয়ান ব্ল্যাকবার্ন ধন্যবাদ!
— অ্যাডমবর্কবার্ক
9

জাভাস্ক্রিপ্ট (নোড.জেএস) , 127 বাইট

f=(i=99,t=` bugs in the code
`)=>i>0?i+t+`Take one down and patch it around
`+((i+=0|Math.random()*21-15)<0?0:i)+t+`
`+f(i):0+t

এটি অনলাইন চেষ্টা করুন!

ব্যাখ্যা:

f = (                                          // start of our recursive function
    i=99,t=` bugs in the code                 // parameters, 1. num bugs , 2. text
`)                                           // using string literal end text with \n
=>                                          // start function
    i > 0 ?                                // if i is greater than 0
        i + t +                           // return value of i, value of t and  
    `Take one down and patch it around   // and this text 
    `                                   // + new line
    + (( i +=                          // and add 
        0|Math.random()*21-15) < 0 ?  // remove decimal from value obtained by multiplying
                                     // random number (between 0 and 1) multiplied by 21 
                                    // and then subtracting 15 from it
                                   // if that value is less than 0
        0 :                       // add 0 to i
        i                        // otherwise add value of i  
        )                       // end the parenthesis 
    + t                        // add value of t to that
    + `\n`                    // along with a new line 
    + f(i)                   // and repeat the process (this is recursive)
    :                       // if i > 0 condition not met then
        0 + t              // return 0 + t. Zero is there so the last line can be 
                          // repeated

পুনরাবৃত্তি এবং বাস্তবায়নের ধারণার জন্য @ টিএসকে ধন্যবাদ (কিছু বাইট সংরক্ষিত)

এটিকে আরও গল্ফ করার জন্য পরামর্শগুলি স্বাগত।

— মুহাম্মদ সালমান
সূত্র
— tsh
1
কেন 0+সরানো হয়েছে? এটি প্রয়োজনীয় আউটপুট বলে মনে হচ্ছে।
— tsh
@ এসটিএস: তাই না? আমি সেই অংশটি পড়িনি।
— মুহাম্মদ সালমান
6

পাইথন 2 , 151 বাইট

j=i+max(-i,randint(-16,4))অসম্পূর্ণ বিতরণকে কাজে লাগিয়ে জো কিং দ্বারা দুর্দান্ত কৌশল

মনমোনিককে ধন্যবাদ সংরক্ষিত দম্পতি বাইটস

from random import*
i,s=99,'bugs in the code\n'
while i:j=max(0,i+randint(-16,4));print i,s,i,s,'Take one down and patch it around\n',j,s;i=j
print i,s

এটি অনলাইন চেষ্টা করুন!

— ডেড পসুম
সূত্র
1
আপনি ব্যবহার করে একটি বাইট সংরক্ষণ করতে পারেন j=max(0,i+randint(-16,4))।
— মনমোনিক
এছাড়াও, এটা 'থেকে বাগ কোড'।
— মনমোনিক
উইল তুলনা করতে 0 ব্যবহার করে সমস্ত সংখ্যা সম্ভব হয় না। '' 'কিছুই না বলে ধন্যবাদ: ডি
— ডেড পসসাম
আমার উত্তর হিসাবে একই কৌশল, 151 বাইট
— জো কিং
এগুলি যে কোনওভাবেই সম্ভব নয়। আপনাকে 0. এর নীচে যেতে দেওয়া হচ্ছে না
— স্মৃতিস্ত্রি
6

কাঠকয়লা , 81 বাইট

≔⁹⁹θ≔”⧴"pWº⁴tＳn/{yBⅈ⁺”ζＷ›θ⁰«×²﹪ζθ”↶0⪫\`3+¤⸿Zν(z¬hＬÀＴj'ZXεＰraF”≧⁺⁻⁴‽²¹θ﹪ζ×θ›θ⁰¶»﹪ζ⁰

এটি অনলাইন চেষ্টা করুন! লিঙ্কটি কোডটির ভার্জোজ সংস্করণ। ব্যাখ্যা:

≔⁹⁹θ

কোডে 99 বাগ দিয়ে শুরু করুন।

≔”⧴"pWº⁴tＳn/{yBⅈ⁺”ζ

কোডরে সংকুচিত স্ট্রিং "% d বাগগুলি সংরক্ষণ করুন \ n"।

Ｗ›θ⁰«

ইতিবাচক সংখ্যার বাগ বাকি রয়েছে এমন সময়ে পুনরাবৃত্তি করুন।

ײ﹪ζθ

কোডে বাগের সংখ্যা দুবার মুদ্রণ করুন।

”↶0⪫\`3+¤⸿Zν(z¬hＬÀＴj'ZXεＰraF”

"নীচে নেমে এটিকে চারপাশে প্যাচ করুন" মুদ্রণ করুন।

≧⁺⁻⁴‽²¹θ

-17 (একচেটিয়া) এবং 4 (সমেত) এর মধ্যে একটি এলোমেলো বাগ যুক্ত করুন।

﹪ζ×θ›θ⁰

অবশিষ্ট বাগের সংখ্যা বা .ণাত্মক হলে 0 প্রিন্ট করুন 0

আয়াতগুলির মধ্যে একটি ফাঁকা রেখা ছেড়ে দিন।

»﹪ζ⁰

শেষ আয়াতের পরে, আবার কোডে 0 টি বাগ মুদ্রণ করুন।

— নিল
সূত্র
চূড়ান্ত পুনরাবৃত্তি "কোডে 0 বাগ" প্রয়োজন!
— স্যাম ডিন
1
@ সামডিয়ান দুঃখিত, আমি এটিকে অবহেলা করেছি, স্থির।
— নীল
6

জাভাস্ক্রিপ্ট, 189 176 168 162 বাইট

f=(x=99)=>{c=console.log;m=Math;a=` bugs in the code
`;c(x+a+x+a+"Take one down and patch it around"+(x=m.max(x+m.ceil(m.random()*21-15),0))+a)
x?f(x):c(`
`+x+a)}

এটি অনলাইন চেষ্টা করুন!

অনুপস্থিত প্রতিস্থাপনের জন্য মুহাম্মদ সালমানconsole.log এবং এক্স পরীক্ষার উন্নতির জন্য অলিভারের জন্য ধন্যবাদ

8 বাইট দ্বারা গল্ফ করার জন্য l4m2 এর জন্য ধন্যবাদ

— এলোমেলো লোক
সূত্র
আমি কোনও নোড বিশেষজ্ঞ নই, তবে আমি বিশ্বাস করি "যখন বাগের সংখ্যা 0 বা negativeণাত্মক হয় তখন প্রোগ্রামটি থামানো উচিত" এর অর্থ আপনার x<=0?console.log("\n"+0+a):f(x)শেষে প্রয়োজন ।
— ননওনিহলে
1
আচ্ছা দুঃখিত. আরও একটি জিনিস: আপনার যদি কোনও বেনামি ফাংশনে
— পুনরাবৃত্তি
1
শেষ "কনসোল.লগ" কে "সি" দিয়ে প্রতিস্থাপন করা যাবে না?
— স্যাম ডিন
1
এছাড়াও @ ননওআইনি এখানে ঠিক আছে। আপনার এই fঘোষণার দরকার নেই । এটি ঠিক করতে আপডেট হওয়া পর্যন্ত ভোট দিয়েছি। (এছাড়াও আমার লিঙ্কটিরও একটি আপডেট দরকার)
— মুহাম্মদ সালমান
2
আমি এখানে যে বিন্দুটি তৈরি করার চেষ্টা করছি তা হ'ল ফাংশনটি না বলা হলে আপনার কোডটি কাজ করে না f, যা আপনি ধরে নিতে পারেন না।
— নন ইনি এখানে
6

পাইথন 3 , 156 138 বাইট

কৌতুকের জন্য জোনাথনের পাইথন 2 জবাবের জন্য ধন্যবাদid

r=n=99
z='%d bugs in the code\n'
while n:x=n;r+=id(r);n-=min(n,r%21-4);print((z%x)*2+'Take one down and patch it around\n'+z%n)
print(z%n)

এটি অনলাইন চেষ্টা করুন!

ব্যাখ্যা:

r=n=99       #Initialise r and n to 99
z='%d bugs in the code\n'  #Save n
while n:     #Loop while n is not 0
    x=n      #Save value of n
    r+=id(r) #Modify value of r, which changes the hash value
    n-=min(n,r%21-4)  #Change n's value by a random number between 4 and -16
    print((z%x)*2+'Take one down and patch it around\n'+z%n)   #Print the message
print(z%n)  #And print the final line
— জো কিং
সূত্র
5

অষ্টাভে , 149 148 বাইট

পরিবর্তন করে এক বাইট সংরক্ষিত randi(21)এবং %iকরতে 21*randএবং %.f। %.fশূন্য দশমিক (যেমন এবং পূর্ণসংখ্যার) সহ আউটপুটটি একটি ভাসমান নিশ্চিত করে।

পাঠযোগ্যতা সহজ করার জন্য কমা ও সেমিকোলনের পরিবর্তে একগুচ্ছ লাইন ব্রেক sertedোকানো হয়েছে। এটি ভুল অনুভব করে তবে এটি ওয়ান লাইনারের চেয়ে বেশি দিন নয়। 

x=99;do(p=@(i)printf('%.f bugs in the code\n',i))(x)
p(x)
disp('Take one down and patch it around')
p(max([0,x+=21*rand-17]))
disp('')until x<1
p(0)

এটি অনলাইন চেষ্টা করুন!

ব্যাখ্যা:

x=99;               % Initialize the number of bugs to 99
do ...  until x<1   % Loop until the number of bugs is less than 1
 (p=@(i)printf('%.f bugs in the code\n',i))(x)  % Create a function handle p that takes
                                                % the number of bugs as input and outputs
                                                % the string x bugs ... \n
 p(x)                % Call that function with the same number of bugs to get two lines
 ,disp('Take on down and patch it around')       % Outputs that line, including a newline
 ,p(max([0,x+=21*rand-17]))                    % Call p again, while updating the number
                                                 % of bugs. The number of bugs will be 
                                                 % the old one plus the random number, or 0
                                                 % if it would have turned negative
 ,disp('')        % A newline
p(0)              % Finally, the last single line.

p((x+=21*rand-17)*(x>0)পরিবর্তে ব্যবহার maxকরে একটি বাইট সংরক্ষণ করে, তবে এর -0 bugs ...পরিবর্তে শেষ লাইনটি আউটপুট দেয় 0 bugs। এটি সাথে কাজ করে randi(21)-17, তবে তারপরে এটি উপরে দৈর্ঘ্যের সমান দৈর্ঘ্য। এটি অনলাইন চেষ্টা করুন!

— স্টিও গ্রিফিন
সূত্র
5

কোবল (জ্ঞানকোবোল), 317 294 279 270 বাইট

data division.working-storage section. 1 i pic S99 value 99.procedure division.perform until i=0 perform a 2 times display"Take one down and patch it around"compute i=i-(random*21- 4)if i<0 compute i=0 end-if perform a display""end-perform.a.display i" bugs in the code"

এটি অনলাইন চেষ্টা করুন!

Ungolfed

data division.                     <-- Define the variables we want to use
working-storage section.           <-- Define global variables used in this
                                       program

1 i pic S99 value 99.              <-- Define variable i with datatype signed
                                       numeric and with two digits

procedure division.                <-- Define our program

perform until i = 0                <-- Perform the following code until i = 0
    perform a 2 times              <-- Execute the procedure called 'a' twice,
                                       see below

    display "Take one down and patch it around"   <-- Display this sentence
    compute i = i -                <-- Subtract from i some random value
        (random * 21 - 4)

    if i < 0                       <-- if i < 0
        compute i=0                <-- then assign 0 to i
    end-if
    perform a                      <-- Execute the procedure 'a'
    display ""                     <-- Display an empty string; needed because
                                       of the blank line
end-perform.

a.                                 <-- Define procedure called 'a'.
    display i " bugs in the code"  <-- Display the value of i and then the
                                       given string literal

নোট: শেষ বাক্য এখনো ছাপা হয়, কারণ ব্যবসায়িক কাজে ব্যবহৃত এক বিশেষ ধরনের কম্পিউটার ভাষা পুরো প্রোগ্রাম executes, এবং পরে perform untilলুপ এটি "পড়ে-থ্রু" লেবেল একটি , তার বিবৃতি নির্বাহ। এই আচরণ একটি switch caseছাড়া একটি অনুরূপ break।

PS: সংখ্যাগুলি যথাযথভাবে প্রয়োজনীয় হিসাবে প্রদর্শিত হয় না, তবে সিওবিওএল সংখ্যাকে একটি দুর্দান্ত পাঠ্য উপস্থাপনায় স্বতঃ-রূপান্তর করাতে খুব ভাল নয় good

— এমসি সম্রাট
সূত্র
1
ওহে. পিপিসিজিতে আপনাকে স্বাগতম।
— মুহাম্মদ সালমান
আমি মনে করি যে বিয়োগ 4টি আরও 4 হওয়া উচিত I'm আমি অনুমান করছি আপনি যান (i- (র্যান্ড -4) == (আই-র্যান্ড + 4) But সংখ্যাগুলি মুছে ফেলা হবে বা এটি ভাষার কোনও বৈশিষ্ট্য? তবে সোনার বান্ধব নয় এমন ভাষা নিয়ে দুর্দান্ত কাজ!
— স্যাম ডিন
1
@ সামডিয়ান ধন্যবাদ! আমি সেই ভুলটি ঠিক করেছিলাম। আমি স্বীকার করতে পারি যে প্রকৃত র্যান্ডম গণনা করা কেভিন ক্রুইজসেনের উত্তর থেকে অনুপ্রাণিত হয়েছিল । তবে তিনি একটি যৌগিক অ্যাসাইনমেন্ট অপারেটর ( -=ইন i-=Math.random()*21-4) ব্যবহার করেন, যা পুরো ডানহাতে অপেন্ডেন্ডের চারপাশে প্রথম বন্ধনী বোঝায়। আমি তাদের সুস্পষ্ট করতে ভুলে গিয়েছিলাম, তবে এটি এখন ঠিক হয়ে গেছে, আমার ধারণা।
— এমসি সম্রাট
এমএমসিএম্পারার এখন আমার ভাল লাগছে!
— স্যাম ডিন
আপনি কি +4 ব্যবহার করতে এবং বন্ধনীগুলি সংরক্ষণ করতে পারবেন না?
— রাজনগুল
4

ভিবিএ: 212 163 বাইট

এই সমাধানটি গতকাল পোস্ট করা ক্রোনোসিডাল দ্বারা ভিত্তিক। এটি আমার প্রথম পোস্ট এবং তাঁর পোস্টে মন্তব্য করার মতো যথেষ্ট খ্যাতি আমার নেই।

এই সংশোধনীতে দুটি বর্ধন রয়েছে।

  1. While/Wendপরিবর্তে ব্যবহার করা For/Nextকয়েকটি অক্ষর সংরক্ষণ করে।
  2. একটি একক অক্ষর দিয়ে নামে একজন সাব কলিং খাটো চেয়ে GoSubএবং Exit Subএবং Returnলাইন এটা সমর্থন করার প্রয়োজন ছিল।

সম্পাদনা:
৩. অপসারণ করা শ্বেতস্থান এবং বর্ণগুলি যা ভিবিএ সম্পাদক স্বয়ংক্রিয়ভাবে আবার যুক্ত হবে V ভিবিএ-তে গল্ফ করার টিপস দেখুন
@. এরিকএফ দ্বারা পরামর্শ যুক্ত করা হয়েছে, তারপরে তার পেস্ট বিন আলগোরিদমটি আরও ছোট ছিল তাই আমি তার সাথে আমার অ্যালগরিদম প্রতিস্থাপন করেছি এবং মুছে ফেলেছি হোয়াইটস্পেস। একটি মূল পরিবর্তন vbLFআউটপুট স্ট্রিংয়ে সংযোজন করছিল তাই Debug.Printপ্রায়শই ডাকতে হবে না। যশ EricF ।

Sub b()
s=" bugs in the code"&vbLf
c=99
While c
Debug.? c &s &c &s &"Take one down and patch it around
c=c+5-Int(Rnd()*20)
c=IIf(c<0,0,c)
Debug.? c &s
Wend
End Sub

এটি একটি মজার চ্যালেঞ্জ ছিল। আপনি যদি ভিবি 6 / ভিবিএসক্রিপ্ট / ভিবিএর জন্য টিআইওর মতো কোনও অনলাইন দোভাষী সম্পর্কে জানেন তবে দয়া করে একটি মন্তব্য করুন।

আপনি যদি এই কোডটি পরীক্ষা করতে চান এবং মাইক্রোসফ্ট এক্সেল, ওয়ার্ড, অ্যাক্সেস, অথবা আউটলুক ইনস্টল করেছেন (কেবল উইন্ডোজ), ভিবিএ আইডিই খুলতে Alt + F11 চাপুন। একটি নতুন কোড মডিউল Altোকান (Alt + I, M) এবং সাফ করুন Option Explicit। তারপরে কোডে পেস্ট করুন এবং এটি চালানোর জন্য F5 টিপুন। তাত্ক্ষণিক উইন্ডোতে ফলাফলগুলি উপস্থিত হওয়া উচিত (আপনি যদি এটি না দেখেন তবে Ctrl + G টিপুন)।

— বেন
সূত্র
4
সাইটে স্বাগতম!
— গম উইজার্ড
1
আপনি এটা নিচে 197 অক্ষর যদি আপনি স্ট্রিং একত্রিত ব্যবহার পেতে পারেন cপরিবর্তে c>0আপনার যদিও শর্ত হিসাবে, এবং ব্যবহার c=Iif(c<0,0,c)পরিবর্তে If c<0 [...]: pastebin.com/nFGtGqdE
— ErikF
4

ল্যাটেক্স , 368 304 293 287 245 240 বাইট

বাইটের শর্তে অন্যান্য প্রোগ্রামের তুলনায় সত্যিই প্রতিযোগিতামূলক না হলেও আমি কীভাবে এটি ল্যাটেক্সে করব তা দেখতে চেয়েছিলাম।

\documentclass{proc}\newcount\b\b99\usepackage[first=-16,last=5]{lcg}\def~{\the\b\ bugs in the code\\}\def\|{\loop~~Take one down and patch it around\\\rand\advance\b\value{rand}\ifnum\b>0 ~\\\repeat\b0 ~\\~}\begin{document}\|\end{document}

আরও পঠনযোগ্য:

\documentclass{proc}               %shortest document class
\newcount\b                        %short variable name
\b 99                              %set the value to 99
\usepackage[first=-16,last=5]{lcg} %random number generator
%\the prints the value of the variable behind it
%\def is shorter than \newcommand and can redefine commands
\def~{\the\b\ bugs in the code\\}
\def\|{                            %the function
    \loop
        ~
        ~
        Take one down and patch it around\\
        %\rand creates a counter named rand and                                        
        %stores the random value in it
        \rand \advance\b\value{rand} 
        %if the counter is smaller than 0, it becomes 0
        \ifnum\b>0 
            ~ \\                  %extra newline as required
    \repeat
    %if b is equal or smaller than 0, set it to 0
    \b 0 
    ~ \\                          %then print like normal
    %extra print at the end
    ~
}
\begin{document}
    \|                             %calling the function
\end{document}

উন্নতি (প্রতি সম্পাদনা):

  1. "কোডে এক্স বাগগুলি" এখন 4 টি লাইনের পরিবর্তে একটি ফাংশন
  2. \ifএ \repeatহিসাবে ক্লজটি পুনরায় লিখুন\else
  3. স্পষ্টতই \value{b}=xআরম্ভের জন্য কাজ করে তবে লুপে নয় (পরিবর্তে \setcounter{b}{x})
  4. স্পষ্টতই \relax3 পয়েন্টের জন্য ব্যবহার করা উচিত, তবে এটি কোনও স্থান সন্নিবেশ করেও অর্জন করা যেতে পারে। \elseএগুলি সংক্ষিপ্ত হিসাবে লেটেক্সের পরিবর্তে, ব্যবহৃত টেক্স কমান্ডগুলি সরানো হয়েছে এবং এর পরিবর্তে প্রতিস্থাপিত \'হয়েছে ~।
  5. কিছু কোড কিছু কারণে শিথিল করা প্রয়োজন হয়নি।
— সাইমন ক্লেভার
সূত্র
1
পিপিসিজিতে আপনাকে স্বাগতম।
— মুহাম্মদ সালমান
পিপিসিজিতে আপনাকে স্বাগতম! আমি আপনার কোড চালাচ্ছি না তবে এটির \ifnum\value{b}<1চেয়ে বেশি হওয়া উচিত নয় <0?
— জয়সি
@ জাসি: এটি সত্যিই কিছু যায় আসে না, একবার খ 0 হলে এটি লুপ থেকে যেভাবে পালিয়ে যায়। এটি কেবল কম স্বজ্ঞাত হতে পারে যে খ যখন 0 হয় অন্য ক্ষেত্রে প্রকৃতপক্ষে মুদ্রিত হয় তবে কার্যকরভাবে আমার মনে হয় কোনও পার্থক্য নেই।
— সাইমন ক্লেভার
@ জাসি কোডটি সংক্ষিপ্ত করে দিয়েছে, এখন এটি আর কোনও ব্যাপার নয়;)
— সাইমন ক্লেভার
3

এসএএস, 210 বাইট

%macro t;%let b=bugs in the code;%let a=99;%do%until(&a<=0);%put&a &b;%put&a &b;%put Take one down, pass it around;%let a=%eval(&a-%sysfunc(ranbin(0,20,.3))+4);%if &a<0%then%let a=0;%put&a &b;%put;%end;%mend;%t

Ungolfed:

%macro t;
%let b=bugs in the code;
%let a=99;
%do%until(&a<=0);
  %put &a &b;
  %put &a &b;
  %put Take one down, pass it around;    
  %let a=%eval(&a-%sysfunc(ranbin(0,20,.3))+4);
  %if &a<0%then%let a=0;
  %put &a &b; 
  %put;
%end;
%mend;
%t

কয়েক বাইট সংরক্ষণ করা হলে লগ সতর্কবাণী অনুমতি দেওয়া হয়েছে (করা &aমধ্যে &bম্যাক্রো পরিবর্তনশীল, কিন্তু যে ইনিশিয়াল সতর্কবার্তা উত্পন্ন)।

— জো
সূত্র
অন্য কয়েকজনের সতর্কতা রয়েছে তাই আমি তাদের অনুমতি দিয়েই যাব।
— স্যাম ডিন
3

এবিএপি , 295 বাইট

... কারণ কেন হেক! 

REPORT z.DATA:a(16),c TYPE qfranint.a = 'bugs in the code'.data(b) = 99.WRITE:/ b,a.WHILE b > 0.WRITE:/ b,a,/'Take one down and patch it around'.CALL FUNCTION
'QF05_RANDOM_INTEGER' EXPORTING ran_int_max = 21 IMPORTING ran_int = c.b = b + c - 17.IF b < 1.b = 0.ENDIF.WRITE:/ b,a,/,/ b,a.ENDWHILE.

অন্যান্য ভাষার তুলনায় এটি অবশ্যই প্রতিযোগিতামূলক নয়, তবে আমি প্রাথমিকভাবে এটি লিখেছিলাম 330 বাইট থেকে একে নামিয়ে আনতেও সক্ষম হয়েছি, তাই আমি এটিকে ব্যক্তিগত জয় হিসাবে গণ্য করি।

যেহেতু ABAP 255 টির চেয়ে বেশি অক্ষরের বেশি লাইনগুলিকে অনুমতি দেয় না, তাই আমাকে একটি লাইনের বিরতি দিয়ে একটি স্থান প্রতিস্থাপন করতে হয়েছিল। উইন্ডোজে এটি প্রাথমিকভাবে সিআরএলএফের কারণে আকারটি 296 বাইটে বাড়িয়েছে, তবে এটি কেবলমাত্র এলএফ দিয়ে সূক্ষ্মভাবে চলে। ABAP নিশ্চিতভাবে যদিও অনেকগুলি স্থান প্রয়োজন, সুতরাং এটি কোনও বড় বিষয় নয়।

লিখুন জিইআইআইয়ের পাঠ্যটি সহজেই ফেলে দেয়, তাই আমি অনুমান করি যে এটি স্টাডাউটের মতো? আমি সম্ভবত কোনও কাঠামো বা টেবিল ব্যবহার করে এখানে কিছু বাইট সংরক্ষণ করতে পারলাম, তবে এসএপি মিশ্র কাঠামোগুলি (চর এবং সংখ্যাগুলি সহ) পরিচালনা করে বলে আমি যে পদ্ধতিটি কল্পনা করেছি তা কেবল নন-ইউনিকোড সিস্টেমগুলিতেই কাজ করবে ... যা আমি ব্যক্তিগতভাবে একটি নো- বিবেচনা করি উভয় অ্যাক্সেস থাকা সত্ত্বেও যান।

এলোমেলো সংখ্যার জন্য ফাংশন মডিউলটি কেবলমাত্র আমাদের সিস্টেমে আমি খুঁজে পেতাম, আমি মনে করি একটি সংক্ষিপ্ত নাম বা পরামিতি থাকতে পারে। কোন ধারণা নেই!

কম বা কম পাঠযোগ্য কোড, মন্তব্য অন্তর্ভুক্ত:

REPORT z.
  "Define a (text) and c (random)
  DATA: a(16),
        c TYPE qfranint. "A stupid data type for a random INT

  "This is shorter than using VALUE (saves 3 bytes)
  a = 'bugs in the code'.
  "This is slightly shorter than doing ',b TYPE i' and 'b = 99'. (saves 2 bytes)
  data(b) = 99.

  "first line has to be outside of loop due to our exit condition (saved me ~5 bytes)
  WRITE: / b,a. "\n xx bugs in the code

  WHILE b > 0.
    WRITE: / b,a, "\n xx bugs in the code
    /'Take one down and patch it around'.

    "This ridiculous function for random numbers...
    "To save some bytes, I leave ran_int_min at it's default
    "of 1, and set the max to 21 instead, from which I remove
    "17 later on, resulting in a range of [-16,4]
    "Compare:
    "   ' - 17'              =  5 bytes
    "   ' ran_int_min = -16' = 18 bytes
    "(saves 13 bytes)

    CALL FUNCTION 'QF05_RANDOM_INTEGER'
        EXPORTING ran_int_max = 21
        IMPORTING ran_int = c.

    "Maximum number of bugs added:     4 = 21 - 17
    "Maximum number of bugs removed: -16 =  1 - 17
    b = b + c - 17.

    IF b <= 0.
        b = 0.
    ENDIF.

    WRITE: / b,a,/,/ b,a. "\nxx bugs in the code\n\nxx bugs in the code
  ENDWHILE.

চ্যালেঞ্জের জন্য ধন্যবাদ!
আমার সাহেবের কাছে: দয়া করে আমাকে বরখাস্ত করবেন না, আমি কেবল নিজেকে শিক্ষিত করছি!

— Maz
সূত্র
3

পরিষ্কার , 245 234 বাইট

import StdEnv,Math.Random,System.Time,System._Unsafe,Text
f[n,v:l]b|n>0=n<+b<+n<+b+"Take one down and patch it around\n"<+max 0v<+b+"\n"+f[v:l]b=0<+b


f(scan(+)99[n rem 20-16\\n<-genRandInt(toInt(accUnsafe time))])" bugs in the code\n"

এটি অনলাইন চেষ্টা করুন!

— Οurous
সূত্র
কোনও সুযোগ আপনি শুরুতে এবং শেষে কোটগুলি সরাতে পারবেন?
— স্যাম ডিন
1
@ সামডিয়ান ওহ এটি কেবল একটি সংকলক বিকল্প যা আমি ভুলে গিয়েছিলাম। আমি যে মধ্যে নিক্ষেপ করব।
— Οurous
3

সি #, 184 181 বাইট

আমার প্রথম কোড গল্ফ উত্তর!

( @ কেভিন ক্রুইজসেনের জাভা উত্তরের ভিত্তিতে)

Func<String>c=()=>{String s="",t=" bugs in the code\n";for(int i=99;i>0;s+=i+t+i+t+"Take one down and patch it around\n"+((i-=new Random().Next(21)-4)<0?0:i)+t+"\n");return s+0+t;};

এটি অনলাইন চেষ্টা করুন!

— বেন নোবেল
সূত্র
1
পিপিসিগিতে আপনাকে স্বাগতম :)
— শেগি
3

সি (জিসিসি) , 141 137 বাইট

আমি মহান ন্যায়বিচারের জন্য প্রিপ্রোসেসর ম্যাক্রোগুলি ব্যবহার করেছি (সতর্কতা: টিভি ট্রপস)

#define _(a)printf("%d bugs in the code\n"#a,i)
f(i){for(i=99;_(),i;i+=rand()%21-16,i*=i>0,_(\n))_(Take one down and patch it around\n);}

এটি অনলাইন চেষ্টা করুন!

— ErikF
সূত্র
2

টি-এসকিউএল, 188 বাইট

DECLARE @ INT=99,@b CHAR(18)=' bugs in the code
'a:PRINT CONCAT(@,@b,@,@b,'Take one down and patch it around
')SET @+=5-22*RAND()IF @<0SET @=0PRINT CONCAT(@,@b,'
')IF @>0GOTO a;PRINT '0'+@b

এসকিউএল স্ট্রিং লিটারেলের ভিতরে ফেরতের অনুমতি দেয়, যাতে এটি সহায়তা করে।

CONCAT()পাঠ্যে একটি অন্তর্নিহিত রূপান্তর করে তাই আমাকে CASTবা সম্পর্কে চিন্তা করতে হবে না CONVERT।

— BradC
সূত্র
2

জাভাস্ক্রিপ্ট, 138 বাইট

_=>(I=i=>`Take one down and patch it around
${l=(i>0?i:0)+` bugs in the code
`}
`+l+l+(i>0&&I(i+Math.random()*21-15|0)))(99).slice(55,-25)

কোড স্নিপেট দেখান

— darrylyeo
সূত্র
2

কিউবি 64 , 134 বাইট

আমার ভাইয়ের কাছ থেকে

S$="bugs in the code":I=99:WHILE I>0:?I;S$:?I;S$:?"Take one down and patch it around":I=I+INT(RND*21)-15:I=-(I>0)*I:?I;S$:?:WEND:?I;S$
— ErikF
সূত্র
2

জেলি , 61 বাইট

;“,Ȥm46Ṛṛ⁽eɼḞF»
ÇȮ“"ḃḲɠ⁼ċTṪʠ/Ạ⁺ṗḍ^ẸƘⱮṖ8»20X+_«¥©17Ç⁷®ßÇ®?
99Ç

একটি নীলাদিক লিঙ্ক যা একটি সম্পূর্ণ প্রোগ্রাম হিসাবেও কাজ করে।

এটি অনলাইন চেষ্টা করুন! (নির্বাহ সম্পন্ন হওয়ার পরে আউটপুট ফ্লাশ করা হয় তবে এটি অনুচ্ছেদে অনুচ্ছেদ প্রিন্ট করে)

কিভাবে?

;“,Ȥm46Ṛṛ⁽eɼḞF» - Link 1, helper to construct count-text: number
 “,Ȥm46Ṛṛ⁽eɼḞF» - compressed string (list of characters) = " bugs in the code\n"
;               - concatenate the number with that list of characters

ÇȮ“"ḃḲɠ⁼ċTṪʠ/Ạ⁺ṗḍ^ẸƘⱮṖ8»20X+_«¥©17Ç⁷®ßÇ®? - Link 2, print stuff: number
Ç                                         - call the last Link (1) as a monad
 Ȯ                                        - print and yield that
                                          - ...at this point that is then printed again
                                          -    implicitly due to the start of a new leading
                                          -    constant chain below
  “"ḃḲɠ⁼ċTṪʠ/Ạ⁺ṗḍ^ẸƘⱮṖ8»                  - compressed string (list of characters)
                                          -     = "Take one down and patch it around\n"
                                          - ...once again an implicit print, same reason
                        20                - twenty
                          X               - random int from [1,20] 
                           +              - add the left argument, the number
                                17        - seventeen
                              ¥           - last two links as a dyad:
                             «            -   minimum (of rand[1,20]+n and 17) 
                            _             -   subtract
                               ©          - copy this newNumber to the register
                                  Ç       - call last Link (1) as a monad = f(newNumber)
                                          - here we get another implicit print, same reason
                                   ⁷      - a new line character
                                          - yet another implicit print, same reason
                                    ®     - recall newNumber from the register
                                        ? - if... 
                                       ®  - ...condition: recall from register again
                                          -               (i.e. if non-zero)
                                     ß    - ...then: call this Link (2) as a monad
                                          -          = Link 2(newNumber)
                                      Ç   - ...else: call the last Link (1) as a monad
                                          -          = Link 1(0) (since newNumber=0)

99Ç - Main Link: no arguments
99  - yep, you guessed it, ninety nine
  Ç - call the last Link (2) as a monad
— জোনাথন অ্যালান
সূত্র
2

ভিবিএ: 225 233 বাইট

Sub b()
For c = 99 To 0 Step -1
GoSub d
GoSub d
Debug.Print "Take one down and patch it around"
c = c + 5 - Int(rnd() * 20)
If c < 0 Then c = 0
GoSub d
Debug.Print
Next c
Exit Sub
d:
Debug.Print c & " bugs in the code"
Return
End Sub

{সম্পাদনা the নিখোঁজ যুক্ত করেছেrnd()*

দ্রষ্টব্য: ত্রিভুজযুক্ত রেখাটি মুদ্রণ করতে
ব্যবহার GoSubকরে, কারণ এটি ভেরিয়েবলের জন্য লাইনটি নির্ধারণ এবং এটির তুলনায় সামান্য খাটো Debug.Print।
Debug.Printকোনও যুক্তি ছাড়াই খালি লাইনটি মুদ্রণ করে (নুল বা খালি স্ট্রিংয়ের প্রয়োজন নেই) একটি WorksheetFunction.Maxলাইন খুব দীর্ঘ হবে, তাই আমি নেতিবাচকতা রোধ করতে "যদি এর চেয়ে কম" ব্যবহার করি।

 

ইন্ডেন্টেশন এবং মন্তব্য সহ

Sub b()
    For c = 99 To 0 Step -1
        GoSub d '"# bugs in the code"
        GoSub d '"# bugs in the code"
        Debug.Print "Take one down and patch it around"
        c = c + 5 - Int(rnd() * 20)
        If c < 0 Then c = 0 'Non-negative
        GoSub d '"# bugs in the code"
        Debug.Print
    Next c
    Exit Sub
d: 'This is our GoSub bit
    Debug.Print c & " bugs in the code"
    Return
End Sub
— Chronocidal
সূত্র
1
এলোমেলো সংখ্যা করার এটি একটি খুব কার্যকর উপায়!
— স্যাম ডিন
@ স্যামডিয়ান নিশ্চিত হন না যে আমি কীভাবে rnd() * সেখানে অন্তর্ভুক্ত করতে ভুলে গেছি - আমি মনে করি যে আমি এটিতে ব্যস্ত ছিলাম যদি এটির কম অক্ষর Dim c%(যেমন "সি একটি পূর্ণসংখ্যা") থাকে এবং বাদ দিনInt()
— ক্রোনোকিডাল
হাহ কোন চিন্তা নেই! ভিবিএর উত্তরটি দেখে ভাল লাগছে যেহেতু আমি বছরের পর বছর এটি ব্যবহার করি নি!
— স্যাম ডিন
2

পাইথন 2 ,  138 134 133 131  127 বাইট

-1 জো কিংকে ধন্যবাদ (যুক্তিটি ব্যবহার করার bugs-=min(bugs,randomNumber)পরিবর্তে পুনরায় সাজানো bugs=max(0,bugs-randomNumber))। এটি শূন্য ত্রুটি দ্বারা একটি বিভাগ ব্যবহার করে বল ছাড়তে অনুমতি দিয়েছে, আরও 6 বাইট সংরক্ষণ করবে !

r=n=99
t="bugs in the code\n"
while 1:r+=id(r);b=n;n-=min(n,r%21-4);print b,t,1/b|b,t,"Take one down and patch it around\n",n,t

এটি অনলাইন চেষ্টা করুন!

— জোনাথন অ্যালান
সূত্র
দেখা যাচ্ছে আমার একেবারে টিপলস তৈরি করার দরকার নেই।
— জোনাথন অ্যালান
— জো কিং
@ জোকিং ধন্যবাদ! (আমার জেলি উত্তরটি আমি যা করি তা এটির মতোই আমার সত্যিই স্পষ্ট হওয়া উচিত ছিল))
— জোনাথন অ্যালান
2
@ জোকিং ... যার অর্থ আমরা শূন্য ত্রুটি দ্বারা বিভাগ ছাড়তে বাধ্য করতে পারি
— জোনাথন অ্যালান
2

রুবি: 149 বাইট

n=99;f=" bugs in the code\n";loop{puts"#{n}#{f}"*2+"Take one down and patch it around\n";(n+=rand -16..4)>0?puts("#{n}#{f}\n"):break};puts"0#{f}\n"*2

রুবি> = 1.8 এর যে কোনও সংস্করণে কাজ করা উচিত

আমি মনে করি স্ট্রিংগুলিকে আরও কিছুটা অনুকূল করা সম্ভব হতে পারে তবে সাধারণভাবে আমি এতে সন্তুষ্ট - বিশেষত কম্বো অ্যাসাইনমেন্ট / তুলনা / ব্রেক স্টেটমেন্ট এবং alচ্ছিক বন্ধনীগুলির অপব্যবহার।

দ্রষ্টব্য: আউটপুট প্রযুক্তিগতভাবে দুটি ট্রিলিং নিউলাইন রয়েছে; যদি এটির জন্য অ্যাকাউন্টিং করার দরকার হয় তবে এটি 4 টি অক্ষর দ্বারা উঠে যায়।

— DaveMongoose
সূত্র
হ্যালো, এবং পিপিসিজিতে আপনাকে স্বাগতম! আমরা পেছনের নিউলাইনগুলি গণনা করি, তবে এটি লিনাক্সে কাজ করলে আপনি কেবল \n(না \r) গণনা করতে পারেন ।
— NoOneIs এখানে
@ ননআইনিহরে ধন্যবাদ :) আমি আমার উত্তরটি পরিষ্কার করার জন্য আপডেট করেছি - আমি আউটপুটটিতে নিউলাইনগুলি উল্লেখ করছি কারণ প্রশ্নটি উল্লেখ করে যে একটি থাকা গ্রহণযোগ্য, তবে আমি দুটি সম্পর্কে নিশ্চিত নই।
— ডেভমঙ্গুজ
আমি দেখি. আমি মনে করি এটি ঠিক আছে
— NoOneIsHere
2

Zsh , 133 বাইট

b="%d bugs in the code
";for ((n=99;n;)){printf $b$b"Take one down and patch it around
$b
" n n n-=RANDOM%21-4,n=n\>0\?n:0};printf $b

এটি অনলাইন চেষ্টা করুন!

এটি কয়েকটি zsh বৈশিষ্ট্যের সুবিধা গ্রহণ করে।

  • বিকল্প লুপ ফর্ম : while list; do list; doneহিসেবে লেখা যেতে পারেwhile list {list}
  • যদি কোনও ফর্ম্যাট স্পেসিফায়ার printfসংখ্যাসূচক হয় তবে সংশ্লিষ্ট যুক্তিটি গণিতের এক্সপ্রেশন হিসাবে মূল্যায়ন করা হয়। তাই:
    • আমরা nএকটি ব্যবহার না করে বিনামূল্যে মূল্য পেতে$
    • n -= RANDOM % 21 - 4, n = n > 0 ? n : 0আবার ব্যবহার ছাড়াই মূল্যায়ন করা হয় $((...)), $[...]বা অনুরূপ। >এবং ?পলান করা হয়েছিল।
    • printf $bশেষে জন্য 0 হিসাবে একটি খালি যুক্তি মূল্যায়ণ %d।
  • প্যারামিটার বিস্তারে শব্দের বিভাজন ডিফল্ট হিসাবে বন্ধ, তাই আমাকে $bকোথাও উদ্ধৃতি দিতে হবে না ।
    • এটি আমাকে $b$b"Take..."পরিবর্তে লেখার অনুমতি দেয় "$b${b}Take..."।
  • পরিবর্তে \nএবং for((n=99;n;))পরিবর্তে প্রকৃত নিউলাইন ব্যবহার করে কয়েকটি বাইট সংরক্ষণ করা হয়েছে n=99;while ((n))।
— muru
সূত্র
আমি মনে করি এটি -4 হওয়া উচিত। "- =" দেখতে এর যৌগের মতো দেখায় এটি প্রথমে +4 করে এরপরে এটি সমস্ত বিয়োগ করে।
— স্যাম ডিন
@ সামডিয়ান উফ, সংশোধন
— মুড়ু
আমাদের সাইট ব্যবহার করে, আপনি স্বীকার করেছেন যে আপনি আমাদের কুকি নীতি এবং গোপনীয়তা নীতিটি পড়েছেন এবং বুঝতে পেরেছেন ।
Licensed under cc by-sa 3.0 with attribution required.