একটি বর্ণমালা তরঙ্গ মুদ্রণ করুন

Question

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

ABABABABABABABABABABABABAB
BCBCBCBCBCBCBCBCBCBCBCBCBC
CDCDCDCDCDCDCDCDCDCDCDCDCD
DEDEDEDEDEDEDEDEDEDEDEDEDE
EFEFEFEFEFEFEFEFEFEFEFEFEF
FGFGFGFGFGFGFGFGFGFGFGFGFG
GHGHGHGHGHGHGHGHGHGHGHGHGH
HIHIHIHIHIHIHIHIHIHIHIHIHI
IJIJIJIJIJIJIJIJIJIJIJIJIJ
JKJKJKJKJKJKJKJKJKJKJKJKJK
KLKLKLKLKLKLKLKLKLKLKLKLKL
LMLMLMLMLMLMLMLMLMLMLMLMLM
MNMNMNMNMNMNMNMNMNMNMNMNMN
NONONONONONONONONONONONONO
OPOPOPOPOPOPOPOPOPOPOPOPOP
PQPQPQPQPQPQPQPQPQPQPQPQPQ
QRQRQRQRQRQRQRQRQRQRQRQRQR
RSRSRSRSRSRSRSRSRSRSRSRSRS
STSTSTSTSTSTSTSTSTSTSTSTST
TUTUTUTUTUTUTUTUTUTUTUTUTU
UVUVUVUVUVUVUVUVUVUVUVUVUV
VWVWVWVWVWVWVWVWVWVWVWVWVW
WXWXWXWXWXWXWXWXWXWXWXWXWX
XYXYXYXYXYXYXYXYXYXYXYXYXY
YZYZYZYZYZYZYZYZYZYZYZYZYZ
ZAZAZAZAZAZAZAZAZAZAZAZAZA

চশমা

• আপনি সমস্ত বড় হাতের বদলে সমস্ত ছোট হাতের মুদ্রণ করতে পারেন। তবে, আউটপুট জুড়ে ক্ষেত্রে অবশ্যই সামঞ্জস্য হতে হবে।
• আপনি একটি অতিরিক্ত ট্রেলিং লাইনফিড মুদ্রণ করতে পারেন।

স্কোরিং

যেহেতু এটি একটি বর্ণমালা তরঙ্গ যে অল্প পরিমাণে ওঠানামা করে, তাই আপনার কোডও বাইট-কাউন্টের ক্ষেত্রে ছোট হওয়া উচিত। আসলে, বাইট-কাউন্টের দিক থেকে সবচেয়ে ছোট কোড জিততে পারে।

Comments

সিরিয়াসলি, অন্য বর্ণমালা চ্যালেঞ্জ?

— নাথান মেরিল

@ নাথানমিরিল যতটা সংখ্যক, তারা ভাবা যায় না বলে আমি মনে করি না। (আমি আপনাকে নীচু করে বলছি না, আমি কেবল বলছি))

— কনর ও'ব্রায়ান

যতক্ষণ নিদর্শনগুলি পর্যাপ্ত পরিমাণে পৃথক থাকে ততক্ষণ আমি বর্ণমালা, দশমিক সংখ্যা, তারকাচিহ্ন এবং আন্ডারস্কোর ইত্যাদি ব্যবহার করি তা বিবেচনা করে মনে করি না

— ডেনিস

@ ডেনিস বর্ণিত অক্ষর নির্বিশেষে, এর ধরণের "প্যাটার্ন" চ্যালেঞ্জগুলি অতিরিক্ত ব্যবহার করা হচ্ছে, আইএমও। আমি এর অফটোপিক মনে করি না, তবে আমি কিছু টাটকা বায়ু উপভোগ করব।

— নাথান মেরিল

এটা পরিষ্কার যে বর্ণমালার চ্যালেঞ্জের আর চাহিদা নেই - প্রথম 15 ঘন্টার মধ্যে কেবল 39 জন উত্তর দিয়েছিল ...

— ট্রাইকোপলাক্স

Answer 1

সি, 60 বাইট

main(i){for(;i<703;)putchar(i++%27?65+(i/27+i%27%2)%26:10);}

