অটোগ্রাম প্রোগ্রাম


34

এই বাক্যটি দু'এ, দুই সি, দুই ডি এর, আঠারটি ই, পাঁচ ফ এর, তিন জি এর, আট এইচ, এগারটি আই, তিন এল, দুই মি, তেরো এন, নন ও,, পি পি, পঞ্চাশ, পঁচিশ s এর, তেইশটি টি, ছয়টি v এর দশটি ডাব্লু, দুটি এক্স, পাঁচটি y এবং একটি জেড

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

আপনার প্রোগ্রামকে প্রত্যক্ষ বা অপ্রত্যক্ষভাবে তার নিজস্ব উত্স কোডটি পড়তে হবে না , তবে এর পরিবর্তে এটির আউটপুট দেওয়ার জন্য যে সমস্ত ডেটা প্রয়োজন তা অবশ্যই কঠোর কোডিং, কুইন শৈলী হতে হবে। আপনার প্রোগ্রামটির দৈর্ঘ্য কমপক্ষে একটি বাইট হতে হবে।

এটি , তাই সংক্ষিপ্ত এন্ট্রি (বাইটে) জিতেছে। আমি কোনও উত্তর গ্রহণ করব না, তাই আপনার পছন্দের ভাষায় স্বল্পতম সমাধানের জন্য নির্দ্বিধায় দ্বিধা করুন।

আপনার পোস্টে একটি ব্যাখ্যা অন্তর্ভুক্ত করার জন্য আপনাকে উত্সাহিত করা হচ্ছে।

লিডারবোর্ড

সামগ্রিক স্কোর এবং প্রতি ভাষা উভয়ের জন্য নীচে লিডারবোর্ড রয়েছে:


5
স্যান্ডবক্স । (এটি ২০১৪ সাল থেকে সেখানে রয়েছে!)
নাথানিয়েল

ফাংশন অনুমোদিত, বা শুধুমাত্র সম্পূর্ণ প্রোগ্রাম?
উরিল

1
নোট: অনুরূপ উত্তরগুলি এই এক আর বৈধ হিসাবে গণনা করা হয় না।
ব্যবহারকারী 202729 14

1
এফডব্লিউআইডাব্লু, যথাযথ কোয়েইন সংজ্ঞাটি আমি এই চ্যালেঞ্জের পক্ষে সত্যিই চাই তার চেয়ে কিছুটা শক্তিশালী। উদাহরণস্বরূপ, আমি এমন একটি প্রোগ্রাম দেখে বেশ খুশি হব যা কিছু অক্ষরযুক্ত পরিসরে সমস্ত অক্ষর ব্যবহার করে এবং কেবল একটি 1 আউটপুট দেয় যদি এর ইনপুটটি সেই পরিসরে থাকে, যদিও এতে প্রোগ্রামটির একটি অংশ নেই যা এনকোড করে থাকে প্রোগ্রামের একটি পৃথক অংশ "। এই কারণে আমি রেটিনা উদাহরণটি অনুমোদন করতে ইচ্ছুক ছিলাম, যদিও এটি হতাশাজনক হত যদি এটি অন্যদের পোস্টিং থেকে সরিয়ে রাখে, ইতিমধ্যে মাত্র 1 বাইট হওয়ার কারণে। (@ ব্যবহারকারী202729)
নাথানিয়েল

1
আমার উপরের মন্তব্যের কারণে, আমি কুইন বিধি প্রযোজ্য বিবৃতিটি সরিয়েছি। (আমি উত্স কোডটি না পড়ার বিষয়ে অংশ রেখেছি।)
নাথানিয়েল

উত্তর:


15

অক্টাভা , 44 বাইট

@(x)sum([[39,'(())*,239==@[[]]msuxx']]==x)*2

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

ফাংশনের প্রতিটি অক্ষরকে ইনপুট হিসাবে ব্যবহার করার সময় ফাংশনের ফলাফল:

'  (  )  *  ,  2  3  9  =  @  [  ]  m  s  u  x  
2  4  4  2  2  2  2  2  4  2  4  4  2  2  2  4  

অন্যান্য সমস্ত ইনপুট অক্ষর একটি শূন্য প্রদান করে।

আমাকে পালাতে 'হয়েছিল এই সত্যটি এটি পুরোপুরি দীর্ঘায়িত করেছিল। 4 টি প্রথম বন্ধনীর জন্য অ্যাকাউন্ট করার জন্য, আমার কাছে স্ট্রিংয়ে একটি নকল ছিল। যাইহোক, ডুপ্লিকেট করে অ্যাডাস্ট্রোফগুলি অ্যাডাস্ট্রোফস নেয়, সুতরাং এটি আমাদের সঠিক ফলাফল থেকে আরও এগিয়ে নিয়ে যায়। অতএব, আমাকে এর এএসসিআইআই-মান দিয়ে অ্যাডাস্ট্রোফের সংখ্যা গণনা করতে হয়েছিল 39। অবশ্যই এর অর্থ আমি অক্ষরের জন্য পরীক্ষা করার ছিল 3এবং 9খুব, এটি সমস্ত একটি অনেক লম্বা করে।


2
এই ধরণের জিনিসটি আমি আরও দেখতে আশা করি। (কেবলমাত্র একটি স্ট্যান্ডার্ড কুইন নেওয়া এবং চরিত্রগুলি গণনা করার জন্য কোড যুক্ত করার পরিবর্তে সমস্যার জন্য অপ্টিমাইজ করা))
নাথানিয়েল

7

এক্সেল, 84 বাইট

