দয়া করে আমাকে একটি আইসক্রিম স্কুপ করুন


13

দয়া করে আমাকে একটি আইসক্রিম শঙ্কু করুন

নিউ ইংল্যান্ডে আমাদের এখানে প্রচুর আইসক্রিমের জায়গা রয়েছে। তাদের বেশিরভাগ এখন শীতের জন্য বন্ধ রয়েছে, তাই ...

   .-@@-.
  (======)
 (--------)
(==========)
(__________)
 \/\/\/\/\/
  \/\/\/\/
   \/\/\/
    \/\/
     \/

লক্ষ্য আউটপুট উপরে আইসক্রিম শঙ্কু ঠিক। (বা এটি কোনও ফাংশন থেকে ফেরত দিন)

এটি কোড গল্ফ তাই সংক্ষিপ্ত উত্তর জেতে


এটি একটি আশ্চর্যজনক চ্যালেঞ্জের মতো বলে মনে হচ্ছে, কেবল স্ট্রিং হিসাবে আক্ষরিকরূপে কার্যকর করা কি প্রযুক্তিগতভাবে জেএস / পাইথনের মতো কিছু অনুবাদিত ভাষার সমাধান হতে পারে?
জ্যাকব পার্সি

2
@ জ্যাকবপেরসি এটি একটি ক্লাসিক কোলমোগোরভ-জটিলতা চ্যালেঞ্জ, যেখানে প্রদত্ত স্ট্রিংটি যতটা সম্ভব সংকুচিত করার লক্ষ্য, হার্ডকোডিং সম্ভবত খুব গোলাপী নয়
মিঃ এক্সকোডার

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

3
বুঝতে পারছিল না। আমি সম্প্রতি আর্ম এসেমব্লারে একটির উত্তর দিয়েছি। অবশ্যই জিততে হবে না, তবে মজাও কম নয় :)
মাইকেল ডারগান

1
@StevenH। এখানে মেটা পোস্টটি - এটি কিছুটা পুরানো, তবে এখনও অনেকে তা দেখেনি
dzaima

উত্তর:


10

এসওজিএল ভি0.12 , 24 বাইট

u%⅝⁾⁷‰┘Η:⅛6s⁹№K⌠RΝīL°‘§╬

এখানে চেষ্টা করুন!

একটি সাধারণ সংক্ষেপণ সমাধান:

....‘    push "@-.¶===(¶----(¶=====(¶_____(¶\/\/\¶/\/\¶\/\¶/\¶\"
     §   pad with spaces and reverse horizontally
      ╬  palindromize with 0 overlap and mirroring the characters

কোনও সংকোচনের সংস্করণ নয় - এসওজিএল এর সংক্ষেপণ এর জন্য দুর্দান্ত কাজ করে



8

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

"   .-@@-.
  (======)
 (--------)
($('='*10))
($('_'*10))"
1..5|%{" "*$_+'\/'*(6-$_)}

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

অথবা

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

"   .-@@-.
  (======)
 (--------)"
'=','_'|%{"($($_*10))"}
1..5|%{" "*$_+'\/'*(6-$_)}

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

তোমারটা নাও. উভয় ক্ষেত্রেই, প্রথম তিনটি লাইনে পাওয়ারশেলে কোনও ধরণের সংকোচনের জন্য পর্যাপ্ত বাইট নেই।

প্রথম কেসটি 10-দৈর্ঘ্য =এবং _লাইনগুলির প্রতিটি উত্পাদন করতে স্ট্রিং গুণকে ব্যবহার করে, অন্যদিকে লুপ এবং স্ট্রিংয়ের গুণগুলি ব্যবহার করে। উভয় ক্ষেত্রেই, শেষ লাইনটি শঙ্কু ফর্ম থেকে লুপিং 1করতে 5এবং প্রতিটি পুনরাবৃত্তির স্পেস যথাযথ সংখ্যা outputting শঙ্কু টুকরা উপযুক্ত সংখ্যা দ্বারা অনুসরণ করে।

এই সমস্ত স্ট্রিং পাইপলাইনে রেখে গেছে, এবং Write-Outputপ্রোগ্রাম সমাপ্তিতে নিহিত আমাদের নিখরচায় উপাদানগুলির মধ্যে একটি নতুন লাইন দেয়।



