আপনি কি ভাষা জানেন?

34

টাস্ক:

আপনার চ্যালেঞ্জটি হ'ল পূর্ববর্তী সাবমিশনগুলি দেওয়া হয় এবং নিজেই ইনপুট হিসাবে দেওয়া হয়, নীচের ফর্ম্যাটে যে ভাষায় তারা লেখা থাকে তা আউটপুট দেয়:

বলুন প্রথম প্রোগ্রামটি রুবিতে রয়েছে। এটি অবশ্যই আউটপুট 1, কারণ রুবি 1এই চ্যালেঞ্জ ব্যবহৃত স্ট্যান্ড ভাষা। একটি উদাহরণ প্রোগ্রাম হ'ল:

a=gets
puts 1

নিজেকে ইনপুট হিসাবে দেওয়া হলে, এটি ফিরে আসে 1।

পরের প্রোগ্রামটি পাইথনে হতে পারে। এটি অবশ্যই আউটপুট 2, কারণ পাইথন হ'ল 2চ্যালেঞ্জ ব্যবহৃত এনডি ভাষা। একটি উদাহরণ প্রোগ্রাম হ'ল:

print(1 if input()[0]=="a"else 2)

প্রথম জমা দেওয়া হয়েছে, এটি আউটপুট করে 1এবং নিজেই এটিকে আউটপুট দেয় 2।

আপনাকে পূর্বের উত্তরের ভাষায় কোনও উত্তর জমা দেওয়ার অনুমতি না দেওয়া সত্ত্বেও আপনাকে ভাষা পুনরাবৃত্তি করার অনুমতি দেওয়া হয়েছে।

উদাহরণস্বরূপ, যদি তৃতীয় প্রোগ্রামটি রুবিতে থাকে তবে এটি অবশ্যই 1প্রথম প্রোগ্রাম এবং নিজেই আউটপুট দিতে হবে (কারণ রুবি 1স্ট্যান্ড ভাষা ব্যবহার করে), এবং দ্বিতীয় প্রোগ্রামটি দেওয়ার পরে এটি অবশ্যই আউটপুট দেয় 2।

নিয়মাবলী:

  • থাকে তাহলে nউত্তর প্রতিদ্বন্দ্বিতায় বর্তমানে, অন্তত হওয়া আবশ্যক floor(n / 3)বিভিন্ন ভাষায়। এই বিধি ভঙ্গকারী যে কোনও জমা অযোগ্য বলে ঘোষণা করা হয়েছে।
  • কোনও দুটি "প্রতিবেশী উত্তর" (যেমন উত্তর nএবং উত্তর n+1) একই ভাষা ব্যবহার করতে পারে না।
  • কোনও ভাষার বিভিন্ন সংস্করণ বিভিন্ন ভাষা (তাই Python 2 == Python 3) হিসাবে গণনা করে না ।
  • উত্তরগুলি অবশ্যই ইনপুট হিসাবে পূর্ববর্তী জমাগুলি নিতে হবে।
  • প্রথম জমা দিতে অবশ্যই ইনপুট নিতে হবে।
  • আপনাকে পরপর একাধিক উত্তর জমা দেওয়ার অনুমতি নেই।
  • "পুনরাবৃত্তি উত্তর" (উত্তরগুলি পূর্ববর্তী জমা হিসাবে ঠিক একই কোড রয়েছে) অনুমোদিত নয়।
  • উত্তরগুলিকে সেই উত্তরের বরাদ্দ করা বাইট-গণনাটি অতিক্রম করার অনুমতি নেই - আরও তথ্যের জন্য "বরাদ্দ করা বাইট-কাউন্ট" দেখুন।

বরাদ্দ করা বাইট-কাউন্ট:

প্রতিটি উত্তর নম্বরের nজন্য, সেই উত্তরের জন্য বরাদ্দ করা বাইট-কাউন্ট 45 + 5n।

উত্তর বিন্যাস:

আপনার উত্তরটি এর মতো বিন্যাস করুন:

# {answer no.}, {language}
{program}
This prints:
- `1` in answer(s) {all answers using 1st language, with links}
- `2` in answer(s) {all answers using 2nd language, with links}
...
{optional explanation}

উত্তর তালিকার জন্য, এটি করুন:

- `1` in answers [1]({link to answer}), [3]({link to answer})...

স্কোরিং:

বিজয়ী ঘোষণার পরে কোনও বৈধ জমা ছাড়াই 7 দিন পরে বেঁচে থাকার প্রথম উত্তর।

classification  answer-chaining 
— clismique
সূত্র
1
একজন ব্যবহারকারী কি পর পর দু'বার জমা দিতে পারেন?
— ক্রিটসি লিথোস
সুতরাং, এটি যেমন দাঁড়িয়ে আছে, আমি কোনও পরিবর্তন ছাড়াই, আমার উত্তর n ° 6 এর উত্তর n ° 8 হিসাবে পুনরাবৃত্তি করতে পেরেছিলাম, যার পরে মার্টিন তার উত্তর n ° 7 পুনরুদ্ধার করতে পারে (আমি ভুল না হলে) ইত্যাদি উত্তর না হওয়া পর্যন্ত ° আরোপিত দোরগোড়ায় পৌঁছানোর আগে 15 (অর্থাত্ floor(n / 3)ভাষা)। আমি অনুমান করছি এটি উদ্দেশ্যমূলক আচরণ নয়।
— প্ল্যানাপাস
@ প্ল্যানাপাস আমি এটিও লক্ষ্য করেছি। অবশ্যই, আপনার লক্ষ্যটি শেষ উত্তর পাওয়া উচিত, তাই আমার জেনে রাখা একটি তুচ্ছ অনুশীলনও হবে আপনি খুব জটিল বিষয়গুলিও করতে চাইতে পারেন (যা আমি আমার নিজের উত্তর পোস্ট করার আগে ভাবিনি)।
— মার্টিন ইন্ডার
3
বরাদ্দ করা বাইট গণনা জ্যামিতিক অগ্রগতিতে বৃদ্ধি পায় এবং সম্ভবত ভাষাগুলি শেষ না হওয়া পর্যন্ত এই চ্যালেঞ্জগুলি শেষ হবে না, কোডটি দীর্ঘায়িত হওয়ার কারণে নয়।
— ওল্ফ্রাম
2
আইএমও একটি যুক্তিসঙ্গত নির্দিষ্ট সীমা (যেমন 384 বা 256 বাইট), আরও ভাল কাজ করতে পারে, এবং শেষে একটি শক্ত প্রতিযোগিতা শুরু করবে trigger
— জেপেলিন

উত্তর:

4

26. > <> (ভাষা 12), 164 বাইট

> <> এ আমার প্রথম প্রোগ্রাম! এটি 156 টি অক্ষর, তবে ইউটিএফ -8 এ 164 বাইট।

^$|(?![⊂⍴])[⊂-⍴]|\B=|{}
{:}&1+&=?v
      .&0/
v+!?='>'i41i
v+?='y'i47
v+?=' 'i12
v+?=' 'i24
v4
v6
v7
v8
v9
va
  v?(0:i
v1
n;\b1laa*)?+
/"^mwfPes{'tc"i2&01.;

