বর্ণমালা ত্রিভুজ


48

আপনি এই সঠিক পাঠ্য মুদ্রণ করতে হবে:

A
ABA
ABCBA
ABCDCBA
ABCDEDCBA
ABCDEFEDCBA
ABCDEFGFEDCBA
ABCDEFGHGFEDCBA
ABCDEFGHIHGFEDCBA
ABCDEFGHIJIHGFEDCBA
ABCDEFGHIJKJIHGFEDCBA
ABCDEFGHIJKLKJIHGFEDCBA
ABCDEFGHIJKLMLKJIHGFEDCBA
ABCDEFGHIJKLMNMLKJIHGFEDCBA
ABCDEFGHIJKLMNONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSTSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSTUTSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSTUVUTSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSTUVWVUTSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSTUVWXWVUTSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSTUVWXYXWVUTSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSTUVWXYZYXWVUTSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSTUVWXYXWVUTSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSTUVWXWVUTSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSTUVWVUTSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSTUVUTSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSTUTSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSTSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNONMLKJIHGFEDCBA
ABCDEFGHIJKLMNMLKJIHGFEDCBA
ABCDEFGHIJKLMLKJIHGFEDCBA
ABCDEFGHIJKLKJIHGFEDCBA
ABCDEFGHIJKJIHGFEDCBA
ABCDEFGHIJIHGFEDCBA
ABCDEFGHIHGFEDCBA
ABCDEFGHGFEDCBA
ABCDEFGFEDCBA
ABCDEFEDCBA
ABCDEDCBA
ABCDCBA
ABCBA
ABA
A

চশমা

  • আউটপুট শেষে অতিরিক্ত ট্রেলিং নিউলাইনগুলি অনুমোদিত।
  • অতিরিক্ত ট্রেলিং নিউলাইনগুলি সহ প্রতিটি লাইনের শেষে অতিরিক্ত ট্রেলিং স্পেসগুলি (U + 0020) অনুমোদিত হয়।
  • আপনি সমস্ত বড় হাতের পরিবর্তে সমস্ত ছোট হাতের অক্ষর ব্যবহার করতে পারেন, তবে আপনি আংশিকভাবে ছোট হাতের আংশিকভাবে বড় হাতের মুদ্রণ করতে পারবেন না।
  • আপনি কোনও সম্পূর্ণ প্রোগ্রামে মুদ্রণের পরিবর্তে পাঠ্যটিকে ফাংশন আউটপুট হিসাবে ফিরিয়ে দিতে পারেন।

স্কোরিং

যেহেতু এটি একটি ত্রিভুজ এবং ত্রিভুজটির 3 টি দিক রয়েছে এবং 3 টি একটি ছোট সংখ্যা, তাই আপনার কোড বাইট-কাউন্টের ক্ষেত্রে ছোট হওয়া উচিত।



1
আমার সংশ্লেষটি হিংস্র বন্য হয়ে উঠছে, @ ডাউনরেপ_নেশন
ডক্টরহেকেল

5
"যেহেতু ত্রিভুজের 3 টি পক্ষ রয়েছে এবং 3 একটি ছোট সংখ্যা, তাই আপনার কোড বাইট গণনার ক্ষেত্রে ছোট হওয়া উচিত।" বৈধ বলে মনে হচ্ছে
রোহান ঝুনঝুনওয়ালা

1
কেবল 1 এর সমন্বয়ে গঠিত সংখ্যার স্কোয়ার সম্পর্কিত বলে মনে হচ্ছে: 1 * 1 = 1 1 = এ, 11 * 11 = 121 ~ = এবিএ, 111 * 111 = 12321 ~ = এবিসিবিএ ...
ক্যারিডর্ক

1
"যেহেতু একটি ত্রিভুজটির 3 টি দিক এবং ..." ইলুমিনাতি নিশ্চিত হয়েছে।
হাইপারনিউট্রিনো

উত্তর:


38

ভিম, 37 বাইট

:h<_↵↵↵YZZPP$xqqxYpGP√2G$A♥-€k$q24@qJ

এখানে চিত্র বর্ণনা লিখুন

কিংবদন্তি

↵ = Return
√ = Ctrl+V
♥ = Ctrl+R
€ = Escape

2
এটি একটি দুর্দান্ত জিআইএফ।
অ্যাডমবর্কবার্ক

13
আমি কখনই ভিমের উত্তর দিয়ে অবাক হয়ে যাব না।
ড্যানএইমন

Vim তে সাবলীল নয় তাদের জন্য এটি কীভাবে কাজ করে তা বোঝানোর জন্য যত্নশীল?
আর কাপ,

6
@ আর.ক্যাপ আমি আপনাকে পরামর্শ দিচ্ছি যে ভিম ডাউনলোড করুন এবং সমাধানটি নিজেই চেষ্টা করে দেখুন - আপনি স্ট্রোকের মাধ্যমে সমাধানটি উদ্ঘাটন স্ট্রোকটি দেখতে পারেন! মূলত, আমি হেল্প ফাইল ( :h<_↵↵↵YZZP) থেকে বর্ণমালা চুরি করি , তারপরে একটি ম্যাক্রো রেকর্ড করুন ( qq…q) যা বারবার উপরের লাইনটি থেকে একটি চিপ চিপ করে, এর দুটি অনুলিপিটি ত্রিভুজটি উল্লম্বভাবে বাড়ানোর জন্য তৈরি করে, তারপরে কাটা চিঠিটি সমস্ত লাইনে সংযুক্ত করে অনুভূমিকভাবে এটি বৃদ্ধি। পূর্ণ ত্রিভুজ আঁকতে আমি আরও 24 বার এই ম্যাক্রোর পুনরাবৃত্তি করেছি।
লিন

31

লোগো, 232 207 196 190 বাইট

কেউ কি ত্রিভুজ বলেছেন?

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

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