Comments

এটি প্রতিভা।

— ফাঁস নুন

কোডটি গল্ফ চ্যালেঞ্জে সি দেখে ভাল লাগল।

— মিশেল জনসন

@ মিশেল জনসন " সি দেখুন ", আইসি আপনি সেখানে কী করেছেন। ;) আর আমি তার সাথে একমত লিকি নূনের । কখনও কখনও আমি ভাবছি কীভাবে লোকেরা এই কয়েকটি বুদ্ধিমান উত্তর নিয়ে আসে।

— কেভিন ক্রুইজসেন 12

@ কেভিন ক্রুইজসেন এটি অনিচ্ছাকৃত লোল।

— মিশেল জনসন

Answer 2

ব্রেইনফাক, 104 বাইট

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

Comments

কার্যত হ্যালো ওয়ার্ল্ডের মতো একই আকার। চিত্তাকর্ষক!

— ফিরফক্স

@ ফাইরফক্স প্রকৃতপক্ষে ...

— Sp3000

Answer 3

উত্তল, 10 বাইট

U_(+]D*zN*

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

U               Predefined Variable: "ABCDEFGHIJKLMNOPQRSTUVWXYZ"
 _(+            Push a copy with the 'A at the end.
    ]           Add both strings to an array.
     D*         Repeat array 13 times. D defaults to 13.
       z        Transpose.
        N*      Join by newlines. N defaults to "\n"

Answer 4

পাইথ, 11 10 বাইট

jC*13.<BG1

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

        G   the alphabet
       B    bifurcate over
     .<  1  left shift by 1
  *13       repeat 13 times
 C          transpose
j           join on newlines

Answer 5

ভিম, 85 83 বাইট

:h<_<cr><cr><cr>YZZP:s/./\0\r/g<cr><c+v>ggy25Pqqlxj:let @a='xkPjj'<cr>25@akia<esc>25klq11@qh<ctrl+v>25jylpl<c+v>25jdGdd

আমি জানি এটি আরও গল্ফ করা যেতে পারে তবে আমার মাথা ব্যাথা করছে তাই আপাতত থামতে হবে।

<cr>প্রবেশ কী, <c+v>সিটিআরএল + ভি, এবং <esc>হ'ল পালাবার কী। এগুলি সমস্ত একটি বাইট হিসাবে গণনা করা হয়েছিল।

আমি এর একটি জিআইএফ রেকর্ড করেছি, তবে এটি খারাপ হয়ে গেছে। ভিডিওটি যদিও ঠিক আছে: http://recordit.co/ldLKvho9Gi

Answer 6

রুবি, 42 39 38 37 বাইট

-3 বাইটস @ ইউজার ৮১65৫৫
-১ বাইটকে ধন্যবাদ @ মান্যাটওয়ার্ক -১ বাইট @ নোটহ্যাটচারলেসকে
ধন্যবাদ

?A.upto(?Z){|a|puts (a+a.next[0])*13}

এটি repl.it এ দেখুন: https://repl.it/CmOJ

Answer 7

চেদার, 48 বাইট