এই মুদ্রণ:

  • 1উত্তর 1 , 5 , 7 , 9 , এবং 14 (রেটিনা) সহ।

  • 2উত্তর 2 (মস্তিষ্ক-ফ্লাক) সহ

  • 3উত্তর 3 (এপিএল) সহ।

  • 4উত্তর 4 , 12 এবং 15 (জাভাস্ক্রিপ্ট) সহ।

  • 5উত্তর 6 এবং 8 (আর) সহ।

  • 6উত্তর 10 , 17 , 20 , 22 এবং 25 (বাশ) সহ।

  • 7উত্তর 11 এবং 19 (গণিত) সহ answers

  • 8উত্তর সহ 13 (পাইথন)

  • 9উত্তর সহ 16 (পার্ল)

  • 10উত্তরের সঙ্গে 18 , 21 , এবং 23 (গ / সি ++)।

  • 11উত্তর 24 (Zsh) সহ।

  • 12 এই উত্তর সহ (> <>)।

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

ব্যাখ্যা:

প্রথম লাইনটি সহজ উত্তর # 5। এটি নীচের লাইনে নির্দেশিকা পাঠানো ছাড়া কিছুই করে না। /মাছটি ডানদিকে ঘুরিয়ে দেয় এবং অক্ষরগুলি ^mwfPes{'tcস্ট্যাকের উপরে রাখে। ইনপুটগুলির একটি একক অক্ষরটি ( i) পড়ে । (আসুন এই চরিত্রটি Cপ্রকাশের জন্য কল করুন )) 2 টি রেজিস্টারে রাখা হয়েছে ( 2&)। তারপরে আমরা দ্বিতীয় লাইনের (লাইন 1) ( 01.) এর শুরুতে ঝাঁপ দাও ।

এই লাইনটি Cস্ট্যাকের প্রতিটি অক্ষরের সাথে তুলনা করে। একটি অনুলিপি Cস্ট্যাকের নীচে রাখা হয়। {স্ট্যাকটি ঘোরান তাই Cশীর্ষে থাকে; :এটি সদৃশ; }অনুলিপিটি নীচে ফিরে আসে। &1+&কোনও ম্যাচ না পাওয়া পর্যন্ত আমরা রেজিস্টার ( ) বৃদ্ধি করি । (সুতরাং যদি C"সি" হয় তবে ম্যাচটি পাওয়া গেলে রেজিস্টারটি 3 রাখে; যদি C"টি" হয় তবে রেজিস্টারে 4 টি থাকে এবং তাই হয় 0&.) ।

লাইন 3 থেকে 13 পর্যন্ত Cযথাক্রমে সি, টি, ', {, ইত্যাদি কী করতে হবে তা লেনদেন করে। নির্দেশের পয়েন্টারটি পিছনে পিছনে চলেছে যখন আমরা লাফাই; এটি প্রদত্ত রেখার প্রথম চরিত্রটিতে অবতরণ করে, তবে লাফানোর পরে এটি কার্যকর করার আগে একটি টিকটি অগ্রসর করে, সুতরাং এটি লাইনটির প্রান্তটি পিছনে চলে যাওয়া থেকে শুরু করে। প্রতিটি লাইন স্ট্যাকের উপর উপযুক্ত ভাষা নম্বরটি চাপায়, তারপরে মাছটিকে নীচে nনির্দেশের দিকে প্রেরণ করে , যা এটি প্রিন্ট করে।

^এই উত্তরের প্রথম লাইনের সাথে আমার নিজের ঘৃণ্যতার কারণে সবচেয়ে জটিল মামলা। লাইন 13 ইওএফ অবধি ইনপুট পড়ে। তারপরে এটি লাইন 15-এ সরে যায়, যা স্ট্যাকের দৈর্ঘ্যের ( l100) থেকে তুলনা করে aa*। যদি এটি দীর্ঘ হয় ( )?), আমরা এই ভাষাটি যুক্ত করি + bএবং 112 পেতে পারি; অন্যথায়, 1 স্ট্যাকের শীর্ষে রয়েছে।

— নিক মাত্তিও
সূত্র
23

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

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

খালি প্রোগ্রামটি 1খালি ইনপুট দেওয়ার সময় (যেমন নিজেই) প্রিন্ট করে, কারণ এটি গণনা করে যে খালি রেজেক্সটি ইনপুটটির সাথে (যা সর্বদা থাকে 1+length(input)) কতবার মিলবে ।

— মার্টিন ইন্ডার
সূত্র
12

2. ব্রেন-ফ্লাক , 22 বাইট

{<>(())(<>)}{}(<>{}())

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

এটি স্ট্যাকের উপরের অংশটি পরীক্ষা করে এবং যদি এটি শূন্য না হয় তবে বিপরীত স্ট্যাকের উপর একটি রাখে। এরপরে এটি ইনক্রিমেন্ট হয় এবং বিপরীত স্ট্যাকটি দেয়। এটি খালি প্রোগ্রামের জন্য 1 এবং অন্য কোনও কিছুর জন্য 2 ফেরত দেয়।

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

{      (<>)}{}              #If not zero
 <>(())                     #Push one to the other stack
              (<>{}())      #Switch to other stack and increment by one
— গম উইজার্ড
সূত্র
আপনি এই উত্তর সম্পাদনা করতে পারেন? আমি দুর্ঘটনাক্রমে এটিকে ভোট দিয়েছিলাম :)
— কনর ও'ব্রায়ান
9

3. এপিএল, 7 বাইট

' {'⍳⊃⍞

ব্যাখ্যা:

      ⍞  read from the keyboard
     ⊃   first item of list, or space if empty
' {'⍳    index into the string ' {', giving N+1 (=3) if not found
— সামুদ্রিক
সূত্র
8

10. বাশ (+ কোর্টিলস) [ভাষা]], 44, 74 বাইট

স্থির সংস্করণ (ভাষার আইডি ফিরিয়ে দেয়)

expr substr "1234151516" $(expr index "365f8dc0eb" `md5sum|cut -c12`) 1 #G

দ্রষ্টব্য: এটি ইনপুট প্রোগ্রামের পাঠ্যের পরে, পূর্ববর্তী নতুনলাইনটি প্রত্যাশা করে

— জেপেলীন্
সূত্র
7

9. রেটিনা (ভাষা 1), 20 বাইট

$|}\{|[:'][^]']|,\b1

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

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

ব্যাখ্যা

আমার অন্যান্য উত্তরের মত, এটি বিভিন্ন রেজেেক্স মিলগুলির সংখ্যা গণনা করে তবে আরও কার্যকরভাবে এটি সম্পর্কে যায়:

  • $স্ট্রিংয়ের শেষের সাথে মেলে। এটি সর্বদা কার্যকর হয়, এমনকি যদি কোনও ম্যাচ স্ট্রিংয়ের শেষের দিকে চলে যায় তবে এটি আমাদের 1সমস্ত ইনপুটগুলির একটি বেসলাইন দেয় ।
  • }\{দ্বিতীয় প্রোগ্রামে (ব্রেন-ফ্লাক) একটি একক ম্যাচ খুঁজে পাওয়া যায়, সেখানে গণনা বাড়িয়ে দেওয়া হয় 2। ব্যাকস্ল্যাশ পালানোর জন্য প্রয়োজনীয় নয় তবে এটি রেগেক্সের এই অংশটি নিজের সাথে মিলে যাওয়া থেকে বাধা দেয়।
  • [:'][^]']আসলে বেশ অভিনব। 'এপিএল প্রোগ্রামে দুটি ভাষা (ভাষা 3) এবং তিনটি :জাভাস্ক্রিপ্ট প্রোগ্রামে (ভাষা 4) গণনা করার একমাত্র উদ্দেশ্য , তবে আমাদের এই অংশটি নিজের সাথে মিলে যাওয়া থেকে বিরত করা দরকার। সুতরাং আমরা এটিও নিশ্চিত করি যে পরের চরিত্রটি না হয় ', না হয় ](কারণ আমরা যা মেলে তা চাইলে তার পরে উপস্থিত হয় না , তবে তারা এখানে এই প্রোগ্রামটিতে উপস্থিত হয়)।
  • 'পূর্ববর্তী অংশ থেকে ইতিমধ্যে, আর প্রোগ্রামে এক ম্যাচ ঘটায় তাই আমরা আরও তিনজন প্রয়োজন। ,1উভয় ক্ষেত্রে তিনবার স্ট্রাস্টিং প্রদর্শিত হয় এবং অন্য কোনও প্রোগ্রামে আসে না। এটি ,\b1আবার মিলে যাওয়ার থেকে রোধ করতে আমরা এর মধ্যে একটি টোটোলজিক্যাল ওয়ার্ডবাউন্ডারি যুক্ত করে এটি মেল করি।