=IFERROR(MID("65496331125442343343233",FIND(A1,"""123456789,()=MINORFADEOMEN"),1),0)

Find()A1স্ট্রিংয়ের মধ্যে কক্ষের মান সন্ধান করবে "123456789,()=MINORFADEOMEN( """শুরুতে অক্ষরটি থেকে বাঁচতে হবে এবং কেবল মূল্যায়ন করবে ")।

ফলাফলের ভিত্তিতে Find(), Mid()ফাংশন সংখ্যার স্ট্রিং থেকে সংশ্লিষ্ট চরিত্রটি ফিরিয়ে দেবে। পরিবর্তন শুরু হওয়া অবধি এই স্ট্রিংটি পুনরাবৃত্তির মাধ্যমে তৈরি করা হয়েছিল।

যদি অক্ষরটি A1খুঁজে পাওয়া যায় না, Find()ত্রুটি IfError()ফেরায় যাতে ফাংশন 0পরিবর্তে ফিরে যায় ।

OMENস্ট্রিং হচ্ছে অনুসন্ধান করা শেষে Find()ফাংশন ডুপ্লিকেট অক্ষর তাই তাদের অবস্থান কখনোই ফেরত পাঠানো হবে কিন্তু তারা চরিত্র গন্য সমন্বয় প্রয়োজন ছিল হয়। সেগুলি ছাড়াই পরিবর্তনগুলি গণনা করার একটি অন্তহীন লুপ ছিল। চিঠি বিন্যাস স্টাইলিস্টিক পছন্দ।


5

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

ফাংশনের উত্সটি পড়েন না, তবে এটি বেশ দীর্ঘ। 1-বর্ণের স্ট্রিং হিসাবে ইনপুট নেয়।

i=>~(n='\\34=\'in(|)0257?:.>[]Odefx~'.indexOf(i))?'3733544333'[n]||2:0

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


স্বতন্ত্র চরিত্রের পরিমাণ কমিয়ে আনার জন্য আপনি কিছুটা কাজ করে এই গোছাটি ছোট করতে পারেন: i=>'36335633'[i='\\36=\'i|&()25.>[]Odefx~n'.indexOf(i)]||~i&&2(8 বাইট সংরক্ষিত)
ইয়ায়ার র্যান্ড

5

রেটিনা , 1 বাইট

কুইন রুলস কঠোরভাবে অনুসরণ করলে এটি বৈধ হবে না, তবে ওপি স্পষ্ট করে একটি মন্তব্যে এটিকে অনুমতি দিয়েছে ।

x

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

রেটিনায় একটি একক-লাইন প্রোগ্রাম ইনপুটটিতে সেই রেজেক্সের উপস্থিতি গণনা করে। এই চ্যালেঞ্জ ছাড়া কোনো একক হওয়া ASCII অক্ষর দ্বারা সমাধান করা হয় `, ., +, *, ?, [, (, ), ^, $, \এবং সম্পর্কে newline।


5

সি # (ভিজ্যুয়াল সি # সংকলক) , 88 57 বাইট

x=>"\\\"(())==>>??..::3300CCaaiinoossttx".Contains(x)?3:0

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

রিটার্নস 3 যদি স্ট্রিং পাস গৃহস্থালির কাজ রয়েছে, অন্যথায় ফেরৎ 0. স্ট্রিং অন্তত একবার এবং ঠিক পরিমাণ গৃহস্থালির কাজ আছে প্রয়োজন কোডের প্রতিটি অক্ষর রয়েছে 3 কোডে বার।

-31 বাইট কেভিন ক্রুইজসেনকে ধন্যবাদ


চমৎকার পন্থা! আমার কাছ থেকে +1 আপনার চারপাশের প্রথম বন্ধনী সরিয়ে কিছু বাইট সংরক্ষণ করতে পারবেন (a)=>তাই এবং পরিবর্তে স্ট্রিং গৃহস্থালি হিসাবে ইনপুট গ্রহণ .ToString()আর প্রয়োজনীয় (এবং a+""সেইসাথে ব্যবহৃত হয়ে থাকতে পারে, কোড-গলফ চ্যালেঞ্জ করার জন্য আপনাকে প্রয়োজন হবে না .ToString())। এছাড়াও, যেহেতু .Containsইতিমধ্যে একটি অন্তর্ভুক্ত রয়েছে a, আপনি ইনপুট-ভেরিয়েবলটিকে 4 টির পরিবর্তে প্রতিটি অক্ষরের জন্য 3 টির জন্য আলাদা অব্যবহৃত অক্ষর (যেমন xবা q) তৈরি করতে পারেন: সম্পাদনা: শেষ অংশটি মনে করবেন না, আমি দেখি "এখন 4 বারও ব্যবহৃত হয়েছে।
কেভিন ক্রুইজসেন

@ কেভিন ক্রুজসেন পরামর্শের জন্য ধন্যবাদ। তবে স্ট্রিংটি কি ইনপুট হিসাবে বৈধ? ওপিকে বিবেচনা করে ইনপুট হিসাবে বাইট চেয়েছিলেন?
হায়ারাস

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

1
@ কেভিন ক্রুজসেন যুক্তিসঙ্গত মনে হচ্ছে। এবং যদি আমরা "একটির হাত থেকে বাঁচতে পারি তবে আমরা প্রতি
চার্চে

2
একক অক্ষরের স্ট্রিংগুলি ইনপুট হিসাবে আমার দ্বারা ঠিক আছে।
নাথানিয়েল

4

হাস্কেল , 66 বাইট

প্রথম দুটি সংস্করণ মূলত একটি কুইন যা প্রয়োজনীয় অক্ষরগুলি ফিল্টার করে এবং তারপরে দৈর্ঘ্য গ্রহণ করে:

q c=length.filter(==c)$id<>show$"q c=length.filter(==c)$id<>show$"

এটি অনলাইনে চেষ্টা করুন বা সমস্ত অক্ষরের সাথে পরীক্ষা করুন! *


(<>)72 বাইট ছাড়াই বিকল্প

q c=length.filter(==c)$(++)<*>show$"q c=length.filter(==c)$(++)<*>show$"

এটি অনলাইনে চেষ্টা করুন বা সমস্ত অক্ষরের সাথে পরীক্ষা করুন!


নন-কুইন বিকল্প, 87 86 বাইট

এখনও উন্নতি হতে পারে তবে আমি খুশি যে আমি এটিকে মাত্র তিনটি পৃথক গ্রুপে নামিয়েছি।

আমি এটি সবচেয়ে পছন্দ করি যদিও এটি সর্বাধিক বাইট গণনা করে। এটি 2,3 এবং 7 এর যোগফল হিসাবে অক্ষর / বাইট গণনাটি গণনা করে (কিছু অক্ষর একাধিক গ্রুপে কেমন রয়েছে তা নোট করুন):

u t=sum[fst e|e<-[(2," ()-237<=dflnst|"),(3," ()[\\]`mstu"),(7,"\",ee")],t`elem`snd e]

