2 এর অভাব প্রদর্শনের সংখ্যা

22

এক থেকে একশতে সংখ্যা ক্রমান্বয়ে প্রদর্শন করুন (ক্রমবর্ধমান ক্রমে), তবে সংখ্যা 2 ক্রমানুসারে কোথাও উপস্থিত হবে না। সুতরাং, উদাহরণস্বরূপ, দুটি ( 2) বা তেইশ ( ) সংখ্যাটি 23ক্রমযুক্ত হওয়া উচিত নয়।

নিউজলাইনগুলি সংখ্যা পৃথক করে সহ এখানে একটি উদাহরণ আউটপুট দেওয়া হচ্ছে:

1
3
4
5
6
7
8
9
10
11
13
14
15
16
17
18
19
30
31
33
34
35
36
37
38
39
40
41
43
44
45
46
47
48
49
50
51
53
54
55
56
57
58
59
60
61
63
64
65
66
67
68
69
70
71
73
74
75
76
77
78
79
80
81
83
84
85
86
87
88
89
90
91
93
94
95
96
97
98
99
100
code-golf  sequence  kolmogorov-complexity 
— Monolica
সূত্র
7
আমি ধরে নিয়েছি যে জয়ের মানদণ্ডটি কোড-গল্ফ ঠিক?
— লুইস ফেলিপ দে জেসুস মুনোজ
4
আমাদের সাইট স্ট্যাক এক্সচেঞ্জ নেটওয়ার্কের অন্যান্য সাইটের মতো একইভাবে কাজ করে না। গৃহীত উত্তরগুলি সম্পর্কে, দয়া করে জোনাথন অ্যালান থেকে এই মন্তব্যটি আমলে নিন । এবং দয়া করে একটি বিজয়ী মানদণ্ড যুক্ত করুন।
— আর্নল্ড
1
আমি কি পোস্টের আগে আপনার চ্যালেঞ্জগুলির প্রতিক্রিয়া জানাতে ভবিষ্যতে স্যান্ডবক্স ব্যবহার করার পরামর্শ দেব ?
— জো কিং
1
@ মনোলিকা যদি সংক্ষিপ্ত উত্তরটি জয়ী হয় তবে আপনার ট্যাগ লাগবে [code-golf]। ভবিষ্যতের রেফারেন্সের জন্য সমস্ত উপলভ্য বিজয়ী মানদণ্ড ট্যাগগুলির জন্য এখানে একটি তালিকা।
— কেভিন ক্রুইজসেন
4
@ ব্যবহারকারী 202729 যথেচ্ছ সীমাবদ্ধতা অযাচিত, অনুমোদিত নয়।
— জোনাথন ফ্রেচ

উত্তর:

26

ট্যাক্সি , 2399 2391 2370 1783 1773 1706 বাইট

-8 বাইট বুঝতে পেরে, সানি সাইড পার্কে কোনও নির্দিষ্ট যাত্রীকে চিরতরে ফেলে রাখার পরিবর্তে, রিভারভিউ ব্রিজের বাইরে ফেলে দেওয়া আরও মূল্যবান। আহ, এ কি সুন্দর শহর town

আমি নির্বোধে রেখেছিলাম একটি মন্তব্য করার জন্য -21 বাইট।