— মার্টিন ইন্ডার
সূত্র
এইচ এম, ঠিক বুঝতে পেরেছি যে এটি আর উত্তরগুলি মোটেও বানচাল করে না, কারণ 1এটি কেবল তাদের ডিফল্ট আউটপুট। পরবর্তী উত্তর দিয়ে আমাকে সে সম্পর্কে কিছু করতে হবে।
— মার্টিন এেন্ডার
7

18. সি (ভাষা 10), 121 বাইট

এটি সি 89 বা সি 90 স্ট্যান্ডার্ড। এটি ট্রাই ইট অনলাইনে বাজে বা জিসিসি দিয়ে কাজ করে।

main(n){char*v=" ^{ s ePfwm",b[999],*c;gets(b);c=strchr(v,*b);n=strlen(b);printf("%d",n?c?c-v:n>99?4:n>60?5:n>15?1:3:1);}

এই মুদ্রণ:

  • 1উত্তর 1 , 5 , 7 , 9 , এবং 14 (রেটিনা) সহ।

  • 2উত্তর 2 (মস্তিষ্ক-ফ্লাক) সহ

  • 3উত্তর 3 (এপিএল) সহ।

  • 4উত্তর 4 , 12 এবং 15 (জাভাস্ক্রিপ্ট) সহ।

  • 5উত্তর 6 এবং 8 (আর) সহ।

  • 6উত্তর 10 এবং 17 (বাশ) সহ।

  • 7উত্তর সহ 11 (গণিত)।

  • 8উত্তর সহ 13 (পাইথন)

  • 9উত্তর সহ 16 (পার্ল)

  • 10 এই উত্তর সহ (সি)।

এখানে এমন এক বাশ চালক যা অনলাইনে চেষ্টা করে দেখুন 18 টি উত্তর দিয়ে এটি চালায় !

অব্যাহত সমতুল্য (6৪6 বাইট):

#include <string.h>
#include <stdio.h>
int main(){
    char *v=" ^{ s ePfwm", b[999];
    gets(b); /* buffer overrun if more than 998 characters in the input.
                could be a problem if we get to 191 answers */
    char *c = strchr(v, b[0]); /* Find first character of input in v, or null */
    int n = strlen(b);
    if (!n) {
        printf("1");
    } else if (c) {
        printf("%d", c-v); /* Index of first character of input in v */
    } else if (n > 99) {
        printf("4");
    } else if (n > 60) {
        printf("5");
    } else if (n > 15) {
        printf("1");
    } else {
        printf("3");
    }
    return 0;
}
— নিক মাত্তিও
সূত্র
6

5. রেটিনা (ভাষা 1), 23 বাইট

^$|(?![⊂⍴])[⊂-⍴]|\B=|{}

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

ইনপুটটিতে বিভিন্ন জিনিসের মিলকে গণনা করে:

  • ^$ ইনপুট স্ট্রিংয়ের সাথে মেলে, অর্থাৎ প্রথম উত্তরটি একবার।
  • {} নিজেই মেলে, যা দ্বিতীয় প্রোগ্রামের দুটি এবং এই একটিতে রয়েছে।
  • (?![⊂⍴])[⊂-⍴]একচেটিয়া , 8834 থেকে 9076 কোড পয়েন্টের সাথে অক্ষর মেলে , যা তৃতীয় প্রোগ্রামে তিন ম্যাচ খুঁজে বের করে। আমরা এই প্রোগ্রামের সাথে সীমাবদ্ধতার প্রান্তটি এড়াতে নেতিবাচক চেহারাটি ব্যবহার করি।
  • \B=একটি শব্দের চরিত্রের আগে নয়= এমন একটি মিলছে । এটি চতুর্থ প্রোগ্রামের চারটির সাথে মেলে এবং এই প্রোগ্রামের সাথে মেলে না ।==
— মার্টিন ইন্ডার
সূত্র
5

7. রেটিনা (ভাষা 1), 27 বাইট

^$|(?![⊂⍴])[⊂-⍴]|\B=|{}|\b5

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

পঞ্চম উত্তরের একটি সামান্য পরিবর্তন । \B=ইতিমধ্যে ষষ্ঠ উত্তরে 4 টি মিল \b5খুঁজে পেয়েছে এবং অন্য কোনও উত্তর মিল না করে অন্যটি খুঁজে বের করে।

— মার্টিন ইন্ডার
সূত্র
4

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

s=>s?s[0]==`{`?2:s[0]==`s`?4:3:1

খালি ইনপুটটির জন্য আউটপুট 1, 2 যদি ইনপুটটি একটি দিয়ে শুরু হয় {, 4 যদি এটি একটি sএবং 3 দিয়ে শুরু হয় অন্যথায় ..

— লুক
সূত্র
আপনি প্রতিস্থাপন করতে পারেন s[0]=='{'দ্বারাs[0]>'z'
1
@ মাস্টারজাঘ আমিও ভাবছিলাম যে এটি কীভাবে গল্ফ করা যেতে পারে তবে হায় আফসোস, এটি কোনও কোড-গল্ফ নয়: /
— ক্রিটিকি লিথোস
@ ক্রিটিক্সিলিথোস হ্যাঁ, তবে তিনি ইতিমধ্যে একধরণের গল্ফ করেছেন তাই আমি ভেবেছিলাম যে তিনি আরও এগিয়ে যেতে চান।
@ মাস্টারজাঘ লোকেরা এই জাতীয় চ্যালেঞ্জগুলিতে বৈধ উত্তরের সম্পাদনা এড়ানো উচিত কারণ তারা ক) উত্তরগুলি বাতিল করে দিতে পারে, খ) বর্তমানে যে উত্তরগুলি নিয়ে কাজ করা হচ্ছে।
— মার্টিন এন্ডার
@ মার্টিনএেন্ডার, আপনি ঠিক বলেছেন যেমন আমি এটি সম্পাদনা করব না। আমি জানি এটি গল্ফড দেখাচ্ছে (টেরিনারি অপারেটরগুলির কারণে), তবে আমি এটি উদ্দেশ্য হিসাবে এটি লিখিনি ... তবুও সমস্ত প্রতিক্রিয়ার জন্য ধন্যবাদ!
— লুক
4

১১. গণিত [7 ভাষা], 53 বাইট