7

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

@-.⸿E=-=⁺×ι⁺³κ)×_⁵P↙⁶)⸿‖M←¤/\

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

@-.⸿

প্রথম লাইনের ডান অর্ধেক মুদ্রণ করুন।

E=-=⁺×ι⁺³κ)

প্রতিটি চরিত্রের =-=জন্য, প্রথম বারের জন্য 3 বার এবং পরবর্তী প্রতিটি চরিত্রের জন্য অতিরিক্ত সময়ের জন্য পুনরাবৃত্তি করুন, তারপরে একটি যুক্ত করুন ), প্রতিটি ফলাফলকে তার নিজস্ব লাইনে মুদ্রণ করুন।

×_⁵

5 _টি মুদ্রণ করুন ।

P↙⁶

শঙ্কুর প্রান্তটি মুদ্রণ করুন।

)⸿

)শঙ্কুর ভিতরে চূড়ান্ত এবং কার্সারটি মুদ্রণ করুন ।

‖M←

অর্ধেক শঙ্কুটি আয়না করুন।

¤/\

শঙ্কুর দেহটি পূরণ করুন।


7

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

n=10
while n:print['\/'*n,'('+35/n*2*'-=_='[n%4]+')','.-@@-.'][-2%n/4].center(12);n-=1

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

লিনের সমাধানটি বন্ধ করে দেওয়া ।


-2%n/4খুব সুন্দর :) আপনি কি সেইরকম অভিব্যক্তিটি ম্যানুয়ালি অনুসন্ধান করেন, বা কোনও প্রকারের জোর অনুসন্ধান চালাচ্ছেন?
লিন

1
@ লিন আমি একটি নিষ্ঠুর-দৌড়বিদকে দৌড়ালাম। আমি 35/n*2এটির জন্য এটিও করেছি , এটি এটি খুঁজে পেয়েছিল 5*7/n*2যেহেতু এটি মাল্টিডিজিট সংখ্যাগুলি জানে না।
xnor

1
ওহ, এটা পরিষ্কার। আমি উত্স কোড দেখতে চাই!
লিন


5

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

•3[ÜAʒg‰ŽÎ<\¦•6¡εS"-.@(=_"sèJ∞}'\∞5LRׂ˜.C

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


1026344463000063444446355555 এখন আইসক্রিম নম্বর b / c অন্য কেউ এটিকে ব্যবহার করেনি।