print(65|>90).map(l->@"[l,l>89?65:l+1]*13).vfuse

চেড্ডার স্ট্রিং সহ ভাল: ডি

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

ব্যাখ্যা

print
  (65|>90)            // Range from 65 (A) to 90 (Z)
  .map(l->            // Map through range
    @"                // Convert following array of char codes to string
      [l,             // The character 
       l>89?65:l+1]   // See below for explanation
      *13             // Repeat 13 times
  ).vfuse             // Vertically fuse

কি করে l>89?65:l+1? ভাল 89জন্য কোড কোড Y। মূলত, l>89চিঠিটি কিনা তা যাচাই করা হচ্ছে Z, এর অর্থ আমাদের ফিরে আসা উচিত A। যদি l>89মিথ্যা হয়। আমি ফিরে আসব l+1, পরের চর

Comments

আমি ভেবেছিলাম আপনি @"তাদের মধ্যে inোকাতে পারেন ।

— ফাঁস নুন

এটি কি কোনও ফাংশন রিটার্ন ব্যবহার করে না?

— কনর ও'ব্রায়ান

@ কনরও ব্রায়েন হ্যাঁ?

— ডাউনগোট

কোডগলফ.স্ট্যাকেক্সেঞ্জাওয়েজ

— ও'ব্রায়েন

@ কনরও ব্রায়ান ওহ, চ্যালেঞ্জের দৃষ্টিতে দেখেন নি। ঠিক করবে

— ডাউনগোট

Answer 8

জেলি , 10 বাইট

26ḶḂØAṙZj⁷

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

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

26ḶḂØAṙZj⁷  Main link. No arguments.

26Ḷ         Yield [0, ..., 25].
   Ḃ        Bit; compute the parity of each intger.
    ØAṙ     Rotate the alphabet by these amounts.
       Z    Zip; transpose rows and columns.
        j⁷  Join, separating by linefeeds.

Comments

তখন কি আর Yউপস্থিত ছিল না ? এছাড়াও 100k প্রতিনিধি জন্য অভিনন্দন !!

— এরিক আউটগল্ফার

ধন্যবাদ! আমি চেক করেছিলাম এবং দুঃখের সাথে Yচ্যালেঞ্জ পোস্ট হওয়ার দুই দিন পরে যুক্ত হয়েছিল।

— ডেনিস

কারণ আপনি এটি আরও নিচে গল্ফ করতে পারে 26ḶḂØAṙZY। তবে, যেমনটি এখনই রয়েছে, এটি এখনও ভাল।

— এরিক আউটগলফার

Answer 9

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

mapM putStrLn[[0..12]>>[a,b]|a:b:_<-scanr(:)"A"['A'..'Z']]

"এ" দিয়ে শুরু করা ডান থেকে scanr(:)বর্ণগুলি থেকে তালিকা তৈরি করে ['A'..'Z']। (-> ["ABCDE...A", "BCDEF..A", ..., "XYZA", "YZA", "ZA", "A"])। (a:b:_)প্রতিটি সাবলিস্টের প্রথম দুটি অক্ষরের সাথে মিলিত হয় (কমপক্ষে দুটি অক্ষর সহ) এবং এটির 13 টি অনুলিপি করে।

Comments

নিয়মিতভাবে অন্যান্য ভাষার দ্বারা ব্যবহৃত কিছু চিট বিবেচনা করে আমি প্রকৃত মুদ্রণটিকে অন্তর্ভুক্ত না করা কেবলমাত্র ন্যায়সঙ্গত মনে করি। এই ক্ষেত্রে আপনি এটিকে "(++" \ n ") = <<" দিয়ে প্রতিস্থাপন করতে পারেন এবং 2 বাইট সংরক্ষণ করতে পারেন। সম্ভবত আরও।

— মারলিন

@ মারলিন: না, আমি তা মনে করি না। গল্ফিংয়ের ভাষাগুলি অন্তর্ভুক্ত মুদ্রণের সাথে ডিজাইন করা হয়েছে এবং বেশিরভাগ উত্তরগুলিতে কিছু প্রিন্টিং কমান্ড থাকে। বিটিডব্লিউ, unlinesএর চেয়েও খাটো (++"\n")=<<।

— নিমি

Answer 10

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

টিমমিডির রিমিক্স:

65..89|%{-join[char[]]($_,++$_)*13};"ZA"*13

ছিল, 49 বাইট:

0..25|%{(""+[char]($_+++65)+[char]($_%26+65))*13}

Answer 11

পাইথন 2, 70 68 54 বাইট

তালিকা ভিত্তিক সমাধান:

L=map(chr,range(65,91))
for i in range(-26,0):print(L[i]+L[i+1])*13

তবে কেন একটি তালিকা তৈরি করবেন? ধন্যবাদ লিকিউন:

for i in range(26):print(chr(i+65)+chr(-~i%26+65))*13

Answer 12

আর, 72 67 60 56 বাইট

write(matrix(LETTERS[c(1:26,2:26,1)],26,26,T),"",26,,"")

জিউসেপ্পকে ধন্যবাদঅতিরিক্ত 4 বাইট জন্য !

rep60 বাইটে পুরাতন ভিত্তিক সমাধান:

for(i in 1:26)cat(rep(LETTERS[c(i,i%%26+1)],13),"\n",sep="")

একটি অনলাইন দোভাষীর এখানে দেখুন । অতিরিক্ত 7 বাইট বন্ধের জন্য @ ব্যবহারকারী5957401 কে ধন্যবাদ !

পুরানো ম্যাট্রিক্স-ভিত্তিক সমাধানটি 72 বাইটে:

for(i in 1:26)cat(matrix(LETTERS[c(1:26,2:26,1)],26,26)[i,],"\n",sep="")

একটি অনলাইন দোভাষীর এখানে দেখুন ।

Comments

আপনি যদি অনিশ্চিত পরিবর্তন করেন i in 1:26এবং তারপরে আপনার কাছে চিঠি নির্বাচনটি LETTERS[c(i,i%%26+1)]or বা

— by

@ user5957401 আরেফ আমি এত জেদ করেছিলাম (i+1)%%26যে আমার বিপরীত কাজটি ঘটেনি! ধন্যবাদ!

— প্ল্যানাপাস

56 টি বাইট আবার ম্যাট্রিক ব্যবহার করে :)