Position[Characters@"^{'sceP",#&@@#][[1,1]]/._@__->1&

অজানা ফাংশন অক্ষরের তালিকাটিকে তার যুক্তি হিসাবে বিবেচনা করে এবং ধনাত্মক পূর্ণসংখ্যার আউটপুট দেয়। "^{'sceP"আউটপুট সিদ্ধান্ত নেওয়ার জন্য স্ট্রিংয়ের অবস্থান ব্যবহার করে ইনপুটটির প্রথম অক্ষরে কেবল শাখা এটি প্রাথমিক খালি রেটিনা প্রোগ্রাম এবং অতি সাম্প্রতিক রেটিনা উত্তর ব্যতীত পূর্ববর্তী সমস্ত সাবমিশনের সঠিক উত্তর দেয় ; এই উভয় থুতু ত্রুটি, তবে আউটপুটটি নিয়ম দ্বারা মেরামত করা হয় /._@__->1যা কোনও অপ্রয়োজনীয় ফাংশনকে রূপান্তর করে 1।

— গ্রেগ মার্টিন
সূত্র
আমি মনে করি যে সেই প্রথম-চরিত্রের কৌশলটি
— মার্টিন ইন্ডার
1
আমি যাচ্ছিলাম, কিন্তু তখন আমি মনে করি আমাকে নিজের ভাষার জন্যও সঠিকভাবে আউটপুট দিতে হয়েছিল: ডি
— গ্রেগ মার্টিন
4

16. পার্ল (ভাষা 9), 94 বাইট

while(<>){print substr("1234151516748149",index("0F=POmS6D4e_XWVH",chr(47+length($_)%70)),1);}

এটি অনলাইন চেষ্টা করুন! (সমস্ত উত্তর পরীক্ষা করে দেখুন)। আউটপুটস "1234151516748149"

এই মুদ্রণ:

  • উত্তর 1, 5, 7, 9 এবং 14 এর সাথে 1 (রেটিনা)।
  • উত্তর সহ 2 (মস্তিষ্ক-ফ্লাক)
  • উত্তর সহ 3 (এপিএল)।
  • 4, 12 এবং 15 (জাভাস্ক্রিপ্ট) এর উত্তর সহ 4।
  • উত্তর 6 এবং 8 (আর) সহ 5
  • উত্তর 10 (বাশ) সহ 6
  • 7 উত্তর সহ 11 (গণিত)।
  • 8 উত্তর সহ 13 (পাইথন)
  • 9 এই উত্তর দিয়ে (পার্ল)

প্রোগ্রামটি ইনপুট দৈর্ঘ্য পরীক্ষা করে এবং এটি বর্তমান ভাষা বিতরণে মানচিত্র করে।

— Lyth
সূত্র
3

6. আর (ভাষা 5), 61 বাইট

cat(switch(substr(readline(),1,1),"{"=2,"'"=3,"s"=4,"c"=5,1))

ইনপুটটির প্রথম অক্ষরটি কি তা পরীক্ষা করে এবং সে অনুযায়ী আউটপুট চয়ন করুন।

এটি এইভাবে মুদ্রণ করে:

  • 1উত্তর 1 এবং 5 সহ (রেটিনা)।

  • 2উত্তর 2 (মস্তিষ্ক-ফ্লাক) সহ

  • 3উত্তর 3 (এপিএল) সহ।

  • 4উত্তর 4 (জাভাস্ক্রিপ্ট) সহ।

  • এবং 5এই উত্তর দিয়ে।

ব্যবহার:

> cat(switch(substr(readline(),1,1),"{"=2,"'"=3,"s"=4,"c"=5,1))

1
> cat(switch(substr(readline(),1,1),"{"=2,"'"=3,"s"=4,"c"=5,1))
{<>(())(<>)}{}(<>{}())
2
> cat(switch(substr(readline(),1,1),"{"=2,"'"=3,"s"=4,"c"=5,1))
' {'⍳⊃⍞
3
> cat(switch(substr(readline(),1,1),"{"=2,"'"=3,"s"=4,"c"=5,1))
s=>s?s[0]==`{`?2:s[0]==`s`?4:3:1
4
> cat(switch(substr(readline(),1,1),"{"=2,"'"=3,"s"=4,"c"=5,1))
^$|(?![⊂⍴])[⊂-⍴]|\B=|{}
1
> cat(switch(substr(readline(),1,1),"{"=2,"'"=3,"s"=4,"c"=5,1))
cat(switch(substr(readline(),1,1),"{"=2,"'"=3,"s"=4,"c"=5,1))
5
— plannapus
সূত্র
এটি আরইপিএলের বাইরে চালানোর জন্য, উত্তরের 8 এর অধীনে মন্তব্য দেখুন
— প্ল্যানাপাস
3

8. আর (ভাষা 5), 76 বাইট

c=which(c("","{","'","s","c")==substr(readline(),1,1));ifelse(length(c),c,1)

ইনপুট প্রথম অক্ষর চেক, এবং একটি ভেক্টর ধারণকারী সঙ্গে এটি তুলনা (যাতে) খালি স্ট্রিং, {, ', sএবং c। এটি ম্যাচের সূচককে ছাড়িয়ে যায় (আর ইনডেক্সিংটি 1-ভিত্তিক) বা কোনও মিল না থাকলে 1 হয়।

উত্তর n ° 6 হিসাবে একই ধারণা কিন্তু উত্তর ° 7 এর সাথে এটি মিলে যায় না।

এই মুদ্রণ:

  • 1উত্তর 1 , 5 এবং 7 (রেটিনা) সহ।

  • 2উত্তর 2 (মস্তিষ্ক-ফ্লাক) সহ

  • 3উত্তর 3 (এপিএল) সহ।

  • 4উত্তর 4 (জাভাস্ক্রিপ্ট) সহ।

  • এবং 5উত্তর 6 এবং এই উত্তর (আর) সহ।

যদি আমার ভুল না হয় তবে এই উত্তরের বাইট-কাউন্ট ভাতা ছিল 94 বাইট।

— plannapus
সূত্র
এফওয়াইআইআর আর অনলাইন দোভাষী (রফিডাল, আইডোইন এবং ট্রাইটোনলাইন) মনে হয় স্টিডিন হ্যান্ডেল করতে সমস্যা হয়েছে (কমপক্ষে রিডলাইন () সহ) এবং সুতরাং এটি সঠিকভাবে আচরণ করবে না। আপনি যদি এটি (এবং পূর্ববর্তী উত্তর) চেষ্টা করতে চান তবে আপনাকে আর এর একটি ইনস্টলড সংস্করণে স্থানীয়ভাবে চেষ্টা করতে হবে, আমি ভীত।
— প্লানাপাস
^ ঠিক আছে, একটি REPL এর বাইরে readlineপ্রতিস্থাপন করা উচিত readLines(file("stdin"))। যার অর্থ আরও 16 টি অক্ষর: উত্তর 6 সুতরাং 77 বাইট (মঞ্জুরিপ্রাপ্ত 79 এর মধ্যে) হওয়া উচিত এবং এটির উত্তর 92 বাইট (94 এর মধ্যে অনুমোদিত)। এই পরিবর্তনের সাথে এটি অনলাইন দোভাষীদেরও কাজ করে।
— প্ল্যানাপাস
3

12. জাভাস্ক্রিপ্ট (ভাষা 4), 117 বাইট

দ্রষ্টব্য: আমি এর মধ্যে একটি ভুল সংশোধন করতে একটি চরিত্র পরিবর্তন করেছি।

c=>c?c[0]=='e'?6:c[0]=='$'||c[0]=='^'?1:c[0]=='c'&&c.length>80?4:c[0]=='P'?7:c[0]=='c'?5:c[0]=='{'?2:c[0]=='s'?4:3:1;

ইনপুটটির প্রথম অক্ষরটি পরীক্ষা করে যদি এটি সি হয় তবে ইনপুটটির দৈর্ঘ্য পরীক্ষা করে।

আউটপুট:

  • উত্তরের জন্য 1, 5, 7, 9
  • উত্তরের জন্য 2
  • উত্তরের জন্য 3
  • উত্তর 4 এবং এই উত্তরের জন্য 4
  • উত্তরের জন্য 5, 8
  • উত্তরের জন্য 6
  • উত্তরের জন্য 7
— Devsman
সূত্র
3

13. পাইথন (ভাষা 8), 110 বাইট

দ্রষ্টব্য: এই উত্তরটি পোস্টের 6 ঘন্টা পরে ওপির পরামর্শে পরিবর্তিত হয়েছিল।

from hashlib import*;print("1234151516748"["a5e1f936cd78b".index(sha256(input().encode()).hexdigest()[34])])#N

এটি উত্তর 10 (বাশের ক্ষেত্রে) হিসাবে একই ধারণা, তবে পাইথন 3-এ (হ্যাক্স সংখ্যা ছাড়ার আগে এই পদ্ধতিটি আরও প্রায় 3 টি প্রবেশপথের জন্য কাজ করতে পারে))

এই মুদ্রণ:

  • 1উত্তর 1 , 5 , 7 , এবং 9 (রেটিনা) সহ।

  • 2উত্তর 2 (মস্তিষ্ক-ফ্লাক) সহ

  • 3উত্তর 3 (এপিএল) সহ।

  • 4উত্তর 4 এবং 12 (জাভাস্ক্রিপ্ট) সহ।

  • 5উত্তর 6 এবং 8 (আর) সহ।

  • 6উত্তর 10 (বাশ) সহ

  • 7উত্তর সহ 11 (গণিত)।

  • 8 এই উত্তরের জন্য (পাইথন)

এটি অনলাইন চেষ্টা করুন! কারণ: উত্তর 1 , উত্তর 2 , উত্তর 3 , উত্তর 4 , উত্তর 5 , উত্তর 6 , উত্তর 7 , উত্তর 8 , উত্তর 9 , উত্তর 10 , উত্তর 11 , উত্তর 12 , বা এই উত্তর ।

— নিক মাত্তিও
সূত্র
বর্তমান বাইট সীমা কত?
— vi।
@ ভিআই .: আচ্ছা, এটি উত্তরের 149 এবং উত্তর 14 এর 163 ছিল; তবে ওপি কেবল বাইট গণনা নিয়মকে 45 + 5n এ পরিবর্তন করেছে, যাতে এটি 13 জবাবের জন্য 110 বাইট এবং 14 জবাবের জন্য 115 বাইট হবে।
— নিক মাতেও
আপনার সম্ভবত 110 বাইট সমাধান আপ করা উচিত।
— ক্লিশিক
@ কিওয়ার্প-ডের্প: ঠিক আছে। আশা করি এটি কারও চলমান কাজকে ভাঙ্গবে না।
— নিক মাতেও
ঠিক আছে, বাইট সীমাটি জাভা-বান্ধব জমিতে না পাওয়া পর্যন্ত প্রায় 60 টি উত্তরের জন্য অপেক্ষা করা।
— vi।
3

24. জেডএস (ভাষা 11), 142 বাইট

আমার পূর্ববর্তী উত্তর # 18 সি এখনও পরবর্তী সমস্ত এন্ট্রি ( ডেমো ) এর জন্য অশোধিত কাজ করে । সুতরাং এটি একটু মিশ্রিত করা যাক।

typeset -A p
p=("[\$^]*|'\[*" 1 '{*' 2 "' *" 3 '?=>*' 4 'c?[wt]*' 5 'e*' 6 'P*' 7 'f*' 8 'w*' 9 'm*' 10 'ty*' 11)
echo ${p[(k)$1]:-1} #@<`w&X{

শেষে মন্তব্যের উদ্দেশ্যটি 21 এবং 23 টির উত্তরগুলির দৈর্ঘ্যের সাথে মেলানো এবং ল্যাথের সি ++ উত্তরগুলি দ্বারা পরীক্ষিত অক্ষরগুলি ব্যবহার করে sha256 বা sha384 হ্যাশগুলির কোনও একক অক্ষর এখন পর্যন্ত প্রতিটি উত্তরের জন্য স্বতন্ত্র নয় তা নিশ্চিত করে। ;-)

