জিমি বৈচিত্র্যের একটি দৃশ্য

25

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

ব্যাখ্যা

জিম্মিসের তিন প্রকার রয়েছে: বামন, অ্যাক্রোব্যাট এবং বডি বিল্ডার।

This is dwarf Jimmy:               o

This is acrobat Jimmy:            /o\

This is bodybuilder Jimmy:       /-o-\

এই জিম্মিস সমস্ত দুর্দান্ত বন্ধু এবং তারা একে অপরের মতো একই লাইনে দাঁড়াতে পছন্দ করে। আপনার কাজটি হ'ল জিমির দৃশ্যের মতো:

  o  /o\       o   /-o-\/-o-\  o          /o\

যথাক্রমে লাইনে বামন, অ্যাক্রোব্যাট এবং বডি বিল্ডারের পরিমাণ আউটপুট করুন।

চ্যালেঞ্জ

  • উপরের উদাহরণে যেমন দেখানো হয়েছে তেমন জিমির দৃশ্যে যেকোন যুক্তিসঙ্গত ফর্মের ইনপুট নিন।

    1. ইনপুট স্ট্রিংটি একটি লাইন হওয়া উচিত এবং allyচ্ছিকভাবে তিন ধরণের জিম্মিস এবং alচ্ছিক সাদা স্থান থাকতে পারে।

    2. স্ট্রিংটিতে অগত্যা সমস্ত জিমি জাত বা সাদা স্থান থাকতে পারে না।

    3. স্ট্রিংটিতে কোনও অক্ষর থাকবে না o/\ -।

    4. জিমি জাতগুলির যে কোনও সংমিশ্রণ সম্ভব। এর অর্থ হ'ল একই বা ভিন্ন ধরণের জিমি একে অপরের পাশে থাকতে পারে। আপনি অবশ্যই এর জন্য অ্যাকাউন্ট করতে হবে।

    5. শীর্ষস্থানীয় এবং পশ্চাদগামী শ্বেত স্থানটি alচ্ছিক এবং কোনও উপায়ে প্রয়োজন হয় না - আপনার প্রোগ্রামটি নেতৃস্থানীয় এবং / অথবা শ্বেত স্পেসের সাথে বা তার ছাড়া স্ট্রিংয়ের জন্য অ্যাকাউন্ট হওয়া উচিত।

    6. স্ট্রিংটিতে কেবল বৈধ জিম্মিস এবং হোয়াইটস্পেস থাকা উচিত। উদাহরণস্বরূপ, ---///---অনুমোদিত নয় কারণ এটি বৈধ জিমি ক্রম নয়।

  • আউটপুট তিন নম্বর: দৃশ্যটিতে বামন, অ্যাক্রোব্যাট এবং বডি বিল্ডারগণের গণনা (স্বতন্ত্র ক্রমে)।

    1. এটি স্পেস-বিভাজিত পূর্ণসংখ্যার হিসাবে কনসোলের আউটপুট হতে পারে, বা এটি কোনও ধরণের ধারক হিসাবে (যেমন একটি অ্যারে টাইপ) হিসাবে কোনও ফাংশন থেকে ফেরতের মান হতে পারে।

    2. এই নিয়মের উপরে শীর্ষ বুলেটে উল্লিখিত আউটপুট, যে কোনও বিন্যাসেই হোক না কেন, অবশ্যই অর্ডার করতে হবে।

  • মানক বিধি এবং ফাঁকগুলি প্রযোজ্য।

পরীক্ষার মামলা

     /-o-\           /-o-\     o/o\  /-o-\       /-o-\                /-o-\
OUTPUT: 1 1 5


      o o               /o\    o o      o                    /o\             /o\
OUTPUT: 5 3 0


 /-o-\     /-o-\            /-o-\/-o-\   o /o\/o\    /-o-\o /-o-\       /o\/-o-\
OUTPUT: 2 3 7


  /-o-\  o                 /-o-\               o/o\
OUTPUT: 2 1 2

আপনি যদি আরও পরীক্ষার কেস চান, তবে আরও এলোমেলো পরীক্ষার কেস উত্পন্ন করতে এই সরঞ্জামটি ব্যবহার করুন।

স্কোরিং

এটি কোড-গল্ফ , তাই বাইট জিতে সর্বনিম্ন স্কোর।