ht
pu
to r:n:b:l repeat:n[rt:b label char 90-:n lt:b fd:l] end
to t:s
fd 12 rt 120 bk 6
repeat 2[r:s 90 12]
repeat 2[rt 120 r:s 90-heading 24]
end
rt 90 label "Z lt 210
repeat 25[t repcount]

rকার্যপ্রণালী একটি লাইন স্বপক্ষে nঅক্ষর। কতটি বিভাগ ব্যবহার করতে বলা হচ্ছে তার উপর নির্ভর করে চরিত্রটি স্বয়ংক্রিয়ভাবে নির্ধারিত হয়। bপরামিতি বলা হয়েছে যে সব সাময়িকভাবে তাই ঘোরাতে কত যে চিঠি ডান দিক নির্দেশ করছে। lপরামিতি অক্ষর মধ্যে রৈখিক দূরত্ব নির্ধারণ করে।

tপরবর্তী অবস্থানে পদ্ধতি পদক্ষেপ এবং কল rফাংশন একটি চার বার একটি ত্রিভুজ তৈরি করতে উপযুক্ত ক্ষেত্রে আবর্তিত। আমি উল্লম্ব দিকের জন্য এটি দু'বার ডাকলাম কারণ এটি বিশেষ হ্যান্ডলিংয়ের মাধ্যমে একবার কল করার চেয়ে কম বাইট নিয়েছিল। পদ্ধতির সমাপ্তি পরবর্তী ত্রিভুজটি শুরু করার জন্য কচ্ছপকে এক ধাপ উপরে রাখে।

Zএকটি বিশেষ ক্ষেত্রে, তাই আমরা কেবল এটি সরাসরি মুদ্রণ করি এবং ঘোরান যেমন আমরা একটি ত্রিভুজ শেষ করেছি। অবশেষে, t25 বার বলা হয়।

অগ্রগতিতে টীকাযুক্ত ছবিসমাপ্ত ফলাফল


3
বাক্সের বাইরে. সুন্দরভাবে সম্পন্ন.
চাচাতো ভাই কোকেন

19

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

f x=init x++reverse x
t=unlines$f[f['A'..c]|c<-['A'..'Z']]

একটি ফাংশন সংজ্ঞা tদেয় যা আউটপুটটিকে স্ট্রিং হিসাবে ফিরিয়ে দেয়।

f x=               define a helper function
init x             take the argument minus its last element
++                 and concatenate it with
reverse x          the argument reversed, producing ex. [a,b,c,b,a] from [a,b,c]

t=                                    define the main function
           [         |c<-['A'..'Z']]  for every char c from 'A' to 'Z'...
             ['A'..c]                 generate the range from 'A' to c
            f                         call the helper function to "reflect" it
          f                           call the helper function on the entire list
  unlines$                            join on newlines

12

জেলি , 16 13 বাইট

Ṗ;Ṛ
ØAḣJÇ€Çj⁷

3 বাইট বন্ধ করে গল্ফ করার জন্য @ লিক্যনুনকে ধন্যবাদ!

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

কিভাবে এটা কাজ করে

Ṗ;Ṛ        Helper link. Argument: A (array)

Ṗ          Pop; yield A without its last element.
  Ṛ        Reversed; yield A with inverted order.
 ;         Concatenate the results to both sides.


ØAḣJÇ€Çj⁷  Main link. No arguments.