এই মুদ্রণ:

  • 1উত্তর 1 , 5 , 7 , 9 , এবং 14 (রেটিনা) সহ।

  • 2উত্তর 2 (মস্তিষ্ক-ফ্লাক) সহ

  • 3উত্তর 3 (এপিএল) সহ।

  • 4উত্তর 4 , 12 এবং 15 (জাভাস্ক্রিপ্ট) সহ।

  • 5উত্তর 6 এবং 8 (আর) সহ।

  • 6উত্তর 10 , 17 , 20 , এবং 22 (বাশ) সহ।

  • 7 উত্তর সহ 11 এবং 19 (গণিত)

  • 8উত্তর সহ 13 (পাইথন)

  • 9উত্তর সহ 16 (পার্ল)

  • 1018 , 21 উত্তর সহ , এবং 23 (গ / সি ++)।

  • 11 এই উত্তর দিয়ে (Zsh)।

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

— নিক মাত্তিও
সূত্র
আমি মনে করি এটি আমার কাছ থেকে বহু-রেখাযুক্ত হওয়ার প্রথম উত্তর ... +1
— ক্লিমেজিক
2

14. রেটিনা (ভাষা 1), 39 বাইট

'[ ⍳]|}\{|[o@:][^]'c@:]|^c|,\b1|1\d|$

এটি অনলাইন চেষ্টা করুন! (সমস্ত বৈধ ইনপুট পরীক্ষা করুন।)

— মার্টিন ইন্ডার
সূত্র
1
মার্টিনে আসুন, আলাদা ভাষায় পোস্ট করুন ... এছাড়াও, আপনি উত্তর-ফর্ম্যাটিংয়ের কাজটি করতে পারেন?
— ক্লিশিক
3
@ কিওয়ার্প-ডের্প এটি আসলে স্ট্যান্ডার্ড রেজেক্স গল্ফের একটি আকর্ষণীয় পরিবর্তনে রূপান্তরিত করছে। একটি ইনপুট সেট রাখার পরিবর্তে এবং সেগুলির কয়েকটি মেলে এবং কিছুকে ব্যর্থ করার পরিবর্তে, আপনাকে প্রতিটি ইনপুটগুলিতে একটি নির্দিষ্ট সংখ্যক ম্যাচ পেতে হবে। আমি ভাবছি না যে এই রেজেক্সটি কোনও পর্যায়ে তাত্পর্যপূর্ণভাবে ফুঁসে উঠবে কিনা।
— মার্টিন ইন্ডার
এটি কি সত্যিই 39 বাইট? টিআইও 37 বাইট রিপোর্ট করে।
— আর্নল্ড
1
@ আর্নল্ড টিআইও কেবলমাত্র রেটিনার জন্য অক্ষর গণনা করার জন্য হার্ডকোডযুক্ত কারণ আপনি প্রায়শই একক-বাইট এনকোডিং ব্যবহার করেন। যদিও এই উত্তরটির জন্য ইউটিএফ -8 প্রয়োজন।
— মার্টিন এেন্ডার
2

15. জাভাস্ক্রিপ্ট (ভাষা 4), 108 বাইট

Golfed