Full program: •3[ÜAʒg‰ŽÎ<\¦•6¡εS"-.@(=_"sèJ∞}'\∞5LRׂ˜.C
current >> •  ||  stack: []
current >> 6  ||  stack: [1026344463000063444446355555]
current >> ¡  ||  stack: [1026344463000063444446355555, '6']
current >> ε  ||  stack: [['102', '3444', '30000', '344444', '355555']]
For each: S"-.@(=_"sèJ∞
Full program: S"-.@(=_"sèJ∞
current >> S  ||  stack: ['102']
current >> "  ||  stack: [['1', '0', '2']]
current >> s  ||  stack: [['1', '0', '2'], '-.@(=_']
current >> è  ||  stack: ['-.@(=_', ['1', '0', '2']]
current >> J  ||  stack: [['.', '-', '@']]
current >> ∞  ||  stack: ['.-@']
stack > ['.-@@-.']
Full program: S"-.@(=_"sèJ∞
current >> S  ||  stack: ['3444']
current >> "  ||  stack: [['3', '4', '4', '4']]
current >> s  ||  stack: [['3', '4', '4', '4'], '-.@(=_']
current >> è  ||  stack: ['-.@(=_', ['3', '4', '4', '4']]
current >> J  ||  stack: [['(', '=', '=', '=']]
current >> ∞  ||  stack: ['(===']
stack > ['(======)']
Full program: S"-.@(=_"sèJ∞
current >> S  ||  stack: ['30000']
current >> "  ||  stack: [['3', '0', '0', '0', '0']]
current >> s  ||  stack: [['3', '0', '0', '0', '0'], '-.@(=_']
current >> è  ||  stack: ['-.@(=_', ['3', '0', '0', '0', '0']]
current >> J  ||  stack: [['(', '-', '-', '-', '-']]
current >> ∞  ||  stack: ['(----']
stack > ['(--------)']
Full program: S"-.@(=_"sèJ∞
current >> S  ||  stack: ['344444']
current >> "  ||  stack: [['3', '4', '4', '4', '4', '4']]
current >> s  ||  stack: [['3', '4', '4', '4', '4', '4'], '-.@(=_']
current >> è  ||  stack: ['-.@(=_', ['3', '4', '4', '4', '4', '4']]
current >> J  ||  stack: [['(', '=', '=', '=', '=', '=']]
current >> ∞  ||  stack: ['(=====']
stack > ['(==========)']
Full program: S"-.@(=_"sèJ∞
current >> S  ||  stack: ['355555']
current >> "  ||  stack: [['3', '5', '5', '5', '5', '5']]
current >> s  ||  stack: [['3', '5', '5', '5', '5', '5'], '-.@(=_']
current >> è  ||  stack: ['-.@(=_', ['3', '5', '5', '5', '5', '5']]
current >> J  ||  stack: [['(', '_', '_', '_', '_', '_']]
current >> ∞  ||  stack: ['(_____']
stack > ['(__________)']
current >> '  ||  stack: [['.-@@-.', '(======)', '(--------)', '(==========)', '(__________)']]
current >> ∞  ||  stack: [['.-@@-.', '(======)', '(--------)', '(==========)', '(__________)'], '\\']
current >> 5  ||  stack: [['.-@@-.', '(======)', '(--------)', '(==========)', '(__________)'], '\\/']
current >> L  ||  stack: [['.-@@-.', '(======)', '(--------)', '(==========)', '(__________)'], '\\/', '5']
current >> R  ||  stack: [['.-@@-.', '(======)', '(--------)', '(==========)', '(__________)'], '\\/', [1, 2, 3, 4, 5]]
current >> ×  ||  stack: [['.-@@-.', '(======)', '(--------)', '(==========)', '(__________)'], '\\/', [5, 4, 3, 2, 1]]
current >> ‚  ||  stack: [['.-@@-.', '(======)', '(--------)', '(==========)', '(__________)'], ['\\/\\/\\/\\/\\/', '\\/\\/\\/\\/', '\\/\\/\\/', '\\/\\/', '\\/']]
current >> ˜  ||  stack: [[['.-@@-.', '(======)', '(--------)', '(==========)', '(__________)'], ['\\/\\/\\/\\/\\/', '\\/\\/\\/\\/', '\\/\\/\\/', '\\/\\/', '\\/']]]
current >> .  ||  stack: [['.-@@-.', '(======)', '(--------)', '(==========)', '(__________)', '\\/\\/\\/\\/\\/', '\\/\\/\\/\\/', '\\/\\/\\/', '\\/\\/', '\\/']]
   .-@@-.
  (======)
 (--------)
(==========)
(__________)
 \/\/\/\/\/
  \/\/\/\/
   \/\/\/
    \/\/
     \/
stack > ['   .-@@-.\n  (======)\n (--------)\n(==========)\n(__________)\n \\/\\/\\/\\/\\/\n  \\/\\/\\/\\/\n   \\/\\/\\/\n    \\/\\/\n     \\/']

•3[ÜAʒg‰ŽÎ<\¦•               | Pushes 1026344463000063444446355555 to the stack.
-----------------------------+-------------------------------------------------
6¡                           | Split on 6's.
-----------------------------+-------------------------------------------------
  ε             }            | Loop on each piece to create the top of the icecream...
   S                         | Split into single chars.
    "-.@(=_"sè               | Substitute in the correct symbol for each number.
              J∞             | Join, then mirror.
-----------------------------+-------------------------------------------------
                 '\∞         | Push \/.
                    5LR      | Push [5,4,3,2,1]
                       ×     | Multiply '\/' by each 5,4,3,2 and 1.
                        ‚˜   | Join top to bottom.
                          .C | Center w/ newlines.


3

সি, 171 বাইট

i;p(c,n,o){for(printf("%*c",o,i?32:40);n--;)printf(c);puts(i?"":")");}f(){p(".-@@-.",i=1,3);--i;p("=",6,3);p("-",8,2);p("=",10,1);p("_",10,1);for(i=6;--i;)p("\\/",i,6-i);}

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