আপনি নীচের উইজেট / স্নিপেট প্রসারিত করে এই পোস্টের জন্য লিডারবোর্ডটি দেখতে পারেন। আপনার পোস্টটি র‌্যাঙ্কিংয়ে অন্তর্ভুক্ত করার জন্য আপনাকে # header textনিম্নলিখিত তথ্য সহ একটি শিরোনাম ( ) লাগবে :

  • ভাষার নাম (কমা ,বা ড্যাশ দিয়ে এটি শেষ করুন -), এরপরে ...

  • বাইট গণনা, আপনার শিরোনামে প্রদর্শিত শেষ সংখ্যা হিসাবে।

উদাহরণস্বরূপ, JavaScript (ES6), 72 bytesবৈধ, তবে Fortran, 143 bytes (8-bit)অবৈধ কারণ বাইট গণনা শিরোনামের শেষ সংখ্যা নয় (আপনার উত্তরটি 8 টি বাইট হিসাবে স্বীকৃত হবে - এর সুবিধা নেবেন না)।

<!-- Run the snippet to see the leaderboard. Report any bugs to @xMikee1 on Github. -->    <iframe src="https://ozewski.github.io/ppcg-leaderboard/?id=188391" width="100%" height="100%" style="border:none;">Oops, your browser is too old to view this content! Please upgrade to a newer version of your browser that supports HTML5.</iframe><style>html,body{margin:0;padding:0;height:100%;overflow:hidden}</style>
স্নিপেট প্রসারিত করুন

code-golf  string  counting 
— connectyourcharger
সূত্র
আমরা কী ধরে নিতে পারি যে সমস্ত ইনপুটগুলির কমপক্ষে একটি নেতৃস্থানীয় এবং অনুসরণযোগ্য স্থান থাকবে?
— শেগি
7
অর্ডার নির্দিষ্ট করার জন্য উত্তরগুলির প্রয়োজন হবে
— শেষ
4
কেবল স্পষ্ট করে বলতে গেলে, বামন জিম্মিস কি একসাথে দাঁড়াতে পারবেন? আমি অন্যথায় পরামর্শ কিছুই দেখতে পাচ্ছি। যদি তা হয় তবে একটি পরীক্ষার oo /o\ o o
— কেসটি
1
@ ভেসকাঃ পরীক্ষার কেস জেনারেটর ক্রমটি তৈরি করতে সক্ষম oo।
— পুনরাবৃত্তি
8
একটা করা প্রয়োজন জিমি ট্যাগ।
— মিল্কিওয়ে 90

উত্তর:

8

জেলি , (12?) 13 বাইট

ċⱮ“-/o”H1¦ŻIṚ

একটি মোনাডিক লিঙ্ক অক্ষরের একটি তালিকা গ্রহণ করে যা পূর্ণসংখ্যার একটি তালিকা দেয়, [ dwarves, acrobats, and body-builders]( Ṛবাইটটি সংরক্ষণ করুন যদি আমরা আমাদের আউটপুট নির্দিষ্ট করতে পারি)

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

কিভাবে?

সমস্ত জিম্মি একটি দেখায় o; সমস্ত অ-বামন একটি দেখায় /; সমস্ত দেহ-নির্মাতারা দু'জনকে দেখায় -। এগুলি গণনা করুন -, গণনা অর্ধেক করুন এবং জিমির সংখ্যাগুলি খুঁজে পেতে বিয়োগফল করুন:

ċⱮ“-/o”H1¦ŻIṚ - Link: list of characters
  “-/o”       - list of characters ['-', '/', 'o']
 Ɱ            - map across right with:
ċ             -   count occurrences   = [n('-'), n('/'), n('o')]
         ¦    - sparse application...
        1     - ...to indices: [1] -- i.e. n('-')
       H      - ...action: halve    = [n('-')/2, n('/'), n('o')]
          Ż   - prepend a zero =   [0, n('-')/2, n('/'), n('o')]
           I  - incremental differences
              -     = [n('-')/2, n('/')-n('-')/2, n('o')-n('/')]
            Ṛ - reverse
              -     = [n('o')-n('/'), n('/')-n('-')/2, n('-')/2]
— জোনাথন অ্যালান
সূত্র
21