t=>({24:2,86:3,5:4,73:5,68:5,74:7,4:6,79:4,1:8,67:4})[[...t].reduce((r,c,i)=>r*i^c.charCodeAt(0),0)&0x5F]||1
— জেপেলীন্
সূত্র
2

17. বাশ (+ কোর্টিলস + ওপেনসেল) (ভাষা 6), 103 বাইট

Golfed

expr substr 69418476151514321 $(expr index 2PtgBOlrvfDVC8ZHL `openssl md5 -binary|base64|cut -c2`) 1 #x

আমার উত্তর # 10 এর মতো একই কৌশলটি ব্যবহার করে তবে বেস 64 নিয়ে হেক্সের পরিবর্তে এনকোডড অভিধান রয়েছে ।

আমি পরীক্ষার জন্য নিম্নলিখিত ডেটা ফাইল একসাথে রেখেছি:

6 17 expr substr 69418476151514321 $(expr index 2PtgBOlrvfDVC8ZHL `openssl md5 -binary|base64|cut -c2`) 1 #x
9 16 while(<>){print substr("1234151516748149",index("0F=POmS6D4e_XWVH",chr(47+length($_)%70)),1);}
4 15 t=>({24:2,86:3,5:4,73:5,68:5,74:7,4:6,79:4,1:8,67:4})[[...t].reduce((r,c,i)=>r*i^c.charCodeAt(0),0)&0x5F]||1
1 14 '[ ⍳]|}\{|[o@:][^]'c@:]|^c|,\b1|1\d|$
8 13 from hashlib import*;print("1234151516748"["a5e1f936cd78b".index(sha256(input().encode()).hexdigest()[34])])#N
4 12 c=>c?c[0]=='e'?6:c[0]=='$'||c[0]=='^'?1:c[0]=='c'&&c.length>80?4:c[0]=='P'?7:c[0]=='c'?5:c[0]=='{'?2:c[0]=='s'?4:3:1;
7 11 Position[Characters@"^{'sceP",#&@@#][[1,1]]/._@__->1&
6 10 expr substr "1234151516" $(expr index "365f8dc0eb" `md5sum|cut -c12`) 1 #G
1 09 $|}\{|[:'][^]']|,\b1
5 08 c=which(c("","{","'","s","c")==substr(readline(),1,1));ifelse(length(c),c,1)
1 07 ^$|(?![⊂⍴])[⊂-⍴]|\B=|{}|\b5
5 06 cat(switch(substr(readline(),1,1),"{"=2,"'"=3,"s"=4,"c"=5,1))
1 05 ^$|(?![⊂⍴])[⊂-⍴]|\B=|{}
4 04 s=>s?s[0]==`{`?2:s[0]==`s`?4:3:1
3 03 ' {'⍳⊃⍞
2 02 {<>(())(<>)}{}(<>{}())
1 01

পরীক্ষা

for i in `seq 17`
do
  echo -n `cat lchain|sed -n $i'{p;q}'|cut -c1`=\>
  cat lchain|sed -n $i'{p;q}'|cut -c6-|\
  expr substr 69418476151514321 $(expr index 2PtgBOlrvfDVC8ZHL `openssl md5 -binary|base64|cut -c2`) 1 #x
done

6=>6
9=>9
4=>4
1=>1
8=>8
4=>4
7=>7
6=>6
1=>1
5=>5
1=>1
5=>5
1=>1
4=>4
3=>3
2=>2
1=>1
— জেপেলীন্
সূত্র
2

19. গাণিতিক (ভাষা 7), 96 বাইট

Position[ToCharacterCode@StringSplit@";NRU$ Q B [1: =L J, 5% 3 # >",Mod[Length@#,59,33]][[1,1]]&

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

  • 1উত্তর 1 , 5 , 7 , 9 , এবং 14 (রেটিনা) সহ।

  • 2উত্তর 2 (মস্তিষ্ক-ফ্লাক) সহ

  • 3উত্তর 3 (এপিএল) সহ।

  • 4উত্তর 4 , 12 এবং 15 (জাভাস্ক্রিপ্ট) সহ।

  • 5উত্তর 6 এবং 8 (আর) সহ।

  • 6উত্তর 10 এবং 17 (বাশ) সহ।

  • 7উত্তর 11 এবং এই উত্তর (গণিত) সহ।

  • 8উত্তর সহ 13 (পাইথন)

  • 9উত্তর সহ 16 (পার্ল)

  • 10উত্তর সহ 18 (সি)।

এখনও অবধি সমস্ত উত্তর পৃথক, এবং সেগুলি এমনকি স্বতন্ত্র মডুলো ৫৯ — সুতরাং 33, 34, ..., 91 পরিসরে কোন সংখ্যার (મોડ 59) এর সাথে একত্রে এটি সনাক্ত করা যায়। এগুলি সমস্ত মুদ্রণযোগ্য ASCII অক্ষর, স্ট্রিং দ্বারা এনকোড করা ";NRU$ Q B [1: =L J, 5% 3 # >"; ToCharacterCode@StringSplit@এই স্ট্রিংটি ব্যবহার করে সেই ব্যাপ্তিটির দশটি পূর্ণসংখ্যার তালিকার তালিকায় পরিণত হয় এবং Position[...,Mod[Length@#,59,33]][[1,1]]দশটি উপলিস্টের মধ্যে কোনটি ইনপুটটির পরিবর্তিত দৈর্ঘ্যের সাথে মেলে।

— গ্রেগ মার্টিন
সূত্র
1

20. বাশ (+ কোরিউটিলস + ওপেনসেল) (ভাষা 6), 121 বাইট

Golfed

expr substr 67A69418476151514321 $(expr index 7042PtgBOlrvfDVC8ZHL `openssl md5 -binary|base64|cut -c2`) 1| dc -e16i?p #u

আমার উত্তর # 17 হিসাবে একই পদ্ধতি (যা পরিবর্তিতভাবে আমার মূল উত্তরের উপর ভিত্তি করে # 10 এর ) ।

আমাদের কাছে এখন 10 টি স্বতন্ত্র ভাষা রয়েছে, তাই আমি হেক্সাডেসিমাল অবস্থান এনকোডিং এ চলেছি।

উপাত্ত

6 20 expr substr 67A69418476151514321 $(expr index 7042PtgBOlrvfDVC8ZHL `openssl md5 -binary|base64|cut -c2`) 1| dc -e16i?p #u
7 19 Position[ToCharacterCode@StringSplit@";NRU$ Q B [1: =L J, 5% 3 # >",Mod[Length@#,59,33]][[1,1]]&
A 18 main(n){char*v=" ^{ s ePfwm",b[999],*c;gets(b);c=strchr(v,*b);n=strlen(b);printf("%d",n?c?c-v:n>99?4:n>60?5:n>15?1:3:1);}
6 17 expr substr 69418476151514321 $(expr index 2PtgBOlrvfDVC8ZHL `openssl md5 -binary|base64|cut -c2`) 1 #x
9 16 while(<>){print substr("1234151516748149",index("0F=POmS6D4e_XWVH",chr(47+length($_)%70)),1);}
4 15 t=>({24:2,86:3,5:4,73:5,68:5,74:7,4:6,79:4,1:8,67:4})[[...t].reduce((r,c,i)=>r*i^c.charCodeAt(0),0)&0x5F]||1
1 14 '[ ⍳]|}\{|[o@:][^]'c@:]|^c|,\b1|1\d|$
8 13 from hashlib import*;print("1234151516748"["a5e1f936cd78b".index(sha256(input().encode()).hexdigest()[34])])#N
4 12 c=>c?c[0]=='e'?6:c[0]=='$'||c[0]=='^'?1:c[0]=='c'&&c.length>80?4:c[0]=='P'?7:c[0]=='c'?5:c[0]=='{'?2:c[0]=='s'?4:3:1;
7 11 Position[Characters@"^{'sceP",#&@@#][[1,1]]/._@__->1&
6 10 expr substr "1234151516" $(expr index "365f8dc0eb" `md5sum|cut -c12`) 1 #G
1 09 $|}\{|[:'][^]']|,\b1
5 08 c=which(c("","{","'","s","c")==substr(readline(),1,1));ifelse(length(c),c,1)
1 07 ^$|(?![⊂⍴])[⊂-⍴]|\B=|{}|\b5
5 06 cat(switch(substr(readline(),1,1),"{"=2,"'"=3,"s"=4,"c"=5,1))
1 05 ^$|(?![⊂⍴])[⊂-⍴]|\B=|{}
4 04 s=>s?s[0]==`{`?2:s[0]==`s`?4:3:1
3 03 ' {'⍳⊃⍞
2 02 {<>(())(<>)}{}(<>{}())
1 01

পরীক্ষা (আউটপুট)

./test
6=>6
7=>7
A=>10
6=>6
9=>9
4=>4
1=>1
8=>8
4=>4
7=>7
6=>6
1=>1
5=>5
1=>1
5=>5
1=>1
4=>4
3=>3
2=>2
— জেপেলীন্
সূত্র
1

23. সি (জিসিসি) (ভাষা 10), 142 বাইট

main(c){int d[256]={0};while((c=getchar())!=EOF)d[c]++;printf("%d",d[88]?9:d[119]?5*d[123]:d[35]?d[38]?7:8-d[96]:d[48]?4:d[60]?2:1+d[158]*2);}

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

  • 1উত্তর 1 , 5 , 7 , 9 , এবং 14 (রেটিনা) সহ।

  • 2উত্তর 2 (মস্তিষ্ক-ফ্লাক) সহ

  • 3উত্তর 3 (এপিএল) সহ।

  • 4উত্তর 4 , 12 এবং 15 (জাভাস্ক্রিপ্ট) সহ।

  • 5উত্তর 6 এবং 8 (আর) সহ।

  • 6উত্তর 10 , 17 , 20 এবং 22 (বাশ) সহ।

  • 7উত্তর 11 এবং 19 (গণিত) সহ।

  • 8উত্তর সহ 13 (পাইথন)

  • 9উত্তর সহ 16 (পার্ল)

  • 10উত্তর সঙ্গে 18 , 21 এবং এই উত্তর (গ)।

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

সিদ্ধান্ত গাছটি # 21 (ইয়ে!) থেকে অপরিবর্তিত রয়েছে। আমাকে ঠিক একই কোড পোস্ট করার অনুমতি নেই, তাই আমরা ছোটখাটো পরিবর্তন করে বিশুদ্ধ সিতে ফিরে এসেছি।

— Lyth
সূত্র
0

21. সি ++ (জিসিসি) (ভাষা সি এর রূপ হিসাবে 10), 142 বাইট

main(){int K,d[256]{0};while((K=getchar())!=EOF)d[K]++;printf("%d",d[88]?9:d[119]?5*d[123]:d[35]?d[38]?7:8-d[96]:d[48]?4:d[60]?2:1+d[158]*2);}

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

  • 1উত্তর 1 , 5 , 7 , 9 , এবং 14 (রেটিনা) সহ।

  • 2উত্তর 2 (মস্তিষ্ক-ফ্লাক) সহ

  • 3উত্তর 3 (এপিএল) সহ।

  • 4উত্তর 4 , 12 এবং 15 (জাভাস্ক্রিপ্ট) সহ।

  • 5উত্তর 6 এবং 8 (আর) সহ।

  • 6উত্তর 10 , 17 এবং 20 (বাশ) সহ।

  • 7উত্তর 11 এবং 19 (গণিত) সহ।

  • 8উত্তর সহ 13 (পাইথন)

  • 9উত্তর সহ 16 (পার্ল)

  • 10উত্তর 18 এবং এই উত্তর (সি) সহ।

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

ট্রিভিয়া : এই প্রবেশের আগ পর্যন্ত কে অক্ষর ব্যবহার করা হয়নি। I, E, Y, j, k, q, z চিঠিগুলি অব্যবহৃত থাকবে।

— Lyth
সূত্র
সি ++ ভাষা 11 বিবেচনা করার একটি বিকল্প রয়েছে, এতে কিছুটা বাইট বাকী রয়েছে
— লিথ
0

22. বাশ (+ কোর্টিলস) [ভাষা]], 123, 131 বাইট

সম্পাদনা: প্রথমে একটি ভুল সংস্করণ প্রকাশিত, এখনই ঠিক করা উচিত।

Golfed

expr substr 6A67A69418476151514321 $(expr index i3xFepQsAalyIvtqPY7ZN+ \\`openssl sha256 -binary|base64|cut -c10`) 1| dc -e16i?p #L

আমার উত্তরগুলির হিসাবে একই কৌশল # 20, # 17 এবং # 10 ।

উপাত্ত

6 22 expr substr 6A67A69418476151514321 $(expr index i3xFepQsAalyIvtqPY7ZN+ \\`openssl sha256 -binary|base64|cut -c10`) 1| dc -e16i?p #L
A 21 main(){int K,d[256]{0};while((K=getchar())!=EOF)d[K]++;printf("%d",d[88]?9:d[119]?5*d[123]:d[35]?d[38]?7:8-d[96]:d[48]?4:d[60]?2:1+d[158]*2);}
6 20 expr substr 67A69418476151514321 $(expr index 7042PtgBOlrvfDVC8ZHL `openssl md5 -binary|base64|cut -c2`) 1| dc -e16i?p #u
7 19 Position[ToCharacterCode@StringSplit@";NRU$ Q B [1: =L J, 5% 3 # >",Mod[Length@#,59,33]][[1,1]]&
A 18 main(n){char*v=" ^{ s ePfwm",b[999],*c;gets(b);c=strchr(v,*b);n=strlen(b);printf("%d",n?c?c-v:n>99?4:n>60?5:n>15?1:3:1);}
6 17 expr substr 69418476151514321 $(expr index 2PtgBOlrvfDVC8ZHL `openssl md5 -binary|base64|cut -c2`) 1 #x
9 16 while(<>){print substr("1234151516748149",index("0F=POmS6D4e_XWVH",chr(47+length($_)%70)),1);}
4 15 t=>({24:2,86:3,5:4,73:5,68:5,74:7,4:6,79:4,1:8,67:4})[[...t].reduce((r,c,i)=>r*i^c.charCodeAt(0),0)&0x5F]||1
1 14 '[ ⍳]|}\{|[o@:][^]'c@:]|^c|,\b1|1\d|$
8 13 from hashlib import*;print("1234151516748"["a5e1f936cd78b".index(sha256(input().encode()).hexdigest()[34])])#N
4 12 c=>c?c[0]=='e'?6:c[0]=='$'||c[0]=='^'?1:c[0]=='c'&&c.length>80?4:c[0]=='P'?7:c[0]=='c'?5:c[0]=='{'?2:c[0]=='s'?4:3:1;
7 11 Position[Characters@"^{'sceP",#&@@#][[1,1]]/._@__->1&
6 10 expr substr "1234151516" $(expr index "365f8dc0eb" `md5sum|cut -c12`) 1 #G
1 09 $|}\{|[:'][^]']|,\b1
5 08 c=which(c("","{","'","s","c")==substr(readline(),1,1));ifelse(length(c),c,1)
1 07 ^$|(?![⊂⍴])[⊂-⍴]|\B=|{}|\b5
5 06 cat(switch(substr(readline(),1,1),"{"=2,"'"=3,"s"=4,"c"=5,1))
1 05 ^$|(?![⊂⍴])[⊂-⍴]|\B=|{}
4 04 s=>s?s[0]==`{`?2:s[0]==`s`?4:3:1
3 03 ' {'⍳⊃⍞
2 02 {<>(())(<>)}{}(<>{}())
1 01

টেস্ট রান

./test
6=>6
A=>10
6=>6
7=>7
A=>10
6=>6
9=>9
4=>4
1=>1
8=>8
4=>4
7=>7
6=>6
1=>1
5=>5
1=>1
5=>5
1=>1
4=>4
3=>3
2=>2
1=>1
— জেপেলীন্
সূত্র
কি 44?
— ক্লিমেজিক
22 * 2? 󠀠󠀠󠀠󠀠󠀠
— vi।
@ Qwerp-Derp, শুধু একটি টাইপো
— জেপেলীন্
আসুন, আপনার উত্তরগুলি এখন বিরক্তিকর হয়ে উঠছে - আপনার পরবর্তী উত্তরগুলি যদি এইরকম হয় তবে আমি ডাউনভিটিংয়ের বিষয়টি বিবেচনা করছি (এটি আকর্ষণীয় নয়, আপনি কি জানেন?)
— ক্লিস্টিক
1
এখানে কিছু ভুল আছে. আপনার হ্যাশ অক্ষরগুলিতে কেবলমাত্র 20 টি প্রবেশ রয়েছে (3PgT ইত্যাদি)। খালি ইনপুটটির জন্য আমি একটি ত্রুটি পেয়েছি, এবং উত্তর # 2 এর জন্য আমি "4" পেয়েছি (উভয়ই উত্তর 20 এর সাথে সঠিকভাবে কাজ করেছে))
— নিক মাত্তিও
0

25. বাশ (ভাষা 6), 169 বাইট

আমার উত্তরগুলির মতো একই কৌশল # 22, # 20, # 17 এবং # 10 ।

দুঃখিত @ কিউয়ারপ-ডের্প! ;) আমি প্রতিজ্ঞা করছি এটিই শেষ :)

Golfed

{ echo -n 'addsomesalt?';cat; }|expr substr 6BA6A67A69418476151514321 $(expr index 1W0TC4YrKwRGAJupDqn7Xlcog \\`openssl sha256 -binary|base64|cut -c40`) 1| dc -e16i?p #8

উপাত্ত

মনে রাখবেন যে নতুন লাইনগুলি উত্তর # 24 এর জন্য \ n হিসাবে এনকোডড রয়েছে

6 25 { echo -n 'addsomesalt?';cat; }|expr substr 6BA6A67A69418476151514321 $(expr index 1W0TC4YrKwRGAJupDqn7Xlcog \\`openssl sha256 -binary|base64|cut -c40`) 1| dc -e16i?p #8
B 24 typeset -A p\np=("[\$^]*|'\[*" 1 '{*' 2 "' *" 3 '?=>*' 4 'c?[wt]*' 5 'e*' 6 'P*' 7 'f*' 8 'w*' 9 'm*' 10 'ty*' 11)\necho ${p[(k)$1]:-1} #@<`w&X{
A 23 main(c){int d[256]={0};while((c=getchar())!=EOF)d[c]++;printf("%d",d[88]?9:d[119]?5*d[123]:d[35]?d[38]?7:8-d[96]:d[48]?4:d[60]?2:1+d[158]*2);}
6 22 expr substr 6A67A69418476151514321 $(expr index i3xFepQsAalyIvtqPY7ZN+ \\`openssl sha256 -binary|base64|cut -c10`) 1| dc -e16i?p #L
A 21 main(){int K,d[256]{0};while((K=getchar())!=EOF)d[K]++;printf("%d",d[88]?9:d[119]?5*d[123]:d[35]?d[38]?7:8-d[96]:d[48]?4:d[60]?2:1+d[158]*2);}
6 20 expr substr 67A69418476151514321 $(expr index 7042PtgBOlrvfDVC8ZHL `openssl md5 -binary|base64|cut -c2`) 1| dc -e16i?p #u
7 19 Position[ToCharacterCode@StringSplit@";NRU$ Q B [1: =L J, 5% 3 # >",Mod[Length@#,59,33]][[1,1]]&
A 18 main(n){char*v=" ^{ s ePfwm",b[999],*c;gets(b);c=strchr(v,*b);n=strlen(b);printf("%d",n?c?c-v:n>99?4:n>60?5:n>15?1:3:1);}
6 17 expr substr 69418476151514321 $(expr index 2PtgBOlrvfDVC8ZHL `openssl md5 -binary|base64|cut -c2`) 1 #x
9 16 while(<>){print substr("1234151516748149",index("0F=POmS6D4e_XWVH",chr(47+length($_)%70)),1);}
4 15 t=>({24:2,86:3,5:4,73:5,68:5,74:7,4:6,79:4,1:8,67:4})[[...t].reduce((r,c,i)=>r*i^c.charCodeAt(0),0)&0x5F]||1
1 14 '[ ⍳]|}\{|[o@:][^]'c@:]|^c|,\b1|1\d|$
8 13 from hashlib import*;print("1234151516748"["a5e1f936cd78b".index(sha256(input().encode()).hexdigest()[34])])#N
4 12 c=>c?c[0]=='e'?6:c[0]=='$'||c[0]=='^'?1:c[0]=='c'&&c.length>80?4:c[0]=='P'?7:c[0]=='c'?5:c[0]=='{'?2:c[0]=='s'?4:3:1;
7 11 Position[Characters@"^{'sceP",#&@@#][[1,1]]/._@__->1&
6 10 expr substr "1234151516" $(expr index "365f8dc0eb" `md5sum|cut -c12`) 1 #G
1 09 $|}\{|[:'][^]']|,\b1
5 08 c=which(c("","{","'","s","c")==substr(readline(),1,1));ifelse(length(c),c,1)
1 07 ^$|(?![⊂⍴])[⊂-⍴]|\B=|{}|\b5
5 06 cat(switch(substr(readline(),1,1),"{"=2,"'"=3,"s"=4,"c"=5,1))
1 05 ^$|(?![⊂⍴])[⊂-⍴]|\B=|{}
4 04 s=>s?s[0]==`{`?2:s[0]==`s`?4:3:1
3 03 ' {'⍳⊃⍞
2 02 {<>(())(<>)}{}(<>{}())
1 01

পরীক্ষা আউটপুট

6=>6
B=>11
A=>10
6=>6
A=>10
6=>6
7=>7
A=>10
6=>6
9=>9
4=>4
1=>1
8=>8
4=>4
7=>7
6=>6
1=>1
5=>5
1=>1
5=>5
1=>1
4=>4
3=>3
2=>2
1=>1
— জেপেলীন্
সূত্র
আমাদের সাইট ব্যবহার করে, আপনি স্বীকার করেছেন যে আপনি আমাদের কুকি নীতি এবং গোপনীয়তা নীতিটি পড়েছেন এবং বুঝতে পেরেছেন ।
Licensed under cc by-sa 3.0 with attribution required.