সি, 146 বাইট

f(){puts("   .-@@-.\n  (======)\n (--------)\n(==========)\n(__________)\n \\/\\/\\/\\/\\/\n  \\/\\/\\/\\/\n   \\/\\/\\/\n    \\/\\/\n     \\/");}

কেবল হার্ডকোডযুক্ত স্ট্রিং মুদ্রণ করে।

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


1
আপনি যা ভাবেন তার চেয়ে আপনি আরও ভাল করতে পারবেন ...
ক্লাব্ল্যাঙ্ক

2

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

জোনাথন ফ্রেচের উত্তর থেকে একটি কৌশল নেওয়া হয়েছিল এবং আমাকে কিছু বাইট সংরক্ষণ করার জন্য তাকে ধন্যবাদ জানায়।

print"   .-@@-.\n  (======)\n "+"(%s)\n"*3%("-"*8,"="*10,"_"*10),
i=5
while i:print(6-i)*" "+"\/"*i;i-=1

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


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

print"""   .-@@-.
  (======)
 (--------)
(==========)
(__________)"""
i=5
while i:print(6-i)*" "+"\/"*i;i-=1

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




2

পার্ল 5 , 92 বাইট

say'   .-@@-.
  (======)
 (--------)
(==========)
(__________)';$_='\/'x6;say while s%\\/% %

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


বাইট কাউন্টের দিকে আপনার কি ইনপুট গুনতে হবে না? অন্যথায় কেবল পুরো স্ট্রিংটি ইনপুট করুন ...
ক্লাব্ল্যাঙ্ক

কোনও ইনপুট নেই। এটি অন্য কিছু করা থেকে কেবল একটি টিআইও বাকী ছিল।
এক্সকালি

শীতল, এটি পেয়েছিলাম ধন্যবাদ।
ক্লিব্ল্যাঙ্ক

+1 টি। আপনি আরএলই ডিকোডিং ব্যবহার করে কয়েকজনকে বাঁচাতে পারবেন, তবে কোনও কারণে কাজ করার জন্য ;ডিলিমিটার হিসাবে ব্যবহার করতে পারলাম না s///। মোবাইলে তাই খুব বেশি কিছু করা যায় না! এটি অনলাইন চেষ্টা করুন!
ডোম হেস্টিংস


1

পাইথন 3, 202 বাইট

এটি বেশ ভয়ানক, কেবল স্ট্রিং এবং এটি মুদ্রণের সংজ্ঞা দেওয়ার চেয়ে আরও বাইটস।

print("   .-@@-.")
print("  ("+"="*6+")")
print(" ("+"-"*8+")")
print("("+"="*10+")")
print("("+"_"*10+")")
print(" "+"\/"*5)
print("  "+"\/"*4)
print("   "+"\/"*3)
print("    "+"\/"*2)
print("     \/")

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


6
আপনি \nপৃথক printবিবৃতিগুলির পরিবর্তে ব্যবহার করতে পারেন
নিসা

148 বাইট এই পদ্ধতির ব্যবহার করে
মিঃ এক্সকডার

7
পিপিসিজিতে আপনাকে স্বাগতম!
অ্যাডমবর্কবার্ক

1

জেলি , 74 72 বাইট

5RU⁾\/ẋ
5R×⁶ż¢Y
3,6,8,10,10j1ż“ “.-@@-.¶  (“=“)¶ (“-“)¶(“=“)¶(“_“)¶”P€;¢

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

ব্যাখ্যা:

5RU⁾\/ẋ    Link 1. Generate list of "\/"s for cone.
5RU        Range 5, reverse. Gets [5,4,3,2,1].
   ⁾\/     Literal string "\/".
      ẋ    Repeat. Gets ["\/\/\/\/\/","\/\/\/\/","\/\/\/","\/\/","\/"].

5R×⁶ż¢Y    Link 2. Generate rest of cone.
5R         Range 5. Gets [1,2,3,4,5].
  ×⁶       Repeat " " that many times. Gets [" ","  ","   ","    ","     "]
    ż¢     Zip that with the ¢ones. Gets a list of alternating space and cones.
      Y    Join with newlines. This puts it all together for the big cone.