— জিউসেপ

Answer 13

এমএটিএল , 13 বাইট

1Y2tn:!to~!+)

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

1Y2    % Predefined string literal: 'AB···Z'
tn:    % Duplicate, number of elements, range: gives [1, 2, ···, 26]
!      % Transpose into a column vector
to~!   % Duplicate and transform into [0, 1, 0, 1, ···, 1] using modulo 2
+      % Addition with broadcast. Gives 2D numeric array
)      % Index (modularly) into string. Implicitly display.

Answer 14

জেলিফিশ , 26 বাইট

P
+'A
~
| S
+$ r2
 ,'
r'

শেষ দুটি লাইনে অনুশীলনযোগ্য অক্ষরগুলি নোট করুন। এটি অনলাইন চেষ্টা করুন!

ব্যাখ্যা

এটি মূলত একটি গাণিতিক ম্যানিপুলেশন পদ্ধতির: 0-1 প্যাটার্নটি পরিবর্তিত করে একটি 26 × 26 গ্রিড তৈরি করুন, সারিটির প্রতিটি উপাদানকে প্রতিটি সারি সূচক যুক্ত করুন, মোড 26 হ্রাস করুন এবং এর ASCII মান যুক্ত করুন A। জেলিফিশের অক্ষরগুলি একটি বিশেষ পতাকা সহ কেবলমাত্র সংখ্যা এবং সমস্ত পাটিগণিত প্রত্যাশায় তাদের উপর কাজ করে।

নীচে থেকে উপরে:

• 'গুলি চরিত্র লিটারেল হয়; তারা ASCII কোড 26 সহ অ-প্রিন্টেবলগুলি অনুসরণ করে এবং এই অক্ষরগুলির জন্য দাঁড়ায়।
• নিম্নের rগুণমান 0 থেকে 25 অবধি হয়।
• ,দুই অমুদ্রণীয় অক্ষর থেকে একজোড়া ফর্ম।
• উচ্চতর rআর্গুমেন্ট দেওয়া হয় 2, এবং পরিসীমা গঠন করে [0 1]।
• দ্য $ ব্যাপ্তিটি গ্রহণ করে এবং এর অন্যান্য যুক্তির দ্বারা প্রদত্ত আকারে এটি পুনরায় আকার দেয় যা অপ্রিন্টেবলের জুটি। এটি বিকল্প সারিগুলির 26 × 26 ম্যাট্রিক্স দেয়0 1 0 1 0 1 ...
• নিম্ন +এই ম্যাট্রিক্স থেকে গৃহস্থালির কাজ পরিসীমা 0-25 যোগ করা হয়েছে। সংযোজনগুলি সারিগুলিতে বিতরণ করে, তাই সারি i দ্বারা i বৃদ্ধি করা হয় । এটি একটি চর ম্যাট্রিক্সেও রূপান্তরিত হয়েছে, যেহেতু দক্ষিণ যুক্তিটি চরগুলি নিয়ে গঠিত।
• ~|ফ্লিপ আর্গুমেন্ট সহ মডুলাস হল: দক্ষিণ যুক্তি (উপরে গৃহস্থালির কাজ ম্যাট্রিক্স) (পূর্ব যুক্তি মডিউল কমে যাবে S, পালাক্রমে যুক্তি-সচেষ্ট প্রক্রিয়া দক্ষিণ তাই এই অমুদ্রণীয় আক্ষরিক 26)।
• উচ্চতর ফলাফল ম্যাট্রিক্সের প্রতিটি স্থানাঙ্কে +আক্ষরিক যোগ Aকরে।
• Pকপি করে প্রিন্ট ম্যাট্রিক্স বিন্যাস, যে, উদ্ধৃতি চিহ্ন বিনা নিজস্ব লাইনে প্রতিটি সারির স্থাপিত।