ØA         Alphabet; set link argument and return value to "A...Z".
   J       Indices; yield [1, ..., 26].
  ḣ        Head; take the first, the first two, etc. elements of the alphabet.
           This yields ["A", AB", ..., "A...Z"].
    ǀ     Apply the helper link to each string.
      Ç    Apply the helper link to the array itself.
       j⁷  Join, separating by linefeeds.


ধন্যবাদ
ডেনিস

4
আমি কীভাবে পৃথিবীতে এটি কাজ করে তা জানতে আগ্রহী হব ...
সক্রেটিক ফিনিক্স

সম্ভবত লিঙ্কটি সদৃশ ব্যবহার করে আপনি একটি বাইট সংরক্ষণ করতে পারেন
লিকি নুন

3
@ ম্যাথিউরডিক জেলি একটি কাস্টম কোড পৃষ্ঠা ব্যবহার করে যা প্রতিটি 256 টি অক্ষরকে একক বাইট হিসাবে বোঝে এটি এনকোড করে। শিরোনামের বাইটস লিঙ্কটি এটিতে ইঙ্গিত করে।
ডেনিস

10

পাইথন, 74 বাইট

def f(x=66,s='A'):
 t=s+s[-2::-1];print t
 if x<91:f(x+1,s+chr(x));print t

পাইথন 2 ফাংশন যা কোনও আর্গুমেন্ট মুদ্রণ করে এবং নেয় takes মূল ধারণাটি পুনরাবৃত্তি সহ ত্রিভুজাকার সেখানে এবং পিছনের প্যাটার্ন তৈরি করা rate প্রথমে এই সহজ ফাংশনটি বিবেচনা করুন যা 'এ' অক্ষরগুলি 'জেড' অবধি এবং নীচে 'এ' তে মুদ্রণ করে:

def f(x=65):
 t=chr(x);print t
 if x<90:f(x+1);print t 

ফাংশনটি প্রথমে "এ" (চার্ট কোড 65) মুদ্রণ করে, তারপরে "বি" (66) প্রিন্ট করার জন্য পুনরাবৃত্তি করে এবং "জেড" (90) এ পুনরায় প্রেরণ করে। সেখান থেকে এটি পুনরাবৃত্তি থামে। পুনরাবৃত্তাকার স্ট্যাকের পিছনে পপিংয়ের পথে, যা কিছু অক্ষর মুদ্রণ করেt "Y" থেকে "A" তে একই স্তরে মুদ্রিত তা মুদ্রণ করে।

মূল কোডটি একই কাজ করে, এটি sএ পর্যন্ত অক্ষরের স্ট্রিংয়ের মধ্যে জমা হয়ে থাকে এবং উপরে এবং ডাউন স্ট্রিংটি মুদ্রণ করেs+s[-2::-1]

Xsot 2 বাইট জন্য ধন্যবাদ।

পাইথন 3-তে একই জিনিস হ'ল বাইট শর্ট (73 বাইট) সমস্ত কিছু এক লাইনে রেখে।

def f(x=66,s='A'):t=s+s[-2::-1];print(t);x>90or[f(x+1,s+chr(x)),print(t)]

আপনি যদি ভেরিয়েবলগুলি অফসেট করেন তবে আপনি 2 বাইট সংরক্ষণ করতে পারবেন f(x=66,s='A')। এটি আপনাকে sফাংশন বডির পরিবর্তে ফাংশন কলে আপডেট করতে দেয় ।
এক্সসট

আমার মনে হয় আপনার পাইথন 3 সংস্করণ যেমন এর পাইথন 2 আপেক্ষিকের মতো, দীর্ঘতম সারিতে Z এবং পিছনে যেতে সর্বদা 89 এর পরিবর্তে 90 এর মান প্রয়োজন।
তেব্বে

@ টিবেব ধন্যবাদ, এগুলি ঠিক করে দিন।
xnor

8

ব্রেনফাক, 1733 121 119 বাইট

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

সামান্য আরও পঠনযোগ্য সংস্করণ:

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

ব্যাখ্যা সম্ভবত আসতে হবে।


প্রতিটি অক্ষর নিজে হাতে তৈরির পরিবর্তে একটি লুপ ব্যবহার করার চেষ্টা করুন।
ফাঁস নুন

@ লিক্যনুন আমার কীভাবে এটি সম্পর্কে যেতে হবে তা সম্পর্কে কোনও ধারণা নেই। কোনও পরামর্শ?
ড্যানএইমন

4
দুর্দান্ত, সুতরাং আপনি কেবল 4 ঘন্টা ঘুমালেন।
ফাঁস নুন

1
আউটপুটটির চেয়ে কম প্রোগ্রাম পাওয়ার জন্য অভিনন্দন!
গিটারপিকার

1
একটি গল্ফ 1612 বাইট বন্ধ কিভাবে?
ফ্যানটাসি

8

05 এ বি 1 ই , 20 13 12 6 বাইট

আদনানকে ধন্যবাদ 2 বাইট সংরক্ষণ করা। ম্যাজিক অক্টোপাস উরন এবং কিছু নতুন ভাষার কার্যকারিতার
জন্য 6 বাইট সংরক্ষণ করা হয়েছে ।

Aη€ûû»

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

ব্যাখ্যা

Aη       # push prefixes of alphabet
  €û     # palendromize each prefix
    û    # palendromize the whole list
     »   # join on newlines

খুব সুন্দর! আপনি এটিতে উপস্থাপন Œ26£করতে পারেন .pযা উপসর্গ কমান্ড। এছাড়াও, আপনি পরিবর্তন করতে পারেন D,থেকে =পপিং ছাড়া, যা কপি করে প্রিন্ট।
আদনান

বাহ, চালাক চালাকি দিয়ে gF,!
আদনান

@ আদনান: ধন্যবাদ! আমি জানতাম যে সেখানে কোথাও একটি উপসর্গ কমান্ড ছিল :) আমি খুব কমই বর্ধিতদের পরীক্ষা করে নিই।
এমিগানা

2
দ্বিখণ্ডিত কমান্ডটি Âখুব সুন্দর এবং সত্যই সুন্দর একটি বৈশিষ্ট্য।
মাইল

1
@ কারাসোকম্পিউটিং: দুর্ভাগ্যক্রমে ûচ্যালেঞ্জের চেয়ে নতুন এবং এই উত্তরটি প্রতিদ্বন্দ্বিতামূলক করে তুলবে।
এমিগানা

6

জে, 26 23 22 বাইট

f(f=:,1}.|.)\u:65+i.26

ব্যাখ্যা

,1}.|.  Monad f: Input: A
    |.  Reverse the items in A
 1}.    Drop the first item in the reversed A
,       Join A and the previous

f(f=:,1}.|.)\u:65+i.26
                  i.26  Create the range [0, 1, ..., 25]
               65+      Add 65 to each
             u:         Convert to characters to get 'A..Z'
  f=:,1}.|.             Define a verb f
 (         )\           Call f monadically on each prefix of 'A..Z'
f                       Call f again on that result

f=:,1}.|.এটি ব্যবহার করে দেখুন
ফাঁস নুন

@ ল্যাকিয়ুনুন ধন্যবাদ আমি জানি না কেন আমি ভেবেছিলাম তারা আলাদা ছিল।
মাইল মাইল




5

সি, 272 247 234 230 144 137 বাইট:

( আমার আগের পদ্ধতিতে অনেকগুলি বাইট সংরক্ষণ করা হয়েছে 272 -> 230) সিগালোর থেকে দুর্দান্ত গল্ফিং টিপস এবং ট্রিকসকে ধন্যবাদ ! )

( আরও ভাল পদ্ধতিতে স্যুইচ করে প্রায় 100 বাইট ( 230 -> 144) সংরক্ষণ করা হয়েছে ))

main(q,i,e,x){for(q=0;q<51;q++){i=q>25 ? 25-(q-25):q;for(e=65;e<66+i;e++)printf("%c",e);for(x=64+i;x>64;x--)printf("%c",x);printf("\n");}}

আমার প্রথম উত্তর C। আমি সম্প্রতি এটি স্ব-শেখা শুরু করেছি, সুতরাং এটি কীভাবে হয় তা দেখুন।

সি এ্যাকশন! (Ideone)