3,6,8,10,10j1ż“ “.-@@-.¶  (“=“)¶ (“-“)¶(“=“)¶(“_“)¶”P€;¢    Link 3. Generate the top and put it on the cone.
10,10,8,6j1;1U                                                Generate list 3,1,6,1,8,1,10,1,10. Does this by joining [10,10,8,6] with ones, appending a one, and reversing.
               “   .-@@-.¶  (“=“)¶ (“-“)¶(“=“)¶(“_“)¶”        List of strings. This separates the completed parts from the non completed parts.
              ż                                               Zip 'em together. Gets [number, string, number, string, ...]
                                                      P€      Get the product of €ach. This completes the non completed strings by repeating them.
                                                        ;¢    Attach the ¢one to the end.

1

গণিত, 117 বাইট

Column[Join[{".-@@-."},"("<>#<>")"&/@{"="~(T=Table)~6,"-"~T~8,"="~T~10,"_"~T~10},T[""<>T["\/",i],{i,5,1,-1}]],Center]


আউটপুট
এখানে চিত্র বর্ণনা লিখুন

আপনি ওল্ফ্রাম স্যান্ডবক্সে এটি পরীক্ষা করতে পারেন (যদিও তারা যে ফন্টগুলি ব্যবহার করেন তারা ফলাফলটিকে কিছুটা ভাগ্যছাড়া করতে পারে)


মজার বিষয় \/হল একটি বিশেষ চরিত্র। : আমি খুঁজে পাইনি তা ব্যবহৃত হচ্ছে তাই আমি Mma.SE উপর জিজ্ঞাসা mathematica.stackexchange.com/q/200673/61597
lirtosiast




1

সি 165 বাইট

y,x,z;f(){for(puts("   .-@@-.");y++<9;)for(;x=++x%14;)z=y+3-y/4,putchar(x<13?y<5?x-7^z-1?7-x^z?abs(x-7)<z?y<4?y&1?61:45:95:32:40:41:x+y>16|y-x>3?32:x+y&1?92:47:10);}

1

কিউবিকভাবে , 345 336 বাইট

⇒@@@
RU+30f1+3-00@-2+3@+4@@-4@+2-3@-110@+31-4@@+2-4@+10f1f1-3+0@-400@+31-4@+2-4@+3-10f1f1@@-4+1@-400@+11@+10f1f1f1@-3+0@-400@+11@+4110@f1f1f1-22@-400@+31-4@+220@-43@+43@-43@+43@-43@+43@-43@+43@-43@-4000@+31-4@@+220@-43@+43@-43@+43@-43@+43@-43@-4000@+31-4f1+220@-43@+43@-43@+43@-43@-4000@+31-4f1@+220@-43@+43@-43@-4000@+31-4f1@@+220@-43@

এই সরঞ্জামের মাধ্যমে পাওয়া গেছে এবং কয়েকটি কাস্টম অপ্টিমাইজেশান সহ অনুসন্ধান এবং প্রতিস্থাপনের মাধ্যমে গল্ফ করেছে।

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


বিকল্প পদ্ধতি:

391 বাইট (কিউব সংশোধন করে না)

+5/1+3@@@:1/1+5@5.0+2@@5.0-2@-4@:5/1+3@@:4/1+4@:5+2/1+51@@@@@@:5/1+4@:1/1+1@:5/1+3@:4/1+4@5.05.05.05.05.05.05.05.0:5/1+4@:1/1+1@:4/1+4@:5+2/1+51@@@@@@@@@@:5/1+4@:1/1+1@:4/1+4@:5/1+55@@@@@@@@@@-51@:1/1+1@:5/1+3@:2/1+55@-5@+5@-5@+5@-5@+5@-5@+5@-5@:1/1+1@:5/1+3@@:2/1+55@-5@+5@-5@+5@-5@+5@-5@:1/1+1@:5/1+3@@@:2/1+55@-5@+5@-5@+5@-5@:1/1+1@:5/1+3@@@@:2/1+55@-5@+5@-5@:1/1+1@:5/1+3@@@@@:2/1+55@-5@

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