Comments

আমি গল্ফ চেষ্টা করতে চেয়েছিলাম কিন্তু তারপরে আমি কোডটি লিখেছি তার নামটি দেখেছি।

— ফাঁস নুন

আপনি এখনও চেষ্টা করতে পারেন! যদিও এই চ্যালেঞ্জের জন্য 26 বাইট উপযুক্ত।

— জগারব

Answer 15

Vim, 31 বাইট

:h<_↵↵↵YZZPJra0qqy2l13Plr↵25@qD

কোথায় ↵ফিরে চাবিকাঠি।

Answer 16

পার্ল, 26 বাইট

@ ডোম হেস্টিংস থেকে সমাধান । (আমার থেকে 12 বাইট সংক্ষিপ্ত!)
-১ টোন হসপেলের কাছে বাইট ধন্যবাদ

say+($_++,chop)x13for A..Z

-M5.010বা সাথে চালান -E:

perl -E 'say+($_++,chop)x13for A..Z'

Comments

এটি এটিকে 33 এ নামানোর ব্যবস্থা করা হয়েছে say+($_++,$_--=~/^./g)x13for A..Z, তবে আমি নিশ্চিত যে এর থেকে আরও ছোট একটি উপায় পাওয়ার উপায় আছে: say+($_++,$_--)x13for A..Z...

— ডম হেস্টিংস

আমি কেন --সেখানে there ুকেছি তা নিশ্চিত নয় , এটির দরকার নেই! O_o। 27:say+($_++,/^./g)x13for A..Z

— ডম হেস্টিংস

@ ডোমহাস্টিংস সুন্দরভাবে সম্পন্ন হয়েছে! আমি say+($_,$_++)x13for A..Zপ্রথমে চেষ্টা করেছিলাম যা কার্যকর হয়নি, তবে মনে হয় আমার আরও এগিয়ে যেতে হবে সেই দিকে!

— দাদা

say+($_++,chop)x13for A..Zআরও একটি বাইট সংরক্ষণ করুন

— টন হসপেল

@ টনহসপেল দুর্দান্ত, এর জন্য ধন্যবাদ।

— দাদা

Answer 17

টি-এসকিউএল 133 বাইট (এর দ্বারা গল্ফড: @ t-clausen.dk)

SELECT REPLICATE(Char(number+65)+IIF(number=25,'A',Char(number+66)),13)FROM spt_values WHERE number<26and'P'=TYPE

টি-এসকিউএল, 151 বাইট

সংখ্যার ক্রম তৈরি করতে সিটিই ব্যবহার করে

;WITH n(a,v) AS(SELECT CHAR(65)+CHAR(66), 66 UNION ALL SELECT CHAR(v)+CHAR(v+1), v+1 FROM n WHERE v < 91)SELECT REPLICATE(REPLACE(a,'[','A'),13) FROM n

টি-এসকিউএল, 155 বাইট

SELECT REPLICATE(Char(number+65)+ CASE WHEN number=25 THEN 'A' ELSE Char(number+66) END, 13) FROM master.dbo.spt_values  WHERE name IS NULL AND number < 26

Comments