পাইথন 3.8 (প্রাক রিলিজ) , 51 বাইট

lambda s:((c:=s.count)('o')-c('/'),c('/o'),c('/-'))

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

— এরিক দ্য আউটগল্ফার
সূত্র
শেষ পর্যন্ত অজগর এ জাতীয় কিছু যুক্ত করেছে। আমি পাইথনের অভিব্যক্তি হিসাবে অ্যাসাইনমেন্টগুলির অনুমতি দেওয়ার জন্য অপেক্ষা করছিলাম। এটি একটি অতিরিক্ত বাইট লাগে একটি লজ্জা, কিন্তু আমি এটি গ্রহণ করব: পি
— হাইপার নিউট্রিনো
@ হাইপারনিট্রিনো মূলত এটি কারণ যা আপনি এখন দেখতে পাচ্ছেন "পাইথন ৩.৮ (প্রাক-প্রকাশ)" সাইটের চারদিকে ভাসমান। আর একটি বিধিনিষেধটি হ'ল, যদি না এটি নিজস্ব হয়ে থাকে এবং কোনও বিবৃতিতে একমাত্র অভিব্যক্তি না হয় (তবে আপনি পরিবর্তে নিয়মিত নিয়োগকে পছন্দ করতে পারেন), এটি অবশ্যই প্রথম বন্ধনী (+2 বাইট) করা উচিত।
— এরিক আউটগল্ফার
('o')একটি ছাড়া কল করা প্রথম গণনা কিভাবে হয় c?
— কুইন
@ কুইন অ্যাসাইনমেন্ট এক্সপ্রেশনটি নির্ধারিত s.countকরে cএবং তারপরে এটি প্রদান করে।
— এরিক আউটগল্ফার
@ এরিক ওউটগলফার দুর্দান্ত, টিআইএল
— কুইন
12

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

x,y,z=map(input().count,'o/-')
print x-y,y-z/2,z/2

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

-Xnor- এর জন্য ধন্যবাদ একটি সম্পূর্ণ প্রোগ্রামে ল্যাম্বডা এক্সপ্রেশনকে রূপান্তর করে -10 বাইট (ডাবল-ল্যাম্বডা নীড়যুক্ত জিনিসটি সরিয়ে দেয় এবং এর পরিবর্তে অ্যাসাইনমেন্ট ব্যবহার করে)

— HyperNeutrino
সূত্র
3
এটি একটি দুর্দান্ত পদ্ধতি এবং একটি প্রোগ্রাম হিসাবে এটি খাটো ।
— xnor
5

জে , 36 25 বাইট

-11 বাইট ধন্যবাদ কোলে!

2-/\0,~1 1 2%~1#.'o/-'=/]

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

আসল সমাধান

জে , 36 বাইট

[:(-/@}:,-/@}.,{:)1 1 2%~1#.'o/-'=/]

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

ব্যাখ্যা:

                            'o/-'=/] compare the input with each one of "o/-" characters
                                     / the result is a 3-row matrix /
                         1#.         add up each row to find the number of occurences
                                     of each character, the result is a vector of 3 items
                  1 1 2%~            divide the last item by 2 to find the number of 
                                     bodybuilder Jimmys
[:(              )                   use the result to construct the following vector:
               {:                    the last item
              ,                      appended to
         -/@}.                       the difference of the second and the third items
        ,                            appended to
   -/@}:                             the difference of the first and the second items

একটি নমুনা জে অধিবেশন:

a=:'  /-o-\  o                 /-o-\               o/o\'
   'o/-'=/a
0 0 0 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 1 0
0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0
0 0 0 1 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
   1#.'o/-'=/a
5 3 4  
   1 1 2%~1#.'o/-'=/a
5 3 2
   (-/@}:,-/@}.,{:)1 1 2%~1#.'o/-'=/a