1
আহ, আমি কেবল একটি সি উত্তর যুক্ত করতে চেয়েছিলাম ... যাই হোক না কেন, আমি তখন আপনাকে কেবল সহায়তা করব;) প্রথমত, এটি কোড গল্ফ, আপনাকে নিখুঁত কোড লেখার দরকার নেই। সংকলক সতর্কতা সম্পূর্ণ জরিমানা। এজন্য আপনি main()রিটার্নের ধরণ এবং এমনকি মুছে ফেলতে পারেন #include <stdio.h>। জিসিসি (এবং আইডিয়নের মতো সাইটগুলি) এর সাথে ঠিক আছে। এর পরে, আপনি কোনও ফাংশনের প্যারামিটার তালিকার পরিবর্তনশীল সংজ্ঞাগুলি 'আউটসোর্স' করতে পারেন। দিন for(int i=65;...হয়ে for(i=65...এবং পরিবর্তন main()করার main(i)। প্রতিটি অন্যান্য ইন্টার ভেরিয়েবলের জন্যও একই কাজ করুন (জিসিসি এতে অনুপস্থিত প্রকারের ডিফল্ট হয় int)।
সিগালোর

@ সিগালোর টিপসের জন্য ধন্যবাদ! :) কেবল একটি প্রশ্ন: আমার কেন পরিবর্তিত main()হওয়া দরকার main(i)?
আর কাপ,

@ সিগালোর আসলে, এখন আমি সংকলনের ত্রুটিগুলির একটি গুচ্ছ পাচ্ছি।
আর কাপ,

iলুপের প্রারম্ভিককরণের জন্য আপনি যখন নিজের ভেরিয়েবলটি ঘোষণা করেন না , আপনাকে এটি অন্য কোথাও ঘোষণা করতে হবে। এবং কারণ (কমপক্ষে সি তে) কোনও ফাংশনের পরামিতিগুলি স্বাভাবিক ভেরিয়েবলগুলির মতো ব্যবহার করা যায়, কোনও সমস্যা হওয়া উচিত নয়। বিটিডব্লিউ, আপনি কোন সংকলক ব্যবহার করছেন?
সিগালোর

@ সিগালর বর্তমানে Cআইডিয়নে। আমি বেশ কিছু <variable> undeclaredত্রুটি পাচ্ছি ।
আর কাপ,


5

গণিত 59 বাইট