আমি আপনার উত্তর 113 টি অক্ষরে গল্ফ করেছি । আমি টিএসকিউএল

— t-clausen.dk

@ t-Clausen.dk এটি দুর্দান্ত। আপনার উত্তর পোস্ট করুন। আমি আমার মুছতে হবে।

— অনুজ ত্রিপাঠি

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

— t-clausen.dk

Answer 18

জুলিয়া, 46 বাইট

[println("$c$(c+1-26(c>89))"^13)for c='A':'Z']

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

Answer 19

পাইথ, 10 বাইট

jCm.<G~!ZG

প্রদর্শন

ব্যাখ্যা:

jCm.<G~!ZG
  m      G    Map over G, predefined to the lowercase alphabet.
              This will give 26 columns.
   .<G        Left shift (cyclically) G by
        Z     Z elements. Z is initialized to 0.
      ~!      After using its value, logical not Z. (0 -> 1, 1 -> 0)
 C            Transpose
j             Join on newlines

Comments

ভাল লাগল, কামনা তুমি পাইথ সম্পর্কে যতটা করতাম তা জানতাম

— স্টান স্ট্রাম

Answer 20

ব্রেইনফাক, 88 86 বাইট

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

8-বিট কোষ এবং একটি টেপ বাম দিকে আবদ্ধ না করে একটি দোভাষী প্রয়োজন। এটি অনলাইন চেষ্টা করুন!

Answer 21

লুয়া, 80 65 বাইট।

s = string c = s.char for i=1,26 do print(s.rep(c(64+i)..c((65+(i%26))),13)) end

লিকি নুনের সহায়তায়

c=("").char for i=1,26 do print((c(64+i)..c(65+i%26)):rep(13))end

লুয়া হ'ল স্ট্রিং এবং এ জাতীয় পরিচালনা করার ক্ষেত্রে একটি খুব অদক্ষ ভাষা, তাই এটি এটিকে সংকুচিত করতে পারাই সেরা।

Comments

পিপিসিজিতে আপনাকে স্বাগতম! প্রথম প্রথম পোস্ট! আপনি কিছু অপ্রয়োজনীয় সাদা স্থান সরিয়ে s=string c=s.char for i=1,26 do print(s.rep(c(64+i)..c((65+(i%26))),13))end

— ফেললে

for i=1,26 do print(((64+i):char()..(65+(i%26)):char()):rep(13))end(পরীক্ষিত নয়)

— লিকি নুন

কারণ string.rep(x,13)মূলতx:rep(13)

— লিকি নুন

রাইট! আমি স্ট্রিং লাইব্রেরিতে স্ট্রিং মেটাটেবল ডিফল্ট সূচকগুলি ভুলে গিয়েছিলাম।

— এটাকো

যদিও ভাল, 65+ (i% 26) এর মতো সংখ্যা স্ট্রিং হিসাবে গণনা করা হয় না যদি না। আমি এটিকে জাহান্নামের জন্য কাজ করার উপায় নিয়ে কাজ করব।

— এটাকো

Answer 22

ব্র্যাচল্যাগ , 30 24 20 বাইট

@Ab: "একটি" C: @Arz: {: 12jc। @Nc} একটি: ওয়া
 আ: @ আঃ: "এ" সি: @ আরজ: 12 জেসিডব্লু @ এনডাব্লু \
@A $ (: @ Arze: 12jcw @ Nw \

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

Answer 23

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

ADÀ)øvyJ5Ø×,

ব্যাখ্যা

AD            # push 2 copies of the alphabet
  À           # rotate the 2nd one left by 1
   )ø         # add to list and zip
     v        # for each
      yJ      # join the pair
        5Ø×   # repeat it 13 times
           ,  # print with newline

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

Comments

আমি জানি এটি একটি পুরানো প্রশ্ন তবে আমি কেবল নিজেকে সাহায্য করতে পারি না। ADÀ)ø13×»9 বাইট সঙ্গে কাজ করে।

— দাতবোই