2 1 2
— গ্যালেন ইভানভ
সূত্র
1
— কোল
উফফফ, আমার মন্তব্যটি আর সম্পাদনা করতে পারে না - এটি সঠিক হলে 25 বাইটও হয়, 0 যুক্ত করার আলাদা পদ্ধতিতে
— কোল
1
@ কোল হাহ, প্রায়শই আমার কাছে যেমন ঘটে থাকে, আমি প্যাটার্নটি দেখতে পাইনি। ধন্যবাদ!
— গ্যালেন ইভানভ
এটি দুর্ভাগ্যজনক আমি কেবল তখনই দেখেছি যখন আপনি সেই ব্যাখ্যাটি সম্পাদনা করছেন - ব্যাখ্যা করার এত প্রচেষ্টা হারাতে সর্বদা লজ্জাজনক।
— কোল
@ কোল সেজন্য আমি আমার ভুলের ব্যাখ্যাটি দৃশ্যমান রাখব :)
— গ্যালেন ইভানভ
5

সিএসভি হিসাবে এক্সেল, 130 বাইট

,=LEN(A3)-LEN(A4)
=SUBSTITUTE(A1,"-o",""),=(LEN(A2)-LEN(A3))/2
=SUBSTITUTE(A2,"/o",""),=(LEN(A1)-LEN(A2))/2
=SUBSTITUTE(A3,"o","")

প্রথমে স্পেসে ইনপুট ,sertোকান, .csv হিসাবে সংরক্ষণ করুন, এক্সেলে খুলুন। আউটপুট Dwarfs ছিল, পোঁদ এবং মধ্যে ব্যায়ামবীরবৃন্দ B1, B2এবং B3যথাক্রমে।

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

=LEN(SUBSTITUTE(SUBSTITUTE(A1,"-o",""),"/o",""))-LEN(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(A1,"-o",""),"/o",""),"o",""))&" "&(LEN(SUBSTITUTE(A1,"-o",""))-LEN(SUBSTITUTE(SUBSTITUTE(A1,"-o",""),"/o","")))/2&" "&(LEN(A1)-LEN(SUBSTITUTE(A1,"-o","")))/2
— Wernisch
সূত্র
4

কোটলিন 131 130 129 121 117 97 96 88 বাইট

fun String.j(b:Int=count{'-'==it}/2,a:Int=count{'/'==it})=listOf(count{'o'==it}-a,a-b,b)

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

সম্পাদনা করুন - উইও, এটি 100 এর নিচে পেয়েছে! আমি সন্দেহ করি আমি এটি আরও সঙ্কুচিত করতে পারি তবে কেবল সময়ই বলে দেবে ...

সম্পাদনা করুন - খুব শীঘ্রই কথা বলেছেন, স্ট্রিংয়ের পরিবর্তে একটি তালিকা ব্যবহার করে আরও একটি বাইট ফেলেছেন

সম্পাদনা - অ্যাসোলিওকে একটি এক্সটেনশন ফাংশন ব্যবহার করার পরামর্শ দিয়ে বিয়োগ 8 টি বাইট ধন্যবাদ

— কুইন
সূত্র
1
আমার বন্ধুকে: এক্সটেনশন পদ্ধতি সম্পর্কে আপনাকে বলতে দাও: fun String.j(b:Int=count{'-'==it}/2,a:Int=count{'/'==it})=listOf(count{'o'==it}-a,a-b,b)৮৮ বাইট।
— এসো লিও
@ আসলো সুন্দর, আমি এটি আসলে একটি এক্সটেনশন ফাংশন হিসাবে লিখেছিলাম আসলে তবে আমার অবশ্যই আরও কিছু গণ্ডগোল করতে হবে কারণ আমার বাইট বেশি ছিল
— কুইন
3

রেটিনা , 39 35 বাইট

সম্পাদনা করুন: -২ বাইট @ ফ্রাইআমTheEggMan ধন্যবাদ

^((o)|(/o.)|(/-o-.)| )*
$#2 $#3 $#4

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

ব্যাখ্যা:

একটি সহজ প্রতিস্থাপন মঞ্চ। এটি রেজেক্সের সমস্ত মিল খুঁজে পেয়েছে ^((o)|(/o.)|(/-o-.)| )*(যার ফলস্বরূপ এক ম্যাচে - পুরো স্ট্রিং হওয়া উচিত) এবং এটি গ্রুপ 2, 3 এবং 4 এর ক্যাপচারের সংখ্যার দ্বারা প্রতিস্থাপন করে: এখানে রেজেক্সটি ভেঙে দেওয়া হয়েছে:

^((o)|(/o.)|(/-o-.)| )*
^                               start at the beginning of the string
 (                       )*     have any amount of Jimmy / spaces
     |       |         |        select one of:
  (o)                           capturing group 2 - dwarf
      (/o.)                   capturing group 3 - acrobat
              (/-o-.)         capturing group 4 - bodybuilder

আমাদের সাথে শুরু করতে হবে ^বা ইনপুটটির শেষটি ম্যাচ হিসাবেও গণনা করা হয়। রেটিনার প্রতিস্থাপন সিনট্যাক্সে, $nনবম ক্যাপচারিং গ্রুপের উল্লেখ করে এবং #কতটি মিলছে তা সংশোধক গণনা করে।

— lolad
সূত্র
স্ট্রিংটি কেবল জিম্মিসের গ্যারান্টিযুক্ত হওয়ায় আপনি কম পালিয়ে কিছু বাইট সংরক্ষণ করতে পারেন: অনলাইনে চেষ্টা করে দেখুন!
— FryAmTheEggman
3

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

একটি Regex প্যাটার্ন ম্যাচিং ব্যবহার করে STRING অনুসন্ধান o, o-অথবা o-\; সূচি নির্ধারণ করতে প্রতিটি ম্যাচের দৈর্ঘ্য ব্যবহার করে একটি অ্যারেতে সম্পর্কিত গণনা বৃদ্ধি করে।

s=>s.replace(/o-?\\?/g,m=>a[m.length-1]++,a=[0,0,0])&&a

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

— darrylyeo
সূত্র
1
@ জোনাথান অ্যালান আমি আমার উত্তরটি পুনরায় লিখেছি।
— darrylyeo
2

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