Column@FromCharacterCode[#@#@26+64]&[#-Abs@Range[1-#,#-1]&]

আমি মনে করি যে //Columnশেষটি সরিয়ে ফেলা এবং Column@কাজের সাথে আপনার কোডটি উপসর্গ করা ।
Yytsi

2
আপনি গণনা করেছেন এবং একক বাইট হিসাবে মনে হয় । আমি সন্দেহ করি যে একটি একক বাইট কোড পৃষ্ঠা রয়েছে যা সেগুলি রয়েছে এবং ম্যাথমেটিকাকে বক্সের বাইরেও সমর্থন করে supported তারা ইউটিএফ -8 এ তিনটি বাইট দিয়েছিল, তাই তারা সত্যিকার অর্থে প্লেইন এর বাইরে কিছু সংরক্ষণ করে না [[...]]। আমি ঠিক কতটা বৈধ তাও নিশ্চিত নন Columnযেহেতু এটি কেবল একটি গাণিতিক নোটবুকের লাইনের তালিকার মতো প্রদর্শিত হয়। স্ক্রিপ্ট ফাইল থেকে এই কোডটি চালানো কোনও কিছুই প্রদর্শন করবে না। যাইহোক, Print/@বাইট একই সংখ্যা এবং উভয় ক্ষেত্রেই কাজ করে।
মার্টিন এন্ডার

আপনি একটি দীর্ঘ ঠিকানা দিয়ে একটি পৃষ্ঠায় একটি লিঙ্ক তৈরি করতে চান, আপনি নিম্নলিখিতগুলি করতে পারেন: [what you see](actual link)। যাত্রা। [Example Link](https://www.example.com), যা উদাহরণ লিঙ্ক
স্ট্যান স্ট্রাম


4

আর, 63 61 59 বাইট

for(i in c(1:26,25:1))cat(LETTERS[c(1:i,i:1-1)],"
",sep="")

সহায়কভাবে LETTTERS[0] কোনও অক্ষর ফেরত দেয় না।

সম্পাদনা: @ লেকিনুনের জন্য একটি ধন্যবাদ হারিয়েছে

সম্পাদনা করুন: প্ল্যানাপ্যাপাসকে আরও দুটি ধন্যবাদ


1
আপনি এর পরিবর্তে আক্ষরিক নিউলাইনটি ব্যবহার করতে পারেন\n
লিকি নুন

3

টিএসকিউএল, 159 বাইট

DECLARE @ varchar(52)='ABCDEFGHIJKLMNOPQRSTUVWXY',@o varchar(max)SELECT @+='Z'+REVERSE(@)+'
',@o=@
WHILE''<@
SELECT @=STUFF(@,LEN(@)/2,2,''),@o=@+@o+@
PRINT @o

বেহালা


1
আমি এটি করার চেষ্টা করেছিলাম তবে 250+ বাইট দিয়ে শেষ করেছি তাই কখনই পোস্ট করে নি। আপনার, সত্যিই, তারপর আমার আরও ভাল সমাধান আছে। আবারও :)
অনুজ ত্রিপাঠি

3

জাভাস্ক্রিপ্ট (বহিরাগত গ্রন্থাগার-গণনার ব্যবহার), 135 বাইট

_.Range(1,51).WriteLine(x=>(g=_.Range(65,x>25?52-x:x)).Write("",y=>(w=String.fromCharCode)(y))+(g.Reverse().Skip(1).Write("",y=>w(y))))

লাইব্রেরিতে লিঙ্ক: https://github.com/mvegh1/ গণনাযোগ্য

কোডের ব্যাখ্যা: 51 টির একটি গণনার জন্য 1 থেকে শুরু করে একটি অন্তর্নির্মিত বিন্যাস তৈরি করুন each প্রত্যেকের জন্য জটিল পূর্ব অনুযায়ী একটি লাইন লিখুন। গ্লোবাল ভেরিয়েবল এবং ক্যাশে ... এবং ভয়েলা দিয়ে কিছু জেএস উইজার্ডারি করুন। রাইটলাইনে প্রতিটি অন্তর্নিবেশের জন্য, আমরা ইনটগুলির বাম হাতের পরিসীমা তৈরি করছি এবং গ্লোবাল "জি" তে স্ট্রিং করছি, এবং স্ট্রিং জোড়িং (লিখুন) দিয়ে ""ডিলিমিটার সহ এবং প্রতিটি ইনট চার্ট কোডটিতে স্ট্রিং ম্যাপিংয়ের সাথে প্রতিটি ম্যাপিং করছি। তারপরে, আমরা সেই অনুক্রমের বিপরীত গ্রহণ করে ডান হাতটি সংহত করি (এবং প্রথম উপাদানটি এড়িয়ে যাচ্ছি কারণ এটি মূল ক্রমের শেষ উপাদানটির সাথে মিলবে ...), একই যুক্তি দিয়ে লিখে। সম্পাদনা: লাইব্রেরিতে লেখার ইন্টার্নালগুলি আপডেট করেছে। একটি খালি ক্রম এখন নাল পরিবর্তে একটি খালি স্ট্রিং লিখবে। এটি উত্তর বন্ধ 15 বাইট শেভ

এখানে চিত্র বর্ণনা লিখুন


1
আপনার যে লাইব্রেরিটি আমদানি করতে হবে সেই বাইটগুলি অন্তর্ভুক্ত করার দরকার নেই?
ম্যাথিউরক

1
ইড্ক, আইভ একটি লাইব্রেরী ব্যবহার করে 20 টিরও বেশি উত্তর পোস্ট করেছেন এবং আপনি আমার কাছে এটিই প্রথম বলেছিলেন। আমি মনে করি না যে কেউ সত্যিই চিন্তা করে না কারণ আমার উত্তরগুলি যেভাবেই জিততে পারে না
আপেলজ্যাকস 011

1
@ আপেলজ্যাক্স01 খুব নিশ্চিত যে আপনি এটি আমদানি না করে থাকেন, তবে আপনাকে শীর্ষে "জেএস ​​+ এনিউমারেবল" এর মতো কিছু বলতে হবে। "বাশ + কোরয়েটিলস"
mbomb007

2
এটি আমদানি গণনা করা সাধারণ। পাইথন + সিমপি উত্তরগুলি এখনও রয়েছে import sympyবা from sympy import*শীর্ষে রয়েছে। ব্যাশ + X কারণ আপনার শুধুমাত্র ইনস্টল করতে হবে উত্তর ভিন্ন এক্স , এটা একরকম সক্ষম নয়।
ডেনিস

1
@ পেট্রিকরবার্টস যতক্ষণ না চ্যালেঞ্জ পোস্ট হওয়ার আগে গ্রন্থাগারটির অস্তিত্ব ছিল, হ্যাঁ। Python- র ব্যবহার করতে উত্তর sympy, numpy, scipy, ইত্যাদি সব সময়।
ডেনিস

3

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

9 টি বাইট সংরক্ষণের জন্য টিমমিডকে ধন্যবাদ!

65..90+89..65|%{-join[char[]]((65..$_-ne$_)+$_..65)}

বড় হাতের অক্ষরের জন্য, তারপরে পিছনের দিকে ASCII মানগুলির মাধ্যমে লুপ হয়। প্রতিটি সংখ্যার জন্য, এটি প্রথম এক্স সংখ্যার একটি অ্যারে তৈরি করে, এক্স -1 ম সংখ্যাটি সরিয়ে দেয়, তারপরে প্রথম এক্স সংখ্যার বিপরীত যুক্ত করে, যা সব পরে অক্ষরে ফেলে দেওয়া হয় এবং একটি স্ট্রিংয়ে যোগ হয়।


আরে, ভাল, ধন্যবাদ! আমি 65..90..65কোনও সাফল্য ছাড়াই আগে এক ঝকঝকে প্লাগ ইন করেছিলাম । অনুমান আমি ভুলে গিয়েছিলাম আমি কেবল রেঞ্জগুলি একসাথে যুক্ত করতে পারলাম।
বেন ওয়েন

3

চেডার , 102 96 79 69 67 বাইট

ডাওনগোটকে 17 বাইটস এবং 10 টির জন্য অনুপ্রেরণার জন্য ধন্যবাদ।

"A"+(2@"27+@"(25|>1)).bytes.map(i->65@"(64+i)+@"((64+i)|>65)).vfuse

স্ট্রিংগুলি অ্যারেগুলিকে একত্রিত করতে পারে তবে অ্যারে নয়, এর অর্থ হ'ল আমাকে দুটি রেঞ্জকে স্ট্রিংতে রূপান্তর করতে হবে, একত্রীকরণ করতে হবে এবং তারপরে আবার অ্যারেতে রূপান্তর করতে হবে।

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

@" যেমন একটি ডায়াড (দ্বি-আর্গুমেন্ট ফাংশন) সরাসরি স্ট্রিংয়ে রূপান্তর করতে পারে তবে বিপরীত পরিসরের জন্য কাজ করে না (যদি প্রথম যুক্তি দ্বিতীয়টির চেয়ে বড় হয়)।

পরিসীমা অর্ধ-অন্তর্ভুক্ত ছিল। বাগ-ফিক্সের পরে এটি অন্তর্ভুক্ত হয়ে যায়।

ব্যবহার

cheddar> "A"+(2@"27+@"(25|>1)).bytes.map(i->(65@"(64+i)+@"((64+i)|>65))).vfuse
"A
ABA
ABCBA
ABCDCBA
ABCDEDCBA
ABCDEFEDCBA
ABCDEFGFEDCBA
ABCDEFGHGFEDCBA
ABCDEFGHIHGFEDCBA
ABCDEFGHIJIHGFEDCBA
ABCDEFGHIJKJIHGFEDCBA
ABCDEFGHIJKLKJIHGFEDCBA
ABCDEFGHIJKLMLKJIHGFEDCBA
ABCDEFGHIJKLMNMLKJIHGFEDCBA
ABCDEFGHIJKLMNONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSTSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSTUTSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSTUVUTSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSTUVWVUTSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSTUVWXWVUTSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSTUVWXYXWVUTSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSTUVWXYZYXWVUTSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSTUVWXYXWVUTSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSTUVWXWVUTSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSTUVWVUTSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSTUVUTSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSTUTSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSTSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNONMLKJIHGFEDCBA
ABCDEFGHIJKLMNMLKJIHGFEDCBA
ABCDEFGHIJKLMLKJIHGFEDCBA
ABCDEFGHIJKLKJIHGFEDCBA
ABCDEFGHIJKJIHGFEDCBA
ABCDEFGHIJIHGFEDCBA
ABCDEFGHIHGFEDCBA
ABCDEFGHGFEDCBA
ABCDEFGFEDCBA
ABCDEFEDCBA
ABCDEDCBA
ABCDCBA
ABCBA
ABA
A"

চেডার, 55 বাইট (প্রতিদ্বন্দ্বী)

ইন সর্বশেষ সংস্করণ সব সংশোধন করা হয়েছে সঙ্গে, এর জবাব হচ্ছে,

(|>25+24|>0).map(i->65@"(65+i)+(i?(64+i)@"65:"")).vfuse

তবে এটি চ্যালেঞ্জের পরে তৈরি হয়েছিল।


@"(1|>26)হতে পারে1@"26
ডাউনগোট

String.lettersহতে পারে(65@"91)
ডাউনগোট

String.letters.slice(0,i)হতে পারে65@"(66+i)
ডাউনগোট

আহা, আমি তোমাকে করে থাকেন দেখতে grating আপনার bytecount।
স্টেনবার্গ


3

ভিবিএ, 94 বাইট

Function T:For j=-25To 25:k=25-Abs(j):For i=-k To k:T=T &Chr(65+k-Abs(i)):Next:T=T &vbLf:Next

? টি দিয়ে তাত্ক্ষণিক উইন্ডোতে কল করুন?

যা চলছে তা কেবল ব্যাখ্যা করার জন্য: আমি বর্ণমালার ক্রস এবং রেখার দৈর্ঘ্য উভয়ই প্রতিফলিত করতে দুবার অ্যাবস ফাংশন ব্যবহার করি। এটি উভয় ক্ষেত্রেই একক চূড়ান্ত মানের কারণে কার্যের পক্ষে উপযুক্ত, যা প্রাক-অ্যাবস ভেরিয়েবলের শূন্য ক্রসিংয়ের সাথে মিলে যায়।

কোনও প্রোগ্রাম বা ফাংশন না হয়ে ভিবিএ ইমিডিয়েট উইন্ডোতে একটি সাধারণ কমান্ড হিসাবে, নিম্নলিখিতগুলির জন্য by২ বাইট প্রয়োজন:

For j=-25To 25:k=25-Abs(j):For i=-k To k:?Chr(65+k-Abs(i));:Next:?:Next

(@ গুইটারপিকারকে ধন্যবাদ সহ)


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

@ গুইটারপিকার; তাত্ক্ষণিক উইন্ডোতে চলমান একটি সম্পূর্ণ প্রোগ্রাম হিসাবে গণ্য হয়েছে কিনা তা নিশ্চিত নয়, তবে যদি তাই হয় তবে কার্যকরভাবে 8 বাইট কম হবে; এর সাথে শুরু না করে Function T:শেষ করুন :?T(যদিও এটি কেবল একবারে কাজ করবে, কারণ এর পরে আপনার "" টিতে টি পুনরায় সেট করতে হবে - তবে এই ত্রিভুজগুলির মধ্যে
কার

2
এমনকি আপনি টি প্রয়োজন হবে না যদি আপনি না ?যেমন তোমার সাথে যেতে ;
গিটারপিকার

আমি এই পদ্ধতিটি ব্যবহার করে এটি 71 এ শেভ করতে সক্ষম হয়েছি। ইঙ্গিত: আপনারও vbCrLf প্রয়োজন হবে না।
গিটারপিকারটি

1
হ্যাঁ, আমি একই পেয়েছি; মনে রাখবেন যে রিটার্ন দরকার।
জোফান

3

পাইথন, 73 71 বাইট

পুনরাবৃত্তির জন্য @xnor কে ধন্যবাদ

f=lambda x=66,s='A',t='':x/92*t or t+f(x+1,s+chr(x),s+s[-2::-1]+"\n")+t

ব্যাখ্যা

  • পরামিতি :
    • x বর্ণমালা পরবর্তী অক্ষরের ascii মান
    • s বর্ণমালার জন্য একটি সংগ্রহকারী
    • tত্রিভুজের একটি রেখা (যেমন s+ s backwards)
  • ফিরে :t বর্ণমালা সম্পন্ন হলে (যেমন আমরা কেন্দ্রে আছি)
  • অন্য : t+f(...)+tসাথে:
    • x বৃদ্ধি
    • s পরবর্তী চিঠি দিয়ে সংযুক্ত
    • tরিসেট s+ + s backwards+ +\n

হালনাগাদ

  • -2 [16-08-05] লিডিং \n(+1) এবং সংক্ষিপ্ত শর্তসাপেক্ষে (-3) সরান @xnor কে ধন্যবাদ

1
কি চতুর পদ্ধতি, tপরবর্তী লুপ মাধ্যমে ঠেলাঠেলি । যদিও একটি অতিরিক্ত নেতৃস্থানীয় নিউলাইন রয়েছে; x=66,s='A''এটি পরিত্রাণ পেতে। বেস কেসটি ছোট করা যেতে পারে x/92*t or
xnor

3

এইচটিএমএল + সিএসএস, 884 টি অক্ষর

(636363 টি অক্ষর এইচটিএমএল + 121 অক্ষর সিএসএস)

MonkeyZeus এর উত্তর সম্পর্কে স্রেফ Leaky নুন এর মন্তব্য প্রসারিত । (যদিও আমি মন্তব্যটি ভুলভাবে লিখতে পারি ...)

p{margin:0}p:before{content:"ABCDEFGH"}p:after{content:"HGFEDCBA"}a:before{content:"IJKLMNOP"}a:after{content:"PONMLKJI"}
<pre>A
ABA
ABCBA
ABCDCBA
ABCDEDCBA
ABCDEFEDCBA
ABCDEFGFEDCBA
ABCDEFGHGFEDCBA
<p>I</p><p>IJI</p><p>IJKJI</p><p>IJKLKJI</p><p>IJKLMLKJI</p><p>IJKLMNMLKJI</p><p>IJKLMNONMLKJI</p><p>IJKLMNOPONMLKJI</p><p><a>Q</p><p><a>QRQ</p><p><a>QRSRQ</p><p><a>QRSTSRQ</p><p><a>QRSTUTSRQ</p><p><a>QRSTUVUTSRQ</p><p><a>QRSTUVWVUTSRQ</p><p><a>QRSTUVWXWVUTSRQ</p><p><a>QRSTUVWXYXWVUTSRQ</p><p><a>QRSTUVWXYZYXWVUTSRQ</p><p><a>QRSTUVWXYXWVUTSRQ</p><p><a>QRSTUVWXWVUTSRQ</p><p><a>QRSTUVWVUTSRQ</p><p><a>QRSTUVUTSRQ</p><p><a>QRSTUTSRQ</p><p><a>QRSTSRQ</p><p><a>QRSRQ</p><p><a>QRQ</p><p><a>Q</a></p><p>IJKLMNOPONMLKJI</p><p>IJKLMNONMLKJI</p><p>IJKLMNMLKJI</p><p>IJKLMLKJI</p><p>IJKLKJI</p><p>IJKJI</p><p>IJI</p><p>I</p>ABCDEFGHGFEDCBA
ABCDEFGFEDCBA
ABCDEFEDCBA
ABCDEDCBA
ABCDCBA
ABCBA
ABA
A


3

ব্র্যাচল্যাগ , 37 29 বাইট

তাঁর সহায়তার জন্য ফ্যাটালাইজ করার জন্য ক্রেডিটগুলি।

4 বাইট ফ্যাটালাইজকে ধন্যবাদ, এবং আরও 4 বাইটের জন্য অনুপ্রেরণা।

@A:1&e:"a"yr:1&cw@Nw\
:Lc.r.!

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

পূর্বাভাস 0 (প্রধান ভবিষ্যদ্বাণী)

@A:1&e:"a"yr:1&cw@Nw\
@A:1&                  Apply predicate 1 to @A, which is
                       basically "abcdefghijklmnopqrstuvwxyz"
     e                 Choose one element from the result (choice point)
      :"a"yr               generate substring from element to "a"
            :1&            apply predicate 1
               c           concatenate
                w          write to STDOUT
                 @Nw       write "\n" to STDOUT
                    \  Backtrack to last choice point to choose
                       another element until there is no more
                       choice left, then halt.

ভবিষ্যদ্বাণী 1 (সহায়ক ভবিষ্যদ্বাণী)

এটি মূলত প্রদত্ত স্ট্রিং থেকে একটি প্যালিনড্রোম তৈরি করে।

:Lc.r.!
:Lc.     output is [input:L]
   .r.   output reversed is still output
      !  stop searching after the first output

আপনি একটি বাইট সংরক্ষণ করে ,Aপ্রিডিকেট 1 এ প্রতিস্থাপন করতে পারেন h
11:25

এছাড়াও, আপনি প্রতিস্থাপন দুটি বাইট সংরক্ষণ :1:2yt.সঙ্গে :2&.এবং একটি যোগ !এর বিধেয় 2. শেষে (কাটা পছন্দ পয়েন্ট)
Fatalize


3

আর, 127 125 বাইট

k=cat;L=LETTERS;for(i in 1:26)k(c(L[1:i],L[(i-1):0],"\n"));for(i in 1:26)k(c(L[0:(26-i)],L[ifelse((25-i)>=0,25-i,0):0],"\n"))

এই সমাধানটির সাথে পুরোপুরি সন্তুষ্ট নয়, বিশেষত দুটি forলুপ, তবে আরও ভাল কিছু নিয়ে আসতে পারেনি!
LETTERSবড় হাতের অক্ষর রয়েছে

অসমাপ্ত:

for(i in 1:26){
  cat(c(LETTERS[1:i],LETTERS[(i-1):0],"\n"))
               }

for(i in 1:26){
  cat(c(LETTERS[0:(26-i)],LETTERS[ifelse((25-i)>=0,25-i,0):0],"\n"))
               }

ifelseআনসিং করার জন্য একটি ছোট উপায় এবং এইভাবে if... else...কাজ করে:ifelse(condition,action if TRUE, action if FALSE)

অন্য একটি 125 বাইট সমাধান:

for(i in 1:26)(k=cat)(c((L=LETTERS)[1:i],L[(i-1):0],"\n"));for(i in 1:26)k(c(L[0:(26-i)],L[ifelse((25-i)>=0,25-i,0):0],"\n"))


3

জাভা 131 বাইট

স্ট্রিং (131 বাইট) ব্যবহার না করে

public static void main(String[] args) {
    for(int i = 0 ,k=1; i>-1; i+=k){
        for(int c= 65, d = 1; c>64;){
            d = d>-1 & c < 65+i?1:-1;
            System.out.print((char)c+((c+=d)<65?"\n":""));
        }
        k = k>-1 & i < 25?1:-1;
    }
}

Codegolfed

for(int i=0,k=1;i>-1;k=k>-1&i<25?1:-1,i+=k)for(int c=65,d=1;c>64;d=d>-1&c<65+i?1:-1,System.out.print((char)c+((c+=d)<65?"\n":"")));

স্ট্রিং সহ (173 বাইট)

String a="abcdefghijklmnopqrstuvwxyz";
for(int i = 1 ,k=1; i>0; i+=k==1?1:-1){
    System.out.println(a.substring(0,i)+new StringBuilder(a).reverse().substring(27-i));
    k = k>-1 & i < 26?1:-1;
}

Codegolfed

String a="abcdefghijklmnopqrstuvwxyz";for(int i=1,k=1;i>0;k=k>-1&i<26?1:-1,System.out.println(a.substring(0,i)+new StringBuilder(a).reverse().substring(27-i)),i+=k==1?1:-1);

মানটওয়ার্ক এবং কেভিন ক্রুইজসেনকে ধন্যবাদ


2
পিপিসিজিতে আপনাকে স্বাগতম। দয়া করে "আমি কীভাবে একটি কোড গল্ফের উত্তর দেব? কোড-গল্ফ ট্যাগের তথ্য পৃষ্ঠায় কোনও ইঙ্গিত? ”বিভাগ । এই ধরণের চ্যালেঞ্জের উত্তরগুলি কোডের আকার হ্রাস করার জন্য প্রচেষ্টা উপস্থাপন করবে বলে আশা করা হচ্ছে। এই আপনি সাহায্য পেতে পারেন জাভা golfing জন্য টিপস এবং <সমস্ত ভাষা> এ golfing জন্য টিপস
manatwork

1
সেখানে আপনি 4 টি টার্নারি অপারেটর ব্যবহার করেন এবং সমস্ত শর্তগুলি বন্ধনীতে আবদ্ধ। আপনি 8 টি অক্ষর সংরক্ষণ করতে সেগুলি সরাতে পারেন।
manatwork

1
d এবং k -1 এর নীচে যেতে পারবেন না, তাই না? তারপরে আপনি কে এর জন্য একই d!=-1সাথে প্রতিস্থাপন করতে পারেন d>-1। (বিটিডাব্লু, আপনি গল্ফ করা সংস্করণটি ঠিক করতে ভুলে গিয়েছেন))
manatwork

3 বাইট সংরক্ষণ করতে লুপ বডি থেকে ইনক্রিমেন্ট স্টেটমেন্ট বিভাগে বিবৃতি সরিয়ে নিয়েছে ..
সায়মেশ কে

1
হাই, আমি জানি বেশ কিছুদিন হয়েছে, তবে আপনি দুটি জিনিস গল্ফ করতে পারেন: i+=k==1?1:-1হতে পারে i+=kএবং System.out.print((char)c+(c+d<65?"\n":"")),c+=d==1?1:-1);হতেও পারে System.out.print((char)c+((c+=d)<65?"\n":"")));। সুতরাং সামগ্রিকভাবে এটি হয়ে যায় ( 131 বাইট ):for(int i=0,k=1;i>-1;k=k>-1&i<25?1:-1,i+=k)for(int c=65,d=1;c>64;d=d>-1&c<65+i?1:-1,System.out.print((char)c+((c+=d)<65?"\n":"")));
কেভিন ক্রুইজসেন