@ ডাটবোই: এটি এখন সত্যিই কাজ করে, তবে দুর্ভাগ্যক্রমে এই প্রশ্নটি পোস্ট করার সময় এটি কার্যকর হয়নি :(

— এমিগানা

Answer 24

গণিত, 82 75 67 66 বাইট

Print@FromCharacterCode@PadLeft[{},26,{i-1,i}~Mod~26+65]~Do~{i,26}

প্রযুক্তিগতভাবে খাটো, যদিও এটি বড় হাতের পরিবর্তে ছোট হাতের মুদ্রণ করে:

গণিত, 64 বাইট

Print[""<>FromLetterNumber@Table[{i-1,i}~Mod~26+1,13]]~Do~{i,26}

Comments

দুর্দান্ত কৌশল ব্যবহার করে PadLeft।

— ফাঁস নুন

Answer 25

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

DECLARE @o varchar(702)='',@ int=1WHILE @<702SELECT @o+=CHAR(IIF(@%27=0,10,65+(@/27+1-@%27%2)%26)),@+=1PRINT @o

বেহালা

Comments

এমনকি আরও 99 বাইটে গল্ফড

— কোডগলফ.স্ট্যাকেক্সেঞ্জিং.

Answer 26

ম্যাটল্যাব, 47 38 বাইট

a=(65:90)';char(repmat([a a([2:end 1])],1,13))

char(repmat([65:90;[66:90 65]]',1,13))

প্রথমে ASCII এ বর্ণমালার একটি কলাম অ্যারে তৈরি করে, তার ডানদিকে একটি কলাম হিসাবে স্থানান্তরিত অনুলিপি যুক্ত করে, ফলাফলটি 26 * 2 অ্যারেটি 13 বার কলাম অনুসারে প্রতিলিপি করে একটি অক্ষর অ্যারেতে কাস্ট করে এবং ডিফল্টরূপে মুদ্রণ করে।

দ্বিতীয় বর্ণমালা এবং স্থানান্তরিত বর্ণমালার 2 * 26 অ্যারে তৈরি করে, এটি স্থানান্তরিত করে তারপরে উপরের মত চলতে থাকে।

Comments

আপনি এর [... '']পরিবর্তে ব্যবহার করে একটি বাইট সংরক্ষণ করতে পারেন char(...)।

— pajonk

এবং আপনি কেবল [65:90;66:90 65]দুটি বাইট সংরক্ষণের ব্যবহার করতে পারেন ।

— pajonk

Answer 27

জে, 20 19 বাইট

মাইল 1 বাইট ধন্যবাদ।

u:65+26|(+/2&|)i.26

অনলাইন দোভাষী

এটি আসলে সেই প্রোগ্রামটি যা আমি চ্যালেঞ্জটিতে পাঠ্য উত্পন্ন করতে ব্যবহার করি।

Comments

আপনি অপসারণ করতে পারেন@

— মাইল

Answer 28

নিওস্ক্রিপ্ট , 59 বাইট

a=('A:[]:'Z)+'Aeach n=0:[]:25console:log((a[n]+a[n+1])*13);

Answer 29

পিএইচপি, 102 বাইট

<?php $a='ABCDEFGHIJKLMNOPQRSTUVWXYZA';$i=-1;while($i++<25){echo str_repeat(substr($a,$i,2),13)."\n";}

Comments

আপনি বর্ণমালা স্ট্রিং থেকে উদ্ধৃতিগুলি সরাতে পারেন। Actual n এর পরিবর্তে প্রকৃত প্রবেশ দিয়ে with n প্রতিস্থাপন করুন। @ আইসর্ট ব্যবহারকারী নাম থেকে এই ধারণাটি চুরি করেছেন। সুতরাং আমি যা বলতে চাইছি তার উত্তরটি পরীক্ষা করে দেখুন। সম্পাদনা: <শর্ট-ট্যাগ স্বরলিপিটিও ব্যবহার করুন? <?. এর পরে আপনারও কোনও জায়গার দরকার নেই। সুতরাং <?$a='ABC'এছাড়াও কাজ করে।

— জেরোইন

Answer 30

রুবি, 41 বাইট

26.times{|i|puts [*?A..?Z,?A][i,2]*''*13}