Reverse@{a=(m=CharacterCounts@#)["-"]/2,b=m["/"]-a,m["o"]-a-b}&

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

অর্থহীন অর্ডার প্রয়োজনীয়তা বাদ দেওয়া হলে 55 বাইট ...

— মেয়াদোত্তীর্ণ ডেটা
সূত্র
@ এক্সকলির এখন আরও বাম দিকে আবার বামন গণনা করা উচিত
— মেয়াদোত্তীর্ণ ডেটা
2

পাইথন 3 , 69 66 60 56 বাইট

-4 বাইটস @ মার্টেন ফ্যাব্রিকে ধন্যবাদ

g=input().count
b,c=g('/'),g('/-')
print(g('o')-b,b-c,c)

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

— ড্যানিল টুটুবালিন
সূত্র
1
এক্স এর দরকার নেই। আপনি g=input().countতাত্ক্ষণিকভাবে করতে পারেন
— মার্টেন ফ্যাব্রি
1

পার্ল 5 -p , 41 বাইট

$_=1*s/o(?!\\|-)//g.$".1*s|/o||g.$".y/o//

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

গণনা যতবার oপ্রদর্শিত হয় ছাড়া দ্বারা অনুসরণ করা হচ্ছে \বা -Dwarves এবং সরিয়ে ফেলা হবে স্ট্রিং থেকে খুঁজে বের করা। তারপরে /oঅ্যাক্রোব্যাটগুলি সন্ধান করার জন্য প্রদর্শিত সময়ের সংখ্যা গণনা করে সেগুলি স্ট্রিং থেকে সরিয়ে দেয়। তারপরে oবডি বিল্ডার নির্ধারণের জন্য অবশিষ্ট সংখ্যা গণনা করে । সংখ্যার মধ্যে ফাঁকা স্থান সন্নিবেশ করে এবং ফলকে সুস্পষ্টভাবে ফলাফল আউটপুট করে।

— Xcali
সূত্র
— নাহুয়েল ফিউইলুল
@ নাহুয়েলফুইলুল একটি লাইনের শেষে বামন থাকলে এটি কাজ করে না। এটি এটিকে বডি বিল্ডার হিসাবে গণনা করে।
— এক্সকালি
সত্য, অন্যথায় -4 বাইটগুলি কেবল সরানো1*
— নাহুয়েল ফিউইলুল
@ নাহুয়েলফুইলুল এটি কার্যকর হয় না। যদি এই ধরণের কোনও উদাহরণ না থাকে তবে এটি ( undef) এর পরিবর্তে কিছুই আউটপুট করে না 0।
— এক্সকালি
ঠিক আছে, আমি কেবল পরীক্ষার কেসগুলি
— দেখেছি
1

SNOBOL4 (CSNOBOL4) , 135 বাইট

	I =INPUT
B	I '-o' =	:F(A)
	B =B + 1	:(B)
A	I '/o' =	:F(D)
	A =A + 1	:(A)
D	I 'o' =	:F(O)
	D =D + 1	:(D)
O	OUTPUT =+D ' ' +A ' ' +B
END

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

সরানো -o, /oএবং oস্ট্রিং থেকে এবং প্রতিটি সময় উপযুক্ত কাউন্টার বাড়ায়। অস্ত্র ও পায়ে অনেকটা পিছনে পাতার ( /-\, \, এবং কিছুই)।

— : Giuseppe
সূত্র
0

ফোর্থ (গফোর) , 118 বাইট

: c -rot 0 tuck do over i + c@ 3 pick = - loop nip nip ;
: f 2dup '/ c >r 2dup '- c 2/ -rot 'o c i - . r> over - . . ;

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

ব্যাখ্যা

  • এর গণনা পেতে /, -এবং oঅক্ষর
  • বডি বিল্ডার হ'ল সংখ্যা -দ্বারা 2 দ্বারা বিভক্ত
  • অ্যাক্রোব্যাট /শারীরিক নির্মাতাদের সংখ্যার বিয়োগের সংখ্যা
  • oঅ্যাক্রোব্যাট এবং বডি বিল্ডারগুলির সংখ্যা বামন বিয়োগফলের সংখ্যা

কোড ব্যাখ্যা

\ c counts the number of occurrences of the given character in a string
\ stack usage is ( c-addr u1 w1 - u )
: c                 \ start a new word definition
  -rot 0 tuck       \ sets up parameters for a counted loop
  do                \ loop from 0 to string-length - 1 (inclusive)
    over i +        \ get the address of the current character in the string
    c@              \ get the ascii value of the current character              
    3 pick =        \ compare it to the character we're counting
    -               \ subtract result from the accumulator (subtract because -1 = true in forth)
  loop              \ end the loop
  nip nip           \ remove extra values from the stack
;                   \ end the word definition

\ Main function 
: f                 \ start a new word definition
  2dup              \ duplicate the string address and length
  '/ c >r           \ count the number of '/' characters and stick the result on the return stack
  2dup '- c 2/      \ count the number of '-' characters and divide by 2
  -rot 'o c         \ move the string to the top of the stack and count the number of 'o characters
  i - .             \ calculate number of dwarf jimmy's and print
  r> over - .       \ calculate number of acrobat jimmy's and print (drop '/' count from return stack)
  .                 \ print number of body-builder jimmy's
;                   \ end word definition
— reffu
সূত্র
0

05 এ বি 1 ই , 13 বাইট

…-/oS¢ć;š0š¥R

যদি এটির একটি আউটপুট-অর্ডারের অনুমতি দেওয়া হত তবে এটিটি সরিয়ে 12 বাইট হতে পারে ।R[bodybuilder, acrobat, dwarf]

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

গৌণ সমান-বাইট বিকল্প:

…-/oS¢R`;0)üα

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

ব্যাখ্যা:

…-/o           # Push string "-/o"
    S          # Split to a list of characters: ["-","/","o"]
     ¢         # Count the occurrence of each character in the (implicit) input-string
      ć        # Extract the head; pop and push head and remainder-list
       ;       # Halve this head
        š      # And prepend it back in front of the remainder-list
         0š    # Then also prepend a 0
           ¥   # Get the deltas (forward differences)
            R  # And reverse the list to get the required order of output-counts
               # (after which the result is output implicitly)

…-/oS¢         # Same as above
      R        # Reverse this list
       `       # Pop the list and push its values separately to the stack
        ;      # Halve the top value on the stack
         0     # Push a 0
          )    # Wrap all values on the stack into a list
           ü   # For each overlapping pair of values:
            α  #  Get the absolute difference between the two values
               # (after which the result is output implicitly)
— কেভিন ক্রুইজসেন
সূত্র
আমাদের সাইট ব্যবহার করে, আপনি স্বীকার করেছেন যে আপনি আমাদের কুকি নীতি এবং গোপনীয়তা নীতিটি পড়েছেন এবং বুঝতে পেরেছেন ।
Licensed under cc by-sa 3.0 with attribution required.