এটি অনলাইনে চেষ্টা করুন বা সমস্ত অক্ষরের সাথে পরীক্ষা করুন!


* আমদানি (<>)কারণ টিআইওর জিএইচসি সংস্করণ 8.0.2


3

পাইথন 2 , 54 52 32 বাইট

-20 বাইট ovs ধন্যবাদ

("''+.23cnotu()"*2+'"*'*3).count

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


1
আপনার কীভাবে ল্যাম্বদা বা ইনপুট নেই?
স্টিভি গ্রিফিন

2
@ স্টেভিগ্রিফিন পাইথন স্বয়ংক্রিয়ভাবে একটি পদ্ধতি রেফারেন্স বাঁধে, তাই "xxx".countএর সমতুল্য lambda c:"xxx".count(c)
নীল

@ স্টিভি গ্রিফিন এবং আপনি উভয়ই একইভাবে ব্যবহার করেন -> f="xxx".countএবং f=lambda c:"xxx".count(c)ডাকা হবেf('a')
রড

3

হুশ , 11 10 8 বাইট

ধন্যবাদ লিও -২ বাইটের জন্য!

#sD"#sD"

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

ব্যাখ্যা

এটি নিশ্চিত করে যে এটি কেবলমাত্র ASCII ব্যবহার করে (কারণ showএটি বিঘ্নিত হবে) এবং প্রতিটি অক্ষর দু'বার অন্তর্ভুক্ত রয়েছে:

#sD"#sD"  -- character as input, eg. '"'
   "#sD"  -- string literal (note the redundant '"'): "#sD"
  D       -- double: "#sD#sD"
 s        -- show: "\"#sD#sD\""
#         -- number of occurences: 2

স্ট্যান্ডার্ড কুইন এক্সটেনশন, 11 বাইট

#hS+s"#hS+s

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

ব্যাখ্যা

#hS+s"#hS+s  -- character as input, eg. '"'
     "#hS+s  -- string literal: "#hS+s"
  S+         -- join with itself: ("#hS+s"++)
    s        -- | and itself shown: "\"#hS+s\""
             -- : "#hS+s\"#hS+s\""
 h           -- init: "#hS+s\"#hS+s"
#            -- number of occurences in string: 1

1
স্ট্রিংটি দেখানোর আগে দ্বিগুণ করে আপনি কোটগুলি আরও সহজে পরিচালনা করতে পারেন: এটি অনলাইনে চেষ্টা করুন!
লিও

3

জাভা 10, 164 81 57 বাইট

q->"q-->>\\\"..ccoonttaaiiss(())??33::00".contains(q)?3:0

@ হায়ারাসের সি # উত্তর বন্দর , সুতরাং তাকে উর্ধ্বমুখী করা নিশ্চিত করুন!

ব্যাখ্যা:

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

q->      // Method with String parameter and integer return-type
  "q->\\\"..ccoonttaaiiss(())??33::00".contains(q)?
         //  If the string above contains the input character
   3     //   Return 3
  :      //  Else:
   0     //   Return 0

ওল্ড 164-বাইট উত্তর:

c->{var s="c->{var s=%c%s%1$c;return s.format(s,34,s).replaceAll(%1$c[^%1$c+c+']',%1$c%1$c).length();}";return s.format(s,34,s).replaceAll("[^"+c+']',"").length();}

ব্যাখ্যা:

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

c->{                                  // Method with char parameter and integer return-type
  var s="c->{var s=%c%s%1$c;return s.format(s,34,s).replaceAll(%1$c[^%1$c+c+']',%1$c%1$c).length();}";
                                      //  Unformatted source code
  return s.format(s,34,s)             //  Create the formatted source code (the quine),
          .replaceAll("[^"+c+']',"")  //  remove all characters not equal to the input,
          .length();}                 //  and return the length

:

  • স্ট্রিংটিতে sঅপঠিত উত্স কোড রয়েছে।
  • %sএই স্ট্রিংটি নিজের সাথে ইনপুট করতে ব্যবহৃত হয় s.format(...)
  • %c, %1$cএবং 34এগুলি ডাবল-কোট ফর্ম্যাট করতে ব্যবহৃত হয়।
  • s.format(s,34,s) সব একসাথে রাখে

চ্যালেঞ্জ অংশ:

  • .replaceAll("[^"+c+']',"") ইনপুট সমান অক্ষর ব্যতীত সমস্ত অক্ষর সরিয়ে দেয়।
  • .length() তারপরে এই স্ট্রিংয়ের দৈর্ঘ্য লাগে।

দ্রষ্টব্য: .split(c).length( Stringপরিবর্তে ইনপুট সহ char) কম মনে হতে পারে তবে দুটি সমস্যা রয়েছে:

  1. প্রথম অক্ষরটি একটি ভুল ফল দেয়, সুতরাং যদি c( c->শীর্ষস্থানীয় অংশ সহ) ইনপুট হয় তবে এটি ভুলভাবে একটি চরিত্রকে খুব কম করে ফিরিয়ে দেবে। এটি +(c==99?1:0)সোর্স কোড এবং অপরঠিত উত্স কোড স্ট্রিং উভয়ই যোগ করে এবং এটিতে পরিবর্তন .split(c)করা যায় .split(c+""), তবে তারপরে আমাদের এখনও নিম্নলিখিত সমস্যাটি রয়েছে:
  2. যদি কোনও রেজেক্স অক্ষর (অর্থাত্ $) ইনপুট হয়, তবে .splitএকটি ভুল ফলাফল দিয়ে রেগেক্স হিসাবে এটি ব্যাখ্যা করবে the