2

সেসোস , 27 বাইট

0000000: a85ab9 ac5daa f8b1c7 785f9b b961f7 665c1b 73ccfc  .Z..]....x_..a.f\.s..
0000015: c01ecb 987303                                     ....s.

এটি অনলাইন চেষ্টা করুন! চেকউত্পন্ন এসবিআইএন কোডটি দেখতে ডিবাগ

সেসোস সমাবেশ

উপরের বাইনারি ফাইলটি নিম্নলিখিত এসএএসএম কোডটি একত্রিত করে তৈরি করা হয়েছে।

add 65, rwd 1, add 10, rwd 2, add 25
jmp
    fwd 3
    jmp
        put, fwd 1
    jnz
    rwd 1
    jmp
        fwd 1, add 1, fwd 1, add 1, rwd 2, sub 1
    jnz
    fwd 2
    jmp
        rwd 2, add 1, fwd 2, sub 1
    jnz
    rwd 1, add 1, rwd 2
    jmp
        put, rwd 1
    jnz
    rwd 1, sub 1
jnz
fwd 3
jmp
    jmp
        put, fwd 1
    jnz
    rwd 1, get, rwd 1
    jmp
        put, rwd 1
    jnz
    fwd 2
; jnz (implicit)

2

/// , 208 বাইট

/'/\/\///+/BA
AB'-/DC+CD'&/FE-EF')/HG&GH'=/JI)IJ'|/LK=KL'7/NM|MN'1/PO7OP'q/RQ1QR'p/TSqST'6/VUpUV'[/XW6WX/A
A+C+C-E-E&G&G)I)I=K=K|M|M7O7O1Q1QqSqSpUpU6W6W[Y[YZY[Y[W6W6UpUpSqSqQ1Q1O7O7M|M|K=K=I)I)G&G&E-E-C+C+A
A

অবশ্যই বিজয়ী নয়, তবে এটি এখানে রয়েছে মার্টিন ইন্ডারকে ভবিষ্যদ্বাণী করা ...

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