-587 বাইটগুলি কেবল এই সম্পর্কে পুরো পথটি পরিবর্তন করে (সম্ভবত একটি সংক্ষিপ্ততর উপায় হ'ল পাটিগণিতের দ্বারা; পূর্ণসংখ্যা-বিভাজন [17, 27, 37, 47, ...] 9 অনুসারে ক্রম পেয়েছে, তবে আপনি এড়িয়ে যেতে পারেন 20 নিজেকে।)

উপলব্ধির জন্য -17 বাইট যে কোনও স্থান ছাড়াই কোনও কোট-এনসেড স্ট্রিংয়ের পরে কোটের দরকার নেই (ধন্যবাদ জো কিং!)

অনুধাবনের জন্য -67 বাইট যে লাইনব্রেকগুলি alচ্ছিক।

17 is waiting at Starchild Numerology.Go to Starchild Numerology:w 1 l 2 r 1 l 1 l 2 l.Pickup a passenger going to Cyclone.Go to Cyclone:e 1 l 2 r.[B]Pickup a passenger going to Cyclone.Pickup a passenger going to Divide and Conquer.9 is waiting at Starchild Numerology.Go to Starchild Numerology:s 2 l 2 r.Pickup a passenger going to Divide and Conquer.Go to Divide and Conquer:e 1 l 2 r 3 r 2 r 1 r.Pickup a passenger going to Trunkers.Go to Trunkers:e 1 r 3 r 1 l.Pickup a passenger going to The Babelfishery.Go to The Babelfishery:e 1 r 1 r.Pickup a passenger going to Post Office.\n is waiting at Writer's Depot.Go to Writer's Depot:n 5 l 2 l.Pickup a passenger going to Post Office.Go to Post Office:n 1 r 2 r 1 l.Go to Cyclone:s 1 r 1 l 2 r.Pickup a passenger going to Addition Alley.Pickup a passenger going to Equal's Corner.177 is waiting at Starchild Numerology.Go to Starchild Numerology:s 2 l 2 r.Pickup a passenger going to Equal's Corner.Go to Equal's Corner:w 1 l.Switch to plan C if no one is waiting.Pickup a passenger going to Sunny Skies Park.100 is waiting at Starchild Numerology.Switch to plan D.[C]10 is waiting at Starchild Numerology.[D]Go to Starchild Numerology:n 1 r.Pickup a passenger going to Addition Alley.Go to Sunny Skies Park:w 1 r.Go to Addition Alley:n 1 r 1 r 1 r.Pickup a passenger going to Cyclone.Go to Cyclone:n 1 l 1 l.Pickup a passenger going to Cyclone.Pickup a passenger going to Equal's Corner.917 is waiting at Starchild Numerology.Go to Starchild Numerology:s 2 l 2 r.Pickup a passenger going to Equal's Corner.Go to Equal's Corner:w 1 l.Switch to plan E if no one is waiting.Switch to plan F.[E]Go to Go More:n 1 l.Go to Cyclone:w 1 r.Switch to plan B.[F]

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

এইটি শীঘ্রই যে কোনও সময় আমাকে কোনও গল্ফের প্রতিযোগিতা জিততে পারে না, তবে আমি সিদ্ধান্ত নিয়েছি যে এসোলাং ট্যাক্সিটি চেষ্টা করে দেখব।

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

আমি এমন কিছু কৌশল ব্যবহার করেছি যা ফাইলাইজকে কিছুটা হ্রাস করে, যেমন দিকনির্দেশের মতো পুনরায় চাপ east 1st left, 2nd rightদেওয়া e 1 l 2 r, theযেখানে এটি alচ্ছিক তা শব্দটি সরিয়ে ফেলা এবং আমার সমস্ত গন্তব্যের দিকে সবচেয়ে কম জটিল রুটটি ব্যবহার করে (অগত্যা সংক্ষিপ্ততম পথ নয়)।

আমি এই সংক্ষিপ্ত সমাধানটিকে ঘৃণা করি, আমি যেটির সাথে প্রাথমিকভাবে এসেছি than এই সমাধানটি এখানে কার্য সম্পাদনের আরও সাধারণ উপায় যা আপনি যে কোনও জায়গায় শুরু এবং শেষ করতে পারেন। এটি সম্পূর্ণরূপে এখানে।

2245 বাইট (আরও সাধারণ উপায়)

1 is waiting at Starchild Numerology.Go to Starchild Numerology:w 1 l 2 r 1 l 1 l 2 l.Pickup a passenger going to Cyclone.Go to Cyclone:e 1 l 2 r.[B]Pickup a passenger going to Addition Alley.Pickup a passenger going to The Babelfishery.Go to The Babelfishery:n 2 r 2 r.Pickup a passenger going to Cyclone.Go to Cyclone:n 5 l 2 l.Pickup a passenger going to Chop Suey.Go to Zoom Zoom:n.0 is waiting at Writer's Depot.Go to Writer's Depot:w.Pickup a passenger going to Narrow Path Park.Go to Narrow Path Park:n 3 r 1 l 1 r.Go to Chop Suey:e 1 r 1 l 1 r.[C]Switch to plan E if no one is waiting.Pickup a passenger going to Crime Lab.2 is waiting at Writer's Depot.Go to Writer's Depot:n 1 l 3 l.Pickup a passenger going to Crime Lab.Go to Crime Lab:n 3 r 2 r.Switch to plan D if no one is waiting.Pickup a passenger going to KonKat's.Go to Narrow Path Park:n 5 l.Pickup a passenger going to KonKat's.Go to KonKat's:e 1 r.Pickup a passenger going to Narrow Path Park.Go to Narrow Path Park:n 2 l.Go to Chop Suey:e 1 r 1 l 1 r.Switch to plan C.[D]Go to Chop Suey:n 5 r 1 l.Switch to plan C.[E]Go to Narrow Path Park:n 1 l 1 r 1 l.Pickup a passenger going to Crime Lab.0 is waiting at Writer's Depot.Go to Writer's Depot:w 1 l 1 r 2 l.1 is waiting at Starchild Numerology.Pickup a passenger going to Crime Lab.Go to Crime Lab:n 3 r 2 r.Switch to plan F if no one is waiting.Pickup a passenger going to Riverview Bridge.Go to Cyclone:n 4 l 2 l.Pickup a passenger going to Post Office.Go to Riverview Bridge:n 2 r.\n is waiting at Writer's Depot.Go to Writer's Depot:w 2 l.Pickup a passenger going to Post Office.Go to Post Office:n 1 r 2 r 1 l.Go to Starchild Numerology:s 1 r 1 l 1 l 2 l.Switch to plan G.[F]Go to Cyclone:s 1 r 1 l 2 r.Pickup a passenger going to Riverview Bridge.Go to Riverview Bridge:n 2 r.Go to Starchild Numerology:w 2 l 3 l 2 r.[G]Pickup a passenger going to Addition Alley.Go to Addition Alley:e 1 l 2 r 3 r 1 r.Pickup a passenger going to Magic Eight.101 is waiting at Starchild Numerology.Go to Starchild Numerology:n 1 l 1 l 3 l 2 r.Pickup a passenger going to Magic Eight.Go to Magic Eight:w 1 r 2 r 1 r.Switch to plan H if no one is waiting.Pickup a passenger going to Cyclone.Go to Cyclone:n 1 l 2 r.Switch to plan B.[H]

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

এবং যদি মেগা-প্রতারণার অনুমতি দেওয়া হয় তবে এটি শেষ দুটির চেয়ে যেকোনভাবে ছোট।

456 বাইট (সম্পূর্ণ প্রতারণা)

1\n3\n4\n5\n6\n7\n8\n9\n10\n11\n13\n14\n15\n16\n17\n18\n19\n30\n31\n33\n34\n35\n36\n37\n38\n39\n40\n41\n43\n44\n45\n46\n47\n48\n49\n50\n51\n53\n54\n55\n56\n57\n58\n59\n60\n61\n63\n64\n65\n66\n67\n68\n69\n70\n71\n73\n74\n75\n76\n77\n78\n79\n80\n81\n83\n84\n85\n86\n87\n88\n89\n90\n91\n93\n94\n95\n96\n97\n98\n99\n100 is waiting at Writer's Depot.Go to Writer's Depot:w 1 l 2 r 1 l 2 l.Pickup a passenger going to Post Office.Go to Post Office:n 1 r 2 r 1 l.

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

— JosiahRyanW
সূত্র
ধন্যবাদ যে জিনিস উদ্ধৃত জিনিস একটি সহায়ক। তবে, "ট্যাক্সি গ্যারেজে যেতে হবে না" জিনিসটির সাথে আমি একমত নই। ত্রুটির সাথে প্রস্থান করা অনুমোদিত? আমি এটিতে সাধারণ নিয়মের একটি ভাল সেট খুঁজে পাচ্ছি না।
— জোশিহায়ারানওয়ান
হ্যাঁ, সাধারণত এসটিডিআরআর উপেক্ষা করা হয়। প্রাসঙ্গিক মেটা
— জো কিং
আমার কিছু উত্তর সেখান থেকে উপকৃত হতে পারে।
— জোশিহায়ারানওয়ান
22

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

k=7
exec"k+=10;print(k>177)*10+k/9;"*81

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

গাণিতিক ক্রিয়াকলাপগুলি কেবল 2 টি ছাড়াই সংখ্যা উত্পন্ন করতে ব্যবহার করে।

মান kপাটিগণিতের অগ্রগতির অনুসরণ করে 17, 27, 37, 47, ..., যা 9 দ্বারা বিভক্ত যখন দেয় 1,3,4,5,6,7,8,9,10,11,13,14,...যা 2 টির মধ্যে শেষ হয় না এমন সংখ্যা গণনা করে ২0 থেকে 29 এড়িয়ে যাওয়ার জন্য একটি নির্দিষ্ট প্রান্তিকের দশমিক 10 আউটপুট বৃদ্ধি করা হয়।

— xnor
সূত্র
14

জাভাস্ক্রিপ্ট (ES6), 43 বাইট

কমাটি-বিচ্ছিন্ন স্ট্রিং হিসাবে ক্রমটি প্রদান করে।

f=(n=98)=>n?f(n-=n-27?n%10?1:2:11)+[,n+3]:1

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

এভাবে কেন করছেন?

আমরা 1 থেকে 100 পর্যন্ত পুনরাবৃত্তি করতে পারি এবং প্রতিটি সংখ্যার সাথে পরীক্ষা করতে পারি /2/.test(n), এটি একটি সংক্ষিপ্ত বিবৃতি। তবে এই দৃশ্যে আমাদের খালি এন্ট্রিগুলিকে এমন কিছু সহ পরিচালনা করতে হবে (/2/.test(n)?'':...)যা আরও কয়েকটা বাইট যুক্ত করে।

উদাহরণস্বরূপ, এটি 45 বাইটের জন্য কাজ করবে :

f=(n=1)=>n>99?n:(/2/.test(n)?'':[n,,])+f(n+1)

অথবা এটি 44 বাইটের জন্য কাজ করবে , যদি একটি অগ্রণী কমা গ্রহণযোগ্য হয়:

f=(n=100)=>n?f(n-1)+(/2/.test(n)?'':[,n]):''

সব মিলিয়ে (এবং অন্যথায় প্রমাণিত হওয়া অবধি), এটি এন এর সমস্ত মানগুলিকে এড়িয়ে যেতে সংক্ষিপ্ত হতে দেখা যাচ্ছে যা 2 রয়েছে ।এন2

মন্তব্য

f =                 // f is a recursive function taking:
(n = 98) =>         // n = counter, initialized to 98
  n ?               // if n is not equal to 0:
    f(              //   prepend the result of a recursive call:
      n -=          //     update n:
        n - 27 ?    //       if n is not equal to 27:
          n % 10 ?  //         if n is not a multiple of 10:
            1       //           subtract 1 from n
          :         //         else:
            2       //           subtract 2 from n
        :           //       else (n = 27):
          11        //         subtract 11 from n (--> 16)
    ) +             //   end of recursive call
    [, n + 3]       //   append a comma, followed by n + 3; notice that this is the value
                    //   of n *after* it was updated for the recursive call; at the first
                    //   iteration, we have: n = 98 -> updated to 97 -> n + 3 = 100
  :                 // else (n = 0):
    1               //   output the first term '1' and stop recursion
— Arnauld
সূত্র
1
এই এত শান্ত!
— এমিগানা 20
1
41 টি বাইট আপনার কৌশলটি ব্যবহার করে যদি আমাদের কাছে একটি শীর্ষস্থানীয় কমা পাওয়া যায়।
— অলিভার
12

আর , 19 বাইট

grep(2,1:100,inv=T)

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

— NGM
সূত্র
grep(2,1:100,inv=T)19.
— জে.ডো 18
2
হা - এটি আমি প্রথমে চেষ্টা করেছিলাম কিন্তু v=Fপাশাপাশি করেছি কারণ স্পষ্টতই আমি নিজেকে ভেবেছিলাম, আমি মূল্যবোধগুলি চাই এবং সূচকগুলিও চাই না ... ডু!
— এনজিএম
রেজেক্সকে নিজেই ইনভার্ট করা একটি বাইট সংক্ষিপ্ত (এই ক্ষেত্রে)।
— এনজিএম
কাজ করে না, এখনও 2s কে অতীত করতে দেয়। আপনার দরকার ^[^2]*$যা কম, কম নয়,
— জে.ডো
4
কি, আমাদের এখন আমাদের উত্তরগুলি চেক করার কথা?
— এনজিএম
10

পার্ল 6 , 22 বাইট

put grep {!/2/},1..100

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

কোড ব্লকটি করার সম্ভবত আরও ভাল উপায় আছে তবে আমি ম্যাচটি উল্টানোর জন্য একটি রেইজেক্স ক্রিয়াপদটি খুঁজে পেলাম না

— জো কিং
সূত্র
সংখ্যাগুলির চারপাশে বন্ধনীগুলি সরান। নাহলে ঠিক আছে।
— মনোলিকা 14
@ মনোলিকা ফিক্সড
— জো কিং
1
@ মনোলিকা এটি কিছুটা অদ্ভুত বলে মনে হচ্ছে যে আপনি আমার উত্তরটি একটি তালিকা হিসাবে মুদ্রণের অনুমতি না হিসাবে প্রকাশ করেছেন, যেখানে আরও অনেক উত্তর এমনটি করে। অন্যদিকে, এটি আমার কোনও বাইট খরচ করে না, তাই যাই হোক না কেন
— জো কিং
7

পাওয়ারশেল , 22 16 বাইট

1..100-notmatch2

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

-6 বাইট মজির ধন্যবাদ

পরিসর উত্পন্ন 1করতে 100, তারপর যারা বস্তুর যেখানে তারা আউট pulls -notmatchসংখ্যা 2। এটির -notmatchমতো অ্যারের বিরুদ্ধে চালানো অ্যারেতে ফিল্টারের মতো কাজ করে। প্রতিটি আইটেম পাইপলাইনে রেখে দেওয়া হয়, এবং আউটপুট অন্তর্ভুক্ত থাকে।

— AdmBorkBork
সূত্র
? 1..100-notmatch2
— mazzy
@ মমজি অবশ্যই আমি কেন এটি ভাবিনি? ধন্যবাদ!
— অ্যাডমবর্কবার্ক
6

হাস্কেল , 48 33 31 বাইট

পনেরো বাইট সংরক্ষণের জন্য @ জোনাথনফ্রেচকে ধন্যবাদ, এবং আরও দুটি জন্য @ এক্সনর! আমি একটি বড় গল্ফ মিস করেছি এবং বুঝতে পারিনি যে main=print$বাদ দেওয়া যেতে পারে।

filter(all(/='2').show)[1..100]

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

পরিবর্তন করে সহজেই প্রসারিত 100। সমস্ত সংখ্যার স্ট্রিংফাই করে এবং কেবল একটি ছাড়াই তাদের রাখে '2'।

— খুলদ্রেসেথ না'বাড়িয়া
সূত্র
এই দেখুন ; এটি main=print$প্রয়োজন হয় না। আপনি কি আপনার কোড পরীক্ষা করেছেন? আমি মনে করি না যে elem'2'এটি বৈধ সিনট্যাক্স। কেন map? সহজভাবে filter(not.elem '2'.show)[1..100]কাজ করে।
— জোনাথন ফ্রেচ
@ জোনাথানফ্রেচ ওয়াও, এটি মিস করেছেন। : / সেই স্পেসটা কোথায় গেল না! এটি টিআইওতে আছে ...
— খুলনায়সথ না'বাড়িয়া
2
Haskell, হয়েছে notElemজন্য not.elem, কিন্তু এমনকি খাটো all(/='2')।
— xnor
5

জাভা 10, 67 বাইট

v->{for(int i=0;++i<101;)if(i%10!=2&i/10!=2)System.out.println(i);}

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

ব্যাখ্যা:

v->{                           // Method with empty unused parameter and no return-type
  for(int i=0;++i<101;)        //  Loop `i` in the range (0, 101)
    if(i%10!=2                 //   If `i` modulo-10 is not 2
       &i/10!=2)               //   And `i` integer-divided by 10 is not 2 either
      System.out.println(i);}  //    Print `i` with a trailing newline
— কেভিন ক্রুইজসেন
সূত্র
5

রেটিনা , 19 17 বাইট


100*
.
$.>`¶
A`2

এটি অনলাইন চেষ্টা করুন! সম্পাদনা করুন: @ovs এর জন্য 2 বাইট ধন্যবাদ সংরক্ষণ করা হয়েছে, যদিও শেষ লাইনে এখন একটি নতুন লাইন রয়েছে। ব্যাখ্যা:


100*

100 টি অক্ষর .োকান।

.
$.>`¶

প্রতিটি অক্ষর প্রতিস্থাপন করুন অক্ষর সংখ্যা পর্যন্ত এবং সেই অক্ষর সহ, একটি নতুন লাইন।

A`2

এগুলিতে থাকা সমস্ত এন্ট্রি সরান 2।

— নিল
সূত্র
কি . $.>`¶দ্বিতীয় পর্যায়ের জন্য কাজ করে?
— ovs
@ovs এর আগে আমার আরও জটিল কিছু হয়েছিল এবং L$শীর্ষস্থানীয় নিউলাইন এড়াতে স্যুইচ করেছিলাম, তাই আমি বুঝতে পারি নি যে আমি ফিরে যেতে পারি, ধন্যবাদ।
— নিল
4

স্ট্যাক্স , 6 বাইট

Ç░τ╒╜h

এটি চালান এবং এটি ডিবাগ করুন

আনপ্যাকড, নিরবচ্ছিন্ন এবং মন্তব্য করা হয়েছে, এটি দেখতে এটির মতো দেখাচ্ছে।

AJ  10 squared
f   output each value in [1 .. n] satisfying the following filter
 E  get array of decimal digits in number
 2#     count the number of 2s
 !  logical not

এটি চালান

— রিকার্সিভ
সূত্র
4

ওল্ফ্রাম ভাষা (গণিত) , 42 বাইট matic

Print@⌈Range[1,100,10/9]~Drop~{18,26}⌉

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

গাণিতিক অনুক্রম 1, 19/9, 29/9, 39/9, ... ঠিক হার সিলিং গ্রহণ 2. তারপর আমরা দ্বারা 29 মাধ্যমে 20 পরিত্রাণ পেতে শেষ হওয়া সমস্ত নম্বর অগ্রাহ্য এ জন্মে Dropপিং মান সূচক 18 থেকে 26।

— মিশা লাভরভ
সূত্র
আমি জানি না যে theক্যমত্যটি Printপ্রয়োজনীয় কিনা, তবে যেভাবেই হোক না কেন সত্যই যত্নশীল।
— মিশা লাভরভ
[...] তবে যাহাই হউক না কেন সত্যই যত্নশীল। - এটাই আত্মা ...
— জোনাথন ফ্রেচ
কি \[LeftCeiling]এবং \[RightCeiling]সত্যিই একটি একক বাইট হিসাবে :) গণনা
— user6014
@ ইউজার 6014 আমি তাদের ইউনিকোডে নেওয়া 3 বাইট হিসাবে গণনা করছি তবে এটি প্রকৃত Ceilingকমান্ডের চেয়ে এখনও কিছুটা সস্তা aper
— মিশা লাভরভ
@ মিশা লাভরভ সাউন্ড ফেয়ার! ঝরঝরে সমাধান।
— ব্যবহারকারী 6014
4

সি (জিসিসি) , 62 55 বাইট

• 7 বাইটস জোনাথন ফ্রেচকে ধন্যবাদ

f(n){for(n=0;++n-101;n/10-2&&n%10-2&&printf("%d,",n));}

1 থেকে 100 পর্যন্ত লুপগুলি কেবল 2 টির মধ্যে না দশকের জায়গায় থাকে তবেই সংখ্যাটি মুদ্রণ করে।

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

— Asleepace
সূত্র
1
— জোনাথন ফ্রেচ
@ জোনাথানফ্রেচ ধন্যবাদ যে চালাক!
— অ্যাস্লিপেস
4

পাওয়ারশেল, 19 বাইট

1..100-split'.*2.*'

এই স্ক্রিপ্টটি '2 টি ভিতরে ভিতরে 2' এর পরিবর্তে নাল-মান দেখায় এবং 'টাস্কের 2 নম্বর কোথাও উপস্থিত না হওয়া উচিত' টাস্কটি পুরোপুরি সমাধান করে।

আউটপুট:

1


3
4
5
6
7
8
9
10
11


13
14
15
16
17
18
19




















30
31


33
34
35
36
37
38
39
40
41


43
44
45
46
47
48
49
50
51


53
54
55
56
57
58
59
60
61


63
64
65
66
67
68
69
70
71


73
74
75
76
77
78
79
80
81


83
84
85
86
87
88
89
90
91


93
94
95
96
97
98
99
100

পাওয়ারহেল (আউটপুট নাল-মান ধারণ করে না), 24 বাইট

1..100-split'.*2.*'-ne''
— mazzy
সূত্র
4

sh + কোর্টিলস, 16 টি অক্ষর

seq 100|sed /2/d

1 থেকে 100 (অন্তর্ভুক্ত) পর্যন্ত ক্রম উত্পন্ন করে এবং এর মধ্যে '2' রয়েছে এমন কোনও লাইন মুছে দেয়।

— therealfarfetchd
সূত্র
এই কোডটি ডিজিটাল ট্রমা দ্বারা উত্তর অনুরূপ ।
— রুসলান
ওহ বাজে, এটিকে দেখেনি, যদিও আমি যাচাই করেছিলাম। আমার পরে পোস্ট করা হওয়ায় আমি কি এটি মুছে ফেলা উচিত?
— therealfarfetchd
4

জেড 80 গল্ফ , 49 48 বাইট

00000000: 1630 2e0a 5faf f57b fe02 2818 82ff f182  .0.._..{..(.....
00000010: ff92 3cf5 7dff f1bd 280a fe02 2803 f518  ..<.}...(...(...
00000020: e63c 18fa 7b3c bd20 db3e 31ff 3dff ff76  .<..{<. .>1.=..v

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

এসেম্বলি:

ld d, 30h			; ascii '0' character
ld l, 0Ah			; number 10 and ascii newline
tens:
	ld e,a			; store tens digit
	xor a			; reset ones digit to 0
	push af			; store initial ones digit 0
	ones:
		ld a,e		; get stored tens digit
		cp 2
		jr z,cont	; if tens digit==2(e.g.20-29),skip loop
		add d
		rst 38h 	; print tens digit
		pop af		; get stored ones digit
		add d
		rst 38h 	; print ones digit
		sub d
		inc a		; increment ones digit
		push af		; store ones digit
		ld a, l
		rst 38h 	; print newline
		pop af		; get stored ones digit again
		cp l
		jr z,cont	; if ones digit==10, break loop
		cp 2
		jr z,inc_again	; if ones digit==2, incr again
		repeat_loop:
		push af		; store ones digit again
		jr ones		; repeat print loop
		inc_again:
			inc a
			jr repeat_loop
		
	cont:
	ld a,e			; get stored tens digit
	inc a			; increment tens digit
	cp l
	jr nz, tens		; if tens place!=10, continue loop
ld a,31h
rst 38h				; print '1'
dec a
rst 38h				; print '0'
rst 38h				; print '0'
halt

repeat_loopলাফ দিয়ে একটি বাইট সংরক্ষণ করা হয়েছে

— Logern
সূত্র
4

পাইথন 3 , 53 51 50 49 46 বাইট

['2'in str(n)or print(n)for n in range(1,101)]

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

এই কাজের জন্য সবচেয়ে শক্তিশালী ভাষা নয়, তবে আমি গল্ফিংয়ে নতুন।

মন্তব্যকারীদের তাদের টিপসের জন্য ধন্যবাদ!

— Gigaflop
সূত্র
পিপিসিজিতে আপনাকে স্বাগতম! এটির আগে স্থানটি মুছে ফেলে আপনি এটি 50 রাউন্ডে নামতে পারেন if।
— এলপেড্রো
[print(n)for n in range(1,101)if"2"not in str(n)]কাজ করে।
— জোশিয়ারআরয়ানডাব্লু
বিকল্পভাবে, পাইথন 2 n=17;exec("print((n>177)*10+n//9);n+=10;"*81)
— জবাবগুলির
পছন্দ করেছেন
— গিগাফ্লপ
1
'2'in str(n)or print(n)একটি বোধগম্য রক্ষীর চেয়ে কম হয়।
— জোনাথন ফ্রেচ
4

Tcl , 44 বাইট

time {if ![regexp 2 [incr i]] {puts $i}} 100

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

Tcl , 47 বাইট

time {if [incr i]%10!=2&$i/10!=2 {puts $i}} 100

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

টিসিএল , 50 বাইট

time {if {2 ni [split [incr i] ""]} {puts $i}} 100

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

— sergiol
সূত্র
# টিসিএল , 49 বাইট time {if [string f 2 [incr i]]==-1 {puts $i}} 100 - ব্যর্থ আউটগল্ফ!
— sergiol
আপনি আপনার পরীক্ষাটি একটি regexp: ![regexp 2 [incr i]]-৩ বাইট দ্বারা প্রতিস্থাপন করতে পারেন
— ডেভিড
@ ডেভিড কীভাবে সম্ভব হয়েছিল যে আপনি নিয়মিত এক্সপ্রেশন ব্যবহার করার পরামর্শ দিয়েছিলেন আমি সেই সমাধানটি দিয়ে আসিনি? ধন্যবাদ।
— সার্জিওল
3

বাশ , 31 বাইট

printf %d\\n {1..100}|grep -v 2

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

সংক্ষিপ্ত লুপের জন্য ডিজিটাল ট্রমা ধন্যবাদ।

— কিটোন
সূত্র
1
পিপিসিজিতে আপনাকে স্বাগতম! echo $iপ্রিন্টফের পরিবর্তে কেমন ? নাকি আরও ভাল printf %d\\n {1..100}|grep -v 2?
— ডিজিটাল ট্রমা
হ্যাঁ ঠিক. আমি আমার উত্তর আপডেট করব।
— কেটোন
আমি আসলে শিখছি আমি এতটা বিটিডব্লু ধন্যবাদ জানিনা।
— কেটোন
সবেমাত্র আমার echo {1..100}|tr ' ' \\n|grep -v 2
— মার
এর sed /2/dপরিবর্তে -1 বাইট ব্যবহার করুন grep -v 2।
— রুসলান
3

ওআরকে , 1092 বাইট

There is such a thing as a t
A t can w a number
A t can d a number
A t has a t which is a number

When a t is to w a number:
I have a mathematician called M
M's first operand is the number
M's second operand is 1
M is to add
The number is M's result
My t is 0
I have a number called n
n is the number
I am to d n
M's first operand is my t
M's second operand is 1
M is to compare
I have a scribe called W
If M says it's less then W is to write the number
If M says it's less then W is to write " "
M's first operand is the number
M's second operand is 100
M is to compare
If M says it's less then I am to loop

When a t is to d a number:
I have a mathematician called M
M's first operand is the number
M's second operand is 10
M is to modulo
I have a mathematician called N
N's first operand is M's result
N's second operand is 2
N is to compare
If N says it's equal then my t is 1
M is to divide
The number is M's result
M's first operand is the number
M's second operand is 0
M is to compare
If M says it's greater then I am to loop

When this program starts:
I have a t called T
T is to w 0

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

হে বেক্টস আর কে ওল দেয়। আউটপুট হল সংখ্যার একটি স্থান-বিস্মৃত তালিকা।

এটি নিম্নলিখিত সিউডোকোডে (প্রায়) অনুবাদ করে:

class t {
	int t;
	
	void w(number) {
		label T_W;
		mathematician M;
		M.first_operand = number;
		M.second_operand = 1;
		M.add();
		number = M.result;
		t = 0;
		int n = number;
		d(n);
		M.first_operand = t;
		M.second_operand = 1;
		M.compare();
		scribe W;
		if M.its_less { W.write(number); }
		if M.its_less { W.write(" "); }
		M.first_operand = number;
		M.second_operand = 100;
		M.compare();
		if M.its_less { goto T_W; }
	}
	
	void d(number) {
		label T_D;
		mathematician M;
		M.first_operand = number;
		M.second_operand = 10;
		M.modulo();
		mathematician N;
		N.first_operand = M.result;
		N.second_operand = 2;
		N.compare();
		if N.its_equal { t = 1; }
		M.divide();
		number = M.result;
		M.first_operand = number;
		M.second_operand = 0;
		M.compare();
		if M.its_greater { goto T_D; }
	}
}

void main() {
	t T;
	T.w(0);
}

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

— JosiahRyanW
সূত্র
3

পিএইচপি 7.1, 40 বাইট

while($i++<100)strstr($i,50)||print$i._;

আন্ডারস্কোর দ্বারা পৃথক করা সংখ্যাগুলি মুদ্রণ করে। এটি দিয়ে চালান -nrবা অনলাইনে চেষ্টা করুন ।

— তিতাস
সূত্র
সংখ্যাগুলি আলাদা করার জন্য পিএইচপি-র উদ্ভাবনী আচরণের দুর্দান্ত ব্যবহার, হাহাকার
— রবার্তো মালদোনাদো
1
preg_filter()ভিত্তিকটির আকর্ষণীয়। (আমি যে ফাংশন আর কখনও ব্যবহৃত 🤫।) এক সঙ্গে খাটো করা হবে preg_grep(): <?=join(_,preg_grep("/2/",range(1,100),1));।
— manatwork
2

ব্রেনফাক , 176 বাইট

---------[[-<]-[>]>[>]-[-<]<++]-[>-<+++++++++]>--[>[->]<[<<<]>>[->]>-]<<,<-[-<]>[>]<[.[->+<]++++++++++.,<]>>[>]>>->-<<<<[>>>[<<[<]<.>>[>]>.[-<+>]++++++++++.,>]<<[<]<,<]>>>>.<..

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

খাটো অবশ্যই সম্ভব। এটি সংখ্যা উত্পন্ন করে 1,3,4,5,6,7,8,9এবং 0,1,3,4,5,6,7,8,9। প্রথমে এটি প্রতিটি তালিকার প্রথম তালিকায় আউটপুট দেয়, তারপরে এটি প্রথম এবং দ্বিতীয় তালিকার প্রতিটি সংমিশ্রণকে আউটপুট দেয়, শেষ পর্যন্ত কেবল মুদ্রণ করে100 ।

ব্যাখ্যা:

---------   Push minus 9
[           Repeat 9 times
  [-<]-[>]    Add the negative of the number to the first list
  >[>]-[-<]<  Add the negative of the number to the second list
  ++          Increment the counter
]
Tape: 255 254 253 252 251 250 249 248 247 0' 0 246 247 248 249 250 251 252 253 254
-[>-<+++++++++]>--  Push 197
Tape: 255 254 253 252 251 250 249 248 247 0 197' 246 247 248 249 250 251 252 253 254
[
  >[->]<    Subtract 197 from every element in both lists to convert to digits
  [<<<]>>
  [->]>-
]
Tape: 58 57 56 55 54 53 52 51 49 0' 49 50 51 52 53 54 55 56 57
<<,<-[-<]>[>]<  Remove the 0 and the 2 from the first list
Tape: 58 57 56 55 54 53 52 51 0 0 0' 49 50 51 52 53 54 55 56 57
[  Loop over the first list
  .[->+<]        Print digit
  ++++++++++.,<  Print a newline
]
>>[>]>>->-   Remove the 2 from the second list
<<<<      
[  Loop over first list
  >>>
  [  Loop over second list
    <<[<]<.        Print first digit
    >>[>]>.        Print second digit
    [-<+>]         Move second digit over one
    ++++++++++.,>  Print a newline
  ]
  <<[<]<,<  Remove the digit from the first list and move to the next
]
>>>>.<..  Print 100 using the second list
— জো কিং
সূত্র
2

সিম্পিম্পেল্পলেট , 51 বাইট

এটি একটি মজার চ্যালেঞ্জ ছিল! এবং এটি একটি চ্যালেঞ্জ যেখানে আমার ভাষা ভাল করতে পারে।

{@forfrom 1to100}{@if_ is notmatches"<2>"}{@echol_}

1 থেকে 100 পর্যন্ত সমস্ত মানকে চক্র করে, একটি নিউলাইন দ্বারা পৃথক করে 2 না থাকা মানকে আউটপুট করে।

আপনি এটি http://sandbox.onlinephpfunifications.com/code/2c97a2b6954c29844f1079938da771d51e2e0d99 এ চেষ্টা করতে পারেন

Ungolfed:

{@for i from 1 to 100}
    {@if i is not matches "<2>"}
        {@echo i, "\n"}
    {@/}
{@/}

{@/}বন্ধ করতে ব্যবহার করা হয় {@for ...}এবং {@if ...}, কিন্তু ঐচ্ছিক।
পিএইচপি সংকলন করার সময়, এটি প্রয়োজনীয় বন্ধ করে দেয়।

আপনি যদি কৌতূহলী হন তবে এই পিএইচপি কোডে গল্ফ কোডগুলি ফলাফল:

// {@forfrom 1to100}
// ~ optimization enabled ~ inlining the results
foreach(array(...) as $DATA['_']){

    // {@if_ is notmatches"<2>"}
    if(!(preg_match("<2>", (isset($DATA['_'])?$DATA['_']:null)))) {

        // {@echol_}
        echo implode('', $FN['array_flat']((isset($DATA['_'])?$DATA['_']:null)));echo PHP_EOL;


// AUTO-CLOSE
};};

$FN['array_flat']এই কোডের বাইরে যেখানে সংজ্ঞায়িত করা হয়েছে।

— ইসমাইল মিগুয়েল
সূত্র
আমাদের সাইট ব্যবহার করে, আপনি স্বীকার করেছেন যে আপনি আমাদের কুকি নীতি এবং গোপনীয়তা নীতিটি পড়েছেন এবং বুঝতে পেরেছেন ।
Licensed under cc by-sa 3.0 with attribution required.