3

হাস্কেল , 58 বাইট

f c=sum[2|x<-succ '!':"f c=sum[2|x<-succ '!':,x==c]",x==c]

এটি অনলাইন চেষ্টা করুন! বা সমাধান যাচাই করুন

একই বাইট গণনা বিকল্প:

f c=sum[2|x<-tail$show"f c=sum[2|x<-tail$show,x==c]",x==c]
f c=sum[1|x<-id<>show$"f c=sum[1|x<-id<>show$,x==c]",x==c]

হাস্কেল , 90 বাইট

sum.($zip"1234\"$,.[\\]opu+()iklmsz652"$[4,4,11,3,3,3,16,5,3,3,3,3,3,3,3]++[2,2..]).lookup

এটি অনলাইন চেষ্টা করুন! বা সমাধান যাচাই করুন । সত্য sum Nothing = 0এবং উদাহরণস্বরূপ ব্যবহার করে sum (Just 4) = 4


3

স্মলটাক , 112 132 বাইট

স্মলটাল্ক সঠিকভাবে এর গল্ফযুক্ত উপযুক্ততার জন্য পরিচিত নয় :-)

ক্লাস ক্যারেক্টারে সংজ্ঞায়িত পদ্ধতিটি (ভিএ স্মলটালক এবং স্কোয়াক পরীক্ষিত, অন্যান্য উপভাষায় যেমন ভিজুয়াল ওয়ার্কস এবং ফারোতেও কাজ করা উচিত):

a^(0to:6),#(10 18)at:(#('' ',[]^|+68cForu' '#0adefln' '1it' '()' ':s' ' ' '''')findFirst:[:s|s includes:self])+1

উত্সটিতে ঘটে যাওয়া অক্ষরগুলি ঘটনা গণনা অনুসারে গোষ্ঠীভুক্ত হয়। গ্রুপগুলি প্রথমটির জন্য পরীক্ষা করা হয় যার মধ্যে রিসিভার রয়েছে, এবং ম্যাচের উপস্থিতি গণনাটি ফিরে আসবে।

পুরানো পদ্ধতি:

a^('''''((((())))):::[[[[]]]]^^^^^0000066666aaaacccccdddddeefffFFFFFiiilllnnnnnrrrrrsssTTTTTuuuu'includes:self)ifTrue:[6]ifFalse:[0]

পদ্ধতিতে প্রদর্শিত প্রতিটি অক্ষর হ'ল 6 বার প্রদর্শিত হয় (স্ট্রিং ধ্রুবকটিতে পুনরাবৃত্তি করে), সুতরাং পদ্ধতিটি কেবল পরীক্ষা করে যে রিসিভারটি স্ট্রিংয়ে রয়েছে কিনা এবং অন্যথায় 0 হলে 6টি প্রদান করে returns

উপরের পদ্ধতিটি সংজ্ঞায়িত করার পরে, আপনি এটি ব্যবহার করে যাচাই করতে পারেন

| code |
code := Character sourceCodeAt: #a.
((0 to: 255) collect: [:b | b asCharacter]) reject: [:c | c a = (code occurrencesOf: c)]

ফলাফলটি খালি থাকতে হবে।


1
পিপিসিজিতে আপনাকে স্বাগতম!
মার্টিন এন্ডার

2

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

f=c=>~-`f=${f}`.split(c).length

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


1
আমি মনে করি এটির নিজস্ব উত্স কোডটি পড়ে, তাই না? প্রশ্নে এটি স্পষ্টভাবে নিষিদ্ধ করা হয়েছে bold
নাথানিয়েল

1
@ নাথানিয়েল, এখানে দেখুন
শেগি

2
হুম। ভাল সততার সাথে আমি মনে করি এটি নির্বোধ, তবে আমি মনে করি যে মেটা sensকমত্যের সাথে আমি সত্যিই একমত হতে পারি না।
নাথানিয়েল

1
@ নাথানিয়েল যে সমস্ত প্রোগ্রামের পক্ষে সহজলভ্য হয়, তাদের পক্ষে কুইনও সহজ হয়।
ব্যবহারকারী 202729

1
@ user202729 আমি মনে করি না যে এটি অনুসরণ করে, তাই না? উদাহরণস্বরূপ, আপনি পাইথনে একই কৌশল করতে পারবেন না। এটি একটি বিপরীত ইওল, কোনও বিবর্তন নয়
নাথানিয়েল



2

হাস্কেল , 96 বাইট

n"n"=15;n"="=14;n" "=2;n";"=13;n"\\"=3;n"\""=25;n"0"=2;n"1"=4;n"2"=4;n"3"=4;n"4"=5;n"5"=5;n n3=0

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

হাস্কেল , 109 বাইট

n 'n'=15;n '='=14;n ' '=14;n ';'=13;n '\\'=3;n '\''=25;n '0'=2;n '1'=5;n '2'=4;n '3'=4;n '4'=5;n '5'=5;n n3=0

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

হাস্কেল , 122 বাইট

n 'n'=21
n '='=14
n ' '=14
n '\n'=12
n '\\'=4
n '\''=32
n '0'=2
n '1'=5
n '2'=5
n '3'=3
n '4'=5
n '5'=5
n nnnnnn4'''''''=0

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

ব্যাখ্যা

এই উত্তরগুলি ভয়ঙ্করভাবে পরিশীলিত নয়। এটি ঘোষণার একটি সিরিজ, প্রোগ্রামে উপস্থিত প্রতিটি চরিত্রের জন্য একটি। প্রোগ্রামটিতে উপস্থিত না থাকা অক্ষরের জন্য আমাদের শেষে 0 টি পাওয়া যায় যা প্রত্যাবর্তন করে।

প্রোগ্রামে প্রয়োজনীয় অক্ষরের সংখ্যা হ্রাস করার জন্য আমি বেশ কয়েকটি কৌশল ব্যবহার করি এবং সেখান থেকে আমি জিনিসগুলির সাথে ফিড করেছিলাম যতক্ষণ না সংখ্যাগুলি ঠিক ঠিক বের হয়। আপনি দেখতে পাচ্ছেন যে আমি তাদের শেষ 3 টিতে সর্বশেষ ঘোষণায় চলক নামটি প্যাড করেছি। 3 টি প্রোগ্রামের মধ্যে পার্থক্য হ'ল আমি কোনও নতুন লাইন ব্যবহার করা বেছে নিয়েছি বা ;লাইন ব্রেকগুলির জন্য এবং আমি চরগুলি ইনপুট বা স্ট্রিং হিসাবে নেওয়া বেছে নিয়েছি কিনা। এ ;পদ্ধতির অন্যের চেয়ে সহজাতভাবে উচ্চতর বলে মনে হয় না এটি কেবল ভাগ্য পায় এবং আরও কম শেষ হয়, তবে মনে হয় স্ট্রিংস ব্যবহার করা চার্সের চেয়ে ভাল ধারণা কারণ চরগুলি স্ট্রিংস না করে ক্রিয়াকলাপের পরে ফাঁকির প্রয়োজন হয়।


: | আপনার বানানটির ব্যাখ্যায় কী হয়েছিল
ASCII- কেবল

2

হোয়াইটস্পেস , 140 বাইট

[S S S N
_Push_0][S N
S _Duplicate][S N
S _Duplicate][T N
T   S _Read_STDIN_as_character][T   T   T   _Retrieve][S S S T  S S T   N
_Push_9][T  S S T   _Subtract][S N
S _Duplicate][N
T   S S T   N
_If_0_Jump_to_Label_TAB][S S S T    N
_Push_1][T  S S T   _Subtract][S N
S _Duplicate][N
T   S S N
_If_0_Jump_to_Label_NEWLINE][S S S T    S T T   S N
_Push_22][T S S T   _Subtract][N
T   S T N
_If_0_Jump_to_Label_SPACE][N
S T N
_Jump_to_Label_PRINT][N
S S S T N
_Create_Label_TAB][S S S T  S S T   S T N
_Push_37][N
S T N
_Jump_to_Label_PRINT][N
S S S N
_Create_Label_NEWLINE][S S S T  S S S S T   N
_Push_33][N
S T N
_Jump_to_Label_PRINT][N
S S T   N
_Create_Label_SPACE][S S S T    S S S T T   S N
_Push_70][N
S S N
_Create_Label_PRINT][T  N
S T _Print_as_integer]

বর্ণ S(স্থান), T(ট্যাব) এবং N(নতুন-লাইন) কেবল হাইলাইট হিসাবে যুক্ত করা হয়েছে।
[..._some_action]শুধুমাত্র ব্যাখ্যা হিসাবে যুক্ত।

70 টি স্পেস, 37 টি ট্যাব এবং 33 টি নতুন লাইন ব্যবহৃত।

সাধারণত আমি অনুক্রমে লেবেল তৈরি ব্যবহার NSSN, NSSSN, NSSTN, NSSSSN, NSSSTN, NSSTSN, NSSTTN, ইত্যাদি কিন্তু কারণ একটি সংখ্যা যেখানে বাইনারি মুদ্রণ S=0/ T=1ব্যবহার করা হয় সংখ্যা আমি আউটপুট প্রয়োজন প্রভাবিত করে, আমি লেবেল ব্যবহার করা NSSN, NSSSN, NSSTN, এবং NSSSTNপরিবর্তে, যা দিয়েছেন বাইনারি সংখ্যার সাথে প্রিন্ট করার জন্য নিখুঁত স্পেস / ট্যাবগুলি SSSTSSSSTN(৩৩; নতুন লাইনের পরিমাণ), SSSTSSTSTN(৩;; ট্যাবগুলির পরিমাণ) এবং SSSTSSSTTSN((০; স্পেসের পরিমাণ)।

সিউডো কোডে ব্যাখ্যা:

Character c = STDIN-input as character
If c is a tab:
  Print 37
Else if c is a new-line:
  Print 33
Else if c is a space:
  Print 70
Else
  Print 0

উদাহরণ রান:

ইনপুট: স্থান

Command       Explanation                   Stack       Heap     STDIN   STDOUT   STDERR

SSSN          Push 0                        [0]
SNS           Duplicate top (0)             [0,0]
SNS           Duplicate top (0)             [0,0,0]
TNTS          Read STDIN as character       [0,0]       {0:32}   \n
TTT           Retrieve                      [0,32]      {0:32}
SSSTSSTN      Push 9                        [0,32,9]    {0:32}
TSST          Subtract top two (32-9)       [0,23]      {0:32}
SNS           Duplicate top (23)            [0,23,23]   {0:32}
NTSSTN        If 0: Jump to Label_TAB       [0,23]      {0:32}
SSSTN         Push 1                        [0,23,1]    {0:32}
TSST          Subtract top two (23-1)       [0,22]      {0:32}
SNS           Duplicate top (22)            [0,22,22]   {0:32}
NTSSN         If 0: Jump to Label_NEWLINE   [0,22]      {0:32}
SSSTSTTSN     Push 22                       [0,22,22]   {0:32}
TSST          Subtract top two (22-22)      [0,0]       {0:32}
NTSTN         If 0: Jump to Label_SPACE     [0]         {0:32}
NSSTN         Create Label_SPACE            [0]         {0:32}
SSSTSSSTTSN   Push 70                       [0,70]      {0:32}
NSTN          Jump to Label_PRINT           [0,70]      {0:32}
NSSN          Create Label_PRINT            [0,70]      {0:32}
TNST          Print as integer              [0]         {0:32}            70
                                                                                  error

প্রোগ্রামটি একটি ত্রুটি দিয়ে থামায়: প্রস্থান নির্ধারণ করা হয়নি।
এটি অনলাইনে চেষ্টা করুন (কেবলমাত্র কাঁচা জায়গা, ট্যাব এবং নতুন লাইনের সাহায্যে)।

ইনপুট: ট্যাব

পরিবর্তে STDIN \t( 9) হবে, যা ক্ষেত্রে এটি 0প্রথম If 0চেক হবে, LABEL_TAB/ এ NSSSTNযাবে এবং 37পরিবর্তে চাপ এবং মুদ্রণ করবে ।

এটি অনলাইনে চেষ্টা করুন (কেবলমাত্র কাঁচা জায়গা, ট্যাব এবং নতুন লাইনের সাহায্যে)।

ইনপুট: নতুন-লাইন

পরিবর্তে STDIN হবে \n( 10), 0এটি দ্বিতীয় If 0চেক এ হবে Label_NEWLINE/ এ NSSSNযাবে এবং 33পরিবর্তে চাপ এবং মুদ্রণ করবে ।

এটি অনলাইনে চেষ্টা করুন (কেবলমাত্র কাঁচা জায়গা, ট্যাব এবং নতুন লাইনের সাহায্যে)।

ইনপুট: অন্য কিছু

অন্য কোনও ইনপুট-চরিত্র NSTNতৃতীয় If 0চেকের পরে (লেবেল_প্রিন্টে ঝাঁপুন) করবে , 0এটি স্ট্যাকের মধ্যে এখনও ছিল যা মুদ্রণ করেছে (যা আমরা একেবারে প্রথমদিকে নকল করেছি)।

এটি অনলাইনে চেষ্টা করুন (কেবলমাত্র কাঁচা জায়গা, ট্যাব এবং নতুন লাইনের সাহায্যে)।


1
এটি এই চ্যালেঞ্জের জন্য দুর্দান্ত ভাষা।
Qwr

2

জাপট , 27 বাইট

\Ua"" a a a " ÄU\\\"a "aU Ä
            " ÄU\\\"a "     // Given this string literal,
                       aU   // find the last index of the input
                          Ä // and add +1.
\Ua"" a a a                 // Do nothing useful, but make the results match.

বিদ্যমান জাপা উত্তরের চেয়ে দীর্ঘ, তবে ভিন্ন পদ্ধতির ব্যবহার রয়েছে।
অন্তর্নিহিত সীমাবদ্ধতা রয়েছে যা সমস্ত অক্ষরের এক অনন্য সংখ্যক বার ঘটতে হবে।

স্ট্রিং হিসাবে ইনপুট নেয়।

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


2

পার্ল, 130 বাইট

+print+0+((0)x40,6,6,0,3,43,0,0,0,22,12,6,3,5,2,4,0,1,0,0,0,1,0,1,(0)x28,1,0,1,(0)x6,1,(0)x4,1,(0)x4,1,1,1,0,2,0,1,0,0,0,5)[ord<>]

কোনও নিউলাইন বা অন্য সাদা জায়গা নেই। স্ট্যান্ডার্ড আউটপুট থেকে একটি লাইন পড়ে, তবে কেবল এটির প্রথম বাইটগুলিই যত্নশীল, তারপরে একটি নিউলাইন ছাড়াই দশমিক দশকে বাইট তার নিজস্ব উত্স কোডে কতবার প্রিন্ট করে।

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

উদাহরণস্বরূপ, 22, 12, 6, 3, 5, 2, 4, 0, 1, 0উত্স কোডের অংশটি সংখ্যাগুলির ফ্রিকোয়েন্সি দেয়, সুতরাং সোর্স কোডে 22 টি শূন্য, 12 টি, 6 টি দ্বিগুণ ইত্যাদি রয়েছে। ফলস্বরূপ, আপনি যদি 0প্রোগ্রামটির স্ট্যান্ডার্ড ইনপুটটিতে প্রবেশ করেন তবে প্রোগ্রামটি মুদ্রণ করবে 22


2

সি (জিসিসি) , 1033 বাইট

#include <stdio.h>
int main(int argc,char *argv[]){int r=0*14811;switch((int)argv[1][0]){case' ':r=6;break;case'"':r=3;break;case'#':r=2;break;case'%':r=2;break;case'\'':r=101;break;case'(':r=5;break;case')':r=5;break;case'*':r=5*1*1;break;case'.':r=2;break;case':':r=51;break;case';':r=103;break;case'<':r=2;break;case'=':r=52;break;case'>':r=2;break;case'[':r=4;break;case'\\':r=3;break;case']':r=4;break;case'0':r=11;break;case'1':r=20;break;case'2':r=20;break;case'3':r=9;break;case'4':r=7;break;case'5':r=12;break;case'6':r=3;break;case'7':r=2;break;case'8':r=5;break;case'9':r=2;break;case'a':r=106;break;case'b':r=51;break;case'c':r=55;break;case'd':r=4;break;case'e':r=102;break;case'f':r=2;break;case'g':r=4;break;case'h':r=4;break;case'i':r=10;break;case'k':r=51;break;case'l':r=2;break;case'm':r=2;break;case'n':r=8;break;case'o':r=2;break;case'p':r=2;break;case'r':r=108;break;case's':r=53;break;case't':r=8;break;case'u':r=2;break;case'v':r=3;break;case'w':r=2;break;case'{':r=3;break;case'}':r=3;break;}printf("%d",r);}

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

এটি কোনও গল্ফ উত্তর নয়, তবে আমি যে ভাষায় পরিচিত নই, এই চ্যালেঞ্জটি সম্পাদন করার চেষ্টা করা মজাদার ছিল। অঙ্কগুলির উপস্থিতিগুলি সন্ধান করার সময় না আসা পর্যন্ত এটি কোনও বিশেষ চ্যালেঞ্জ ছিল না, এখন এটি একটি চ্যালেঞ্জ ছিল। একটু সৃজনশীল ব্যালেন্সিং করতে হয়েছিল :)


2

সি (জিসিসি) , 192 বাইট

F(J){J=J-70?J-40?J-41?J-74?J-'{'?J-'}'?J-39?J-48?J-49?J-50?J-51?J-52?J-53?J-54?J-55?J-56?J-57?J-47?J-61?J-63?J-45?J-58?J-59?0:1:23:23:23:1:2:3:3:4:4:14:14:10:10:15:6:4:2:2:25:1:1:1;}//84332211

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

সম্ভবত আরও নিচে গল্ফ করা সম্ভব। অতিরিক্ত সংখ্যার যোগ করতে শেষে 'স্ক্র্যাচ স্পেস' হিসাবে একটি মন্তব্য ব্যবহার করুন। যখন আমাকে এক্স থেকে Y এ অঙ্ক পরিবর্তন করতে হবে, আমি ক্ষতিপূরণ দেওয়ার জন্য স্ক্র্যাচে থাকা Y এর একটিতে একটি এক্সকে পরিবর্তন করি। এটি ব্যতীত এটি কেবলমাত্র একটি ফাংশন যা একটি পূর্ণসংখ্যার ক্ষেত্রে লাগে, একটি বড় ত্রৈমাসিক শর্তসাপেক্ষ ভিত্তিতে একটি মান ফেরত দেওয়ার জন্য অ্যাসাইনমেন্ট ট্রিক ব্যবহার করে।


0*84332211অন্যান্য সি উত্তরের মতো শূন্যের পরে সংখ্যা ধ্রুবককে সরানোতে আমি 1 বাইট সংরক্ষণ করতে পারি , তবে আমি আরও ছোট হওয়াটিকে পুনরুদ্ধার করে বাইটগুলিও সংরক্ষণ করতে পারি, তাই আমি এখনও বিরক্ত হচ্ছি না।
লাম্বদাবেতা

কম সাধারণ সংখ্যার জন্য একটি ব্যাপ্তি পরীক্ষা করে আপনি কি বাইটগুলি সংরক্ষণ করতে পারেন? এটি হ'ল যদি আমরা মনে করি 4-9 বিরল অক্ষর, আমরা শর্তযুক্ত চেক দিয়ে একবারে এগুলি সব পরিচালনা করতে পারি।
qwr

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

2

x86 .কম, 17 বাইট, বিতর্কিত

0120 BF2001        MOV     DI,0120 (120 be the current address)
0123 B91100        MOV     CX,0011
0126 AE            SCASB
0127 7502          JNZ     012B
0129 FEC4          INC     AH
012B E2F9          LOOP    0126
012D C1E808        SHR     AX,8
0130 C3            RET

36 বাইট

0100 BF????        MOV     DI,(an copy of this code)
0103 B91200        MOV     CX,0012
0106 AE            SCASB
0107 7503          JNZ     010C
0109 80C402        ADD     AH,02
010C E2F8          LOOP    0106
010E C1E808        SHR     AX,8
0111 C3            RET

2
এই পড়া কি এটি নিজস্ব কোড নয়?
রাজ্জান সোসোল

@ রাজ্জানসোকল আমি মনে করি এটি জাভাস্ক্রিপ্ট সমাধানের মতো
l4m2

@ রেজওয়ানসোকল ভাল এটি কোনও ফাইল সংরক্ষণের প্রয়োজন হয় না তাই এটি ঠিক আছে। প্রচুর ছত্রাক এবং জেএসও এটি করে
ASCII-

আমি যুক্তি দিচ্ছি যে আপনি সম্পাদিত কোডটি পড়ছেন যা "নিজের উত্স কোডটি পড়া" হিসাবে গণ্য। এখন আপনি যুক্তি দিতে পারেন যে প্রোগ্রামটির একটি স্ট্রিং কপি রয়েছে, এখানে বেশিরভাগ সমাধান যেমন করেন তবে এটি "সোর্স কোড রিডিং" হয় তবে স্ট্রিংটি কার্যকর হয় না।
qwr




1

x86, 42 40 বাইট

এখানে আমি অন্যদের মতো একই কৌশল ব্যবহার করি: অনন্য বাইট সহ প্রোগ্রামটির একটি স্ট্রিং কপি তৈরি করুন, তারপরে alইনপুটটি alস্ট্রিংয়ে থাকলে 2 এ ফিরে আসুন। যদি আমরা নিজেরাই আসলে চালিত কোডটি পড়ার অনুমতি পাই তবে আমরা l4m2 এর সমাধান পাই

আমি একটি দুর্দান্ত স্ট্রিং নির্দেশ ব্যবহার করতে পারি scasb। আমার জ্ঞানের সর্বোপরি, কোনও সদৃশ বাইট নেই, তবে এটি এমন কিছু যা আমি সহজেই স্ক্রু করতাম। স্ট্রিং ঠিকানা লোড করা হচ্ছে 5 বাইট লাগে কিন্তু আমি কোন খাটো সমাধান সচেতন নই (64-বিট leaএর ripঅফসেট 6 বাইট নেয়)।

-2 02দুবার ব্যবহার এড়াতে পিছনে ঝাঁপিয়ে ।

.section .text
.globl main
main:
        mov     $0xff, %eax

start:
        push    $20             # program length
        pop     %ecx            # counter
        mov     $str, %edi      # load string

loop:
        scasb                   # if (al == *(edi++))  
        jne     loop1           
        mov     $2, %al         # ret 2
end:    ret             
loop1:
        loop    loop            # do while (--counter)
        xor     %eax, %eax      # ret 0
        jmp     end

str:    .byte 0x6a,0x14,0x59,0xbf,0xf4,0x83,0x04,0x08 
        .byte 0xae,0x75,0x03,0xb0,0x02,0xc3,0xe2,0xf8
        .byte 0x31,0xc0,0xeb,0xf9 

হেক্সডাম্প (বাইনারি ফাইল ফর্ম্যাট elf32-i386 এর, যেমন আপজ ফাইলের দুর্ভাগ্যক্রমে ঠিকানার 00জন্য বাইট রয়েছে str):

000003e0  6a 14 59 bf f4 83 04 08  ae 75 03 b0 02 c3 e2 f8  |j.Y......u......|
000003f0  31 c0 eb f9 6a 14 59 bf  f4 83 04 08 ae 75 03 b0  |1...j.Y......u..|
00000400  02 c3 e2 f8 31 c0 eb f9                           |....1...|

x86, 256 বাইট

বিরক্তিকর উত্তর যা একটি বিশাল মন্তব্যের সমতুল্য। ইনপুট ইন cl, অবিলম্বে 1 ইন ফিরে al। ফ্রি সময় পেলে আমি একটি আসল উত্তর দেব।

00000039  b0 01 c3 00 02 03 04 05  06 07 08 09 0a 0b 0c 0d  |................|
00000049  0e 0f 10 11 12 13 14 15  16 17 18 19 1a 1b 1c 1d  |................|
00000059  1e 1f 20 21 22 23 24 25  26 27 28 29 2a 2b 2c 2d  |.. !"#$%&'()*+,-|
00000069  2e 2f 30 31 32 33 34 35  36 37 38 39 3a 3b 3c 3d  |./0123456789:;<=|
00000079  3e 3f 40 41 42 43 44 45  46 47 48 49 4a 4b 4c 4d  |>?@ABCDEFGHIJKLM|
00000089  4e 4f 50 51 52 53 54 55  56 57 58 59 5a 5b 5c 5d  |NOPQRSTUVWXYZ[\]|
00000099  5e 5f 60 61 62 63 64 65  66 67 68 69 6a 6b 6c 6d  |^_`abcdefghijklm|
000000a9  6e 6f 70 71 72 73 74 75  76 77 78 79 7a 7b 7c 7d  |nopqrstuvwxyz{|}|
000000b9  7e 7f 80 81 82 83 84 85  86 87 88 89 8a 8b 8c 8d  |~...............|
000000c9  8e 8f 90 91 92 93 94 95  96 97 98 99 9a 9b 9c 9d  |................|
000000d9  9e 9f a0 a1 a2 a3 a4 a5  a6 a7 a8 a9 aa ab ac ad  |................|
000000e9  ae af b1 b2 b3 b4 b5 b6  b7 b8 b9 ba bb bc bd be  |................|
000000f9  bf c0 c1 c2 c4 c5 c6 c7  c8 c9 ca cb cc cd ce cf  |................|
00000109  d0 d1 d2 d3 d4 d5 d6 d7  d8 d9 da db dc dd de df  |................|
00000119  e0 e1 e2 e3 e4 e5 e6 e7  e8 e9 ea eb ec ed ee ef  |................|
00000129  f0 f1 f2 f3 f4 f5 f6 f7  f8 f9 fa fb fc fd fe ff  |................|

1

এপিএল (ডায়ালগ ক্লাসিক) , 30 বাইট

⊢⊢⊢11-11-11-'''''''1''⊢-⍳⍳0'⍳⊢

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

ব্যাখ্যা

এপিএলে, স্ট্রিংগুলির মধ্যে একক উদ্ধৃতিগুলি দ্বিগুণ করে পালিয়ে যায়, '''''''1''⊢-⍳⍳0'স্ট্রিংটিও '''1'⊢-⍳⍳0প্রোগ্রামটিতে ব্যবহৃত প্রতিটি অক্ষরকে ধারণ করে।

এপিএল অ্যারেগুলি ডিফল্টরূপে 1-ইনডেক্সযুক্ত হয় এবং আকর্ষণীয়ভাবে, 1 + max indexউপাদানটি খুঁজে পাওয়া না গেলে সূচকের কাজটি ফিরে আসে ly

সুতরাং, স্ট্রিং এবং ইনপুট রিটার্নে ইনডেক্স ব্যবহার করে

Input    Index    Count
'        1        10
1        4        7
⊢        6        5
-        7        4
⍳        8        3
0        10       1
<other>  11       0

যেহেতু একজন দেখতে পাচ্ছেন, 11 - indexপ্রোগ্রামটিতে চরিত্রের গণনা দেয়। সুতরাং, বেসিক অ্যালগরিদম হয়

11-'''''''1''⊢-⍳⍳0'⍳⊢

বাকীগুলি স্লটগুলির মধ্যে সুন্দরভাবে ফিট করার জন্য চরিত্রের গণনাগুলি অঙ্কন করছে।


1

আর , 135 বাইট

এই পাইথন উত্তর দ্বারা অনুপ্রাণিত ।

পূর্ববর্তী সংস্করণগুলি ভেঙে গেছে। জিউসেপ্পিকে ধন্যবাদ জানাতে যে pasteএটি 18 বাইট বা তার বেশি সংরক্ষণ করার প্রয়োজন ছিল না বলে ধন্যবাদ জানাই । এই উত্তরlengths(regmatches(z,gregexpr(x,z))) থেকে ।

function(x,z=rep(c("afilo2679=:","hmpu15'","nstxz","cgr","e","()",'"',","),c(2:5,7,9,15,16)))sum(lengths(regmatches(z,gregexpr(x,z))))

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



0

রুবি, 48 বাইট

->x{%q[->x{%q[].count(x.chr)*2}].count(x.chr)*2}

%q[str]স্ট্রিং আক্ষরিক লেখার জন্য এটি একটি আরও সুবিধাজনক উপায় "str"কারণ এটি কোনও প্রস্থান ছাড়াই নিজের ভিতরে বাসা বাঁধতে পারে। সুতরাং আমি এটির অনুলিপি ব্যতীত পুরো কোডটি রেখেছি, তারপরে গণনা দ্বিগুণ।


0

জেলি , 12 10 বাইট

“;Ṿċƈ”;Ṿċƈ

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

STDIN- এর একটি চরিত্র পড়ে।

12 বাইট

Ḣ“Ḣċ;Ṿ¤”;Ṿ¤ċ

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

কমান্ড লাইন আর্গুমেন্ট থেকে ইনপুট ব্যবহার করা।

এছাড়াও 12 বাইট:

ẇ“Ṿẇ¤Ḥ”Ṿ¤Ḥ“”

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

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