আমার ডিভাইস ত্রুটিযুক্ত ... এর অপরিজ্ঞাত স্ট্রিং আচরণটি আপত্তিজনক করুন!

Question

সাহায্য করুন! আমার ডিভাইস ত্রুটিযুক্ত এবং আমি যখনই কোনও স্ট্রিং পুনরাবৃত্তি করার চেষ্টা করি তখন আমি একটি অগোছালো ফলাফল পাই। একই স্ট্রিং এন বার পুনরাবৃত্তি করার পরিবর্তে , এটি প্রতিটি অক্ষরের সাথে একটি এনএক্সএন স্কোয়ার পূরণ করে এবং স্কোয়ারগুলি স্ট্যাক করে।

উদাহরণস্বরূপ, স্ট্রিং "Test"এবং নম্বর দেওয়া 2পরিবর্তে "TestTest", আমি পেয়েছি:

TT
TT
ee
ee
ss
ss
tt
tt

---

কিছুক্ষণ দেখার পরে, আমি এটি পছন্দ করতে শুরু করেছি। আপনার আজকের কাজটি এই আজব আচরণটির পুনরুত্পাদন করা। একটি খালি খালি স্ট্রিং দেওয়া হয়েছে যা কেবল মুদ্রণযোগ্য ASCII এবং একটি ধনাত্মক পূর্ণসংখ্যার সমন্বয় করে স্ট্রিংকে আমার ত্রুটিযুক্ত ডিভাইসটি প্রদান করে output

• সমস্ত স্ট্যান্ডার্ড বিধি প্রযোজ্য।

• ইনপুট এবং আউটপুট কোনও যুক্তিসঙ্গত মাধ্যমে পরিচালনা করা যেতে পারে।

• এটি কোড-গল্ফ , তাই প্রতিটি ভাষার বাইটের মধ্যে সংক্ষিপ্ততম কোডটি জয়ী।

---

পরীক্ষার কেস

ইনপুট 
আউটপুট

----------

"পরীক্ষা", ২

টিটি
টিটি
Ee
Ee
এস এস
এস এস
TT
TT

----------

"ইউইউউ", ৩

UUU থেকে
UUU থেকে
UUU থেকে
UUU
UUU
UUU
UUU থেকে
UUU থেকে
UUU থেকে

----------

"এ", ৫

AAAAA
AAAAA
AAAAA
AAAAA
AAAAA

----------

আপনি এখানে একটি বৃহত্তর পরীক্ষার কেস খুঁজে পেতে পারেন । শুভকামনা এবং মজাদার গল্ফ!

Comments

বর্ধিত ASCII শিল্পের

— ডিজিটাল ট্রমা

নতুন লাইনের দ্বারা পৃথক স্ট্রিংয়ের পরিবর্তে একটি "লাইনের তালিকা" বৈধ?

— জিওকাভেল

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

— পাওলো ইবারম্যান

it fills an NxN square- সঠিক বক্তব্য নয়।

— ম্যাজিক অক্টোপাস উরন

Answer 1

জেলি , 4 বাইট

মিঃ এক্সকডারের জেলি আপত্তি দ্বারা অনুপ্রাণিত

x⁹×Y

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

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

কিভাবে?

নিষ্পাপ (আপত্তিজনক নয়) পাঁচটি বাইটার হ'ল:

x⁹x€Y - Main link: list of characters, s; number, n  e.g. "xyz", 2
 ⁹    - chain's right argument, n                         2
x     - times (repeat each element)                       ['x','x','y','y','z','z']
  x€  - times for €ach                                   [['x','x'],['x','x'],['y','y'],['y','y'],['z','z'],['z','z']]
    Y - join with newlines                                ['x','x','\n','x','x','\n','y','y','\n','y','y','\n','z','z','\n','z','z']
      - as a full program: implicit print
      -   note: this could be submitted as a dyadic link (AKA unnamed function)

জনাব Xcoder দ্বারা ব্যবহৃত অপব্যবহার (পাইথন এর operator.mulএকটি থেকে কাজ করতে পারে strএবং intপুনরাবৃত্তি str- এখানে একক অক্ষর - এবং পরমাণু যা ব্যবহার এটা ×, vectorises তার বাম যুক্তি wrt) এখানে ব্যবহার করা যেতে পারে খুব প্রতিস্থাপন x€সঙ্গে ×- পুরো প্রোগ্রাম ফলনশীল :

x⁹×Y - Main link: list of characters, s; number, n  e.g. "xyz", 2
 ⁹   - chain's right argument, n                         2
x    - times (repeat each element)                       ['x','x','y','y','z','z']
  ×  - multiply (vectorises)                             ["xx","xx","yy","yy","zz","zz"]
     -     (note, these "..." are actually strings, something not usually seen in Jelly) 
    Y - join with newlines                                ["xx",'\n',"xx",'\n',"yy",'\n',"yy",'\n',"zz",'\n',"zz"]
      - implicit print

Comments

অপব্যবহার সম্পর্কে চ্যালেঞ্জের উপর হে গালি

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

Answer 2

জেলি , 5 বাইট

আমাদের ঠিক এটি করতে বলা হচ্ছে ... আপত্তিজনক অপরিজ্ঞাত আচরণ! *

×+⁷×⁴

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

^{* অপরিজ্ঞাত আচরণের মাধ্যমে আমি ×পুনরায় স্ট্রিংয়ের জন্য ব্যবহার করার কথা বলছি । কখনও কখনও এটি স্বাভাবিক আচরণের চেয়ে ছোট হয়, তবে কেন নয়?}

Comments

অভিশাপ, আমাকে এক মিনিট মার!

— কেয়ার্ড কইনারিংহিংহ

@cairdcoinheringaahing আমার মনে হচ্ছে এটি গল্ফ করা যেতে পারে, যদিও: - /

— মিঃ এক্সকোডার

আমি আপনার অপব্যবহারটি চার পাঁচটি আলাদা বাইরকে গল্ফ

— জোনাথন অ্যালান

Answer 3

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

ফাংশনটি (!)লাইনের একটি তালিকা প্রদান করে।

n!s=map(<$[1..n])s<*[1..n]

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

Answer 4

বাশ + জিএনইউ শেড, 58

করার জন্য একটি অনুরূপ পদ্ধতির সাহায্যে এই উত্তর চিত্রিত করা কিভাবে বন্ধ করার জন্য একটি DUP হচ্ছে এই এই প্রশ্ন হল যে:

printf -vr %$1s
sed "s/./${r// /&}\n/g;s/\S*./${r// /&}/g"

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

Answer 5

হুশ , 5 4 বাইট

-1 বাইট @ জগারবকে ধন্যবাদ

SṀRṘ

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

Comments

ṠMRṘআপনি ইনপুটগুলি অদলবদল করলে কাজ করে।

— জাগারব

Answer 6

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

param($a,$b)$a|%{,("$_"*$b)*$b}

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

ব্যাখ্যা:

param($a,$b)                    # Takes input $a (char-array) and $b (integer)
            $a|%{             } # Loop through every character in $a
                   "$_"*$b      # Construct a string of $b length of that character
                 ,(       )*$b  # Repeat that $b times
                                # Implicit Write-Output inserts a newline between elements

Answer 7

05 এ বি 1 ই , 7 5 বাইট

স্কটনেট -2 বাইট ধন্যবাদ

εײF=

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

ε     # For each character:
 ×    #   Repeat this character N times
  ²F  #   For 0 .. N:
    = #     Print without popping 

Comments

-2, অন্তর্নিহিত ইনপুট সুবিধার সুযোগ গ্রহণ পপিং (ছাড়া মুদ্রণ দ্বারা বাইট =) এবং প্রতিস্থাপন vyসঙ্গে ε: এটি অনলাইন ব্যবহার করে দেখুন!

— স্কটনেট

Answer 8

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

lambda x,y:"".join(y*(r*y+"\n")for r in x)

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

Answer 9

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

t&Y"!

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

ব্যাখ্যা

t     % Implicitly input a number, n. Duplicate
&Y"   % Implicitly input a string. Three-input repelem function. Repeats
      % each entry in the first input (s) the specified numbers of times 
      % vertically (n) and horizontally (n). Gives a char matrix
!     % Transpose. Implicit display

Answer 10

সি ++, 125 123 বাইট

-২ বাইট শ্যাচলারকে ধন্যবাদ

#include<string>
using s=std::string;s u(s a,int b){s r;for(auto&c:a)for(int i=0;i<b*b;){if(!(i++%b))r+=10;r+=c;}return r;}

নিশ্চিত হয়ে নিন যে +=অপারেটরের নামক ওভারলোড charএই নির্দেশিকায় ডেটা টাইপ করেif(!(i++%b))r+=10

Comments

using s=std::string;typedef std::string s;দুটি বাইটের চেয়ে কম

— aschepler

Answer 11

জাপট , 7 বাইট

স্ট্রিংগুলির একটি অ্যারে আউটপুট করে।

VÆmpVÃy

এটি-R ব্যবহার করে দেখুন ( কেবলমাত্র দর্শনের উদ্দেশ্যে পতাকা)

---

ব্যাখ্যা

স্ট্রিং Uএবং পূর্ণসংখ্যার অন্তর্নিহিত ইনপুট V।

VÆ    Ã

থেকে পূর্ণসংখ্যার একটি অ্যারের জেনারেট করুন 0থেকে V-1এবং একটি ফাংশন মাধ্যমে একে পাস।

mpV

প্রতিটি চরিত্রের বারে মানচিত্র ( m) শেষ Uএবং পুনরাবৃত্তি করুন ।rV

y

স্থানান্তর এবং সুস্পষ্টভাবে ফলাফল অ্যারে আউটপুট।

Answer 12

আর , 59 বাইট

function(S,n)write(rep(strsplit(S,"")[[1]],e=n*n),"",n,,"")

Stdout লিখেছেন।

স্ট্রিংকে অক্ষরগুলিতে বিভক্ত করে প্রতিবার পুনরাবৃত্তি করে n^2এবং তারপরে প্রস্থ nএবং কোনও বিভাজক ছাড়াই মুদ্রণ করে ।

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

Answer 13

জে, ₁₅ 14 বাইট

[:,/]$"1 0~[,[

নিশ্চিত জন্য সাব-অনুকূল। অক্ষরের 2D অ্যারে প্রদান করে। লাগে nবাম যুক্তি এবং ডান যেমন স্ট্রিং হিসেবে।

মোবাইলে, তাই স্বাভাবিক সুযোগগুলি অনুপস্থিত।

ব্যাখ্যা

(পুরানো উত্তরের জন্য)

[:,/(2#[)$"1 0]

$"1 0 প্রতিটি অক্ষরকে পুনরায় আকার দিন

(2#[)একটি n* nম্যাট্রিক্স।

,/ ফলাফল একসাথে একসাথে ম্যাট্রিক যোগ দিন।

Comments

5 বাইট

— মাইল

মাইল উজ্জ্বল! আমি বলব যে এটি ব্যক্তিগতভাবে তার নিজস্ব উত্তর প্রাপ্য।

— কোলে

@ মাইল আপনার পোস্ট করুন :)

— ভেন

Answer 14

পার্ল 5 , 26 + 1 (-পি) = 27 বাইট

$"=<>;s|.|($&x$".$/)x$"|ge

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

Comments

এটি প্রতিটি অক্ষরকে অক্ষরের একটি অনুভূমিক সারি দ্বারা প্রতিস্থাপন করবে বলে মনে হচ্ছে, অক্ষরের বর্গক্ষেত্রের সাথে নয়।

— aschepler

আমার ধারণা আমি প্রথমে এটি সঠিকভাবে বুঝতে পারি নি। এটি অতিরিক্ত 5 বাইট সহ স্থির করুন।

— এক্সকালি

Answer 15

পাইথ, 9 বাইট

VEp*+*NQb

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

পাইথ, ₁₁ 10 বাইট

sm*Q+*QdbE

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

বা, 10 বাইট:

jsm*Q]*QdE

বা, 11 বাইট:

js*RQm]*dQE
jsm*vzm*dvz
sm*vz+*dvzb

Answer 16

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

ＦＳ«ＧTＩηι↓

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

ব্যাখ্যা

ＦＳ         For each character (i) in the next input as a string
   «
    Ｇ    ι  Polygon using i as fill
      T      Right, down, then left
       Ｉη   The second input (h) casted (to a number)
           ↓ Move down

Answer 17

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

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

এটি অনলাইনে চেষ্টা করে দেখুন (গতিশীল মেমরিটি চালু করার বিষয়ে নিশ্চিত হন বা এটি চলবে না)

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

এই কোডটির জন্য একটি আনবাউন্ডেড টেপ প্রয়োজন, এবং বাইট মোড়ানো আচরণের উপর নির্ভর করে।

Ungolfed:

,[>,]< Take Input
>-[>+<-----]>--- ASCII 0, to use in next step
[-<<->>]<< Convert ASCII number to raw number by subtracting ASCII 0
[->+<]> Move the number over one to separate it from the phrase
[
  [->+>+<<]>>[-<<+>>]< Copy the number
  [
    <<<[<]> Back to Letter
    . Print Letter
    [>]>>- Back to Counter
  ]
  ++++++++++.[-]< Print the newline
  <<[<]>[-]> Clear Letter
  [>]> Back to Counter
]

Answer 18

সোগলনলাইন 2940 ডিবি , 4 বাইট প্রতিশ্রুতিবদ্ধ

∙ι*I

এটি একটি নির্দিষ্ট কমিটের জন্য তৈরি করা হয়েছিল, যেমন আমি পরিবর্তিত হওয়ার আগে ∙একটি, যখন স্ট্রিংয়ের অ্যারে ব্যবহার করা হয়, প্রতিটি অক্ষরের x বার পুনরাবৃত্তি করে প্রতিটি আইটেম x বার পুনরাবৃত্তি করে। এখানে সেই সংস্করণ ছাড়া অনলাইন দোভাষী আছে, যা দেখা যায়, কাজ করে না।

কমিট, ডাউনলোড চেষ্টা করে দেখতে এই , খুলতে index.htmlপ্রোগ্রাম পেস্ট ফাইল, ∙ι*Iএবং ভালো কিছু ইনপুট লেখ

Test
2

ব্যাখ্যা:

∙ι*I
∙     get an array with 2nd input amount of items of the 1st input
 ι    pop one implicit input to cycle back to the number
  *   multiply horizontally each separate character
   I  rotate clockwise

Comments

যদি এটি কাজ না করে তবে লিঙ্কটি কেন?

— isaacg

@ আইস্যাক ভাল প্রশ্ন। প্রথমে আমি এটি পরিবর্তন করে লিখতে চেয়েছিলাম, তবে ভুলে

— গিয়েছি

Answer 19

জাভা 8, 152 128 118 100 বাইট

s->n->{for(char c:s)for(int j=0;j++<n;System.out.println("".valueOf(new char[n]).replace('\0',c)));}

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

Comments

100 বাইট:s->n->{for(char c:s)for(int j=0;j++<n;System.out.println("".valueOf(new char[n]).replace('\0',c)));}

— নেভায়ে

Answer 20

এপিএল (ডায়ালগ) , 8 বাইট

বাম আর্গুমেন্ট এবং পাঠ্যকে ডান আর্গুমেন্ট হিসাবে পুনরাবৃত্তি নেয়।

{⍺⌿⍺/⍪⍵}

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

{... } একটি নামহীন ল্যাম্বদা যেখানে ⍺বাম আর্গুমেন্ট এবং ⍵ডান আর্গুমেন্টকে উপস্থাপন করে

 ⍪⍵ পাঠ্যটিকে একটি-কলামের সারণিতে তৈরি করুন

 ⍺/⍺অনুভূমিকভাবে বার  প্রতিলিপি

 ⍺⌿⍺উল্লম্বভাবে বার  প্রতিলিপি

Answer 21

জাপট , 7 বাইট

mpV² òV

স্ট্রিংগুলির একটি অ্যারে প্রদান করে।

এটি অনলাইন চেষ্টা করুন! সঙ্গে -Rপতাকা নতুন লাইন দিয়ে অ্যারের যোগদানের জন্য।

ব্যাখ্যা

mpV² òV     Implicit input of U=string, V=number
m           Map each char in the input string to...
 pV²        Itself repeated V² times
     òV     Cut the resulting string into partitions of length V

Answer 22

ডি, 86 বাইট

S u(S,I)(S a,I b){S r;foreach(c;a)for(I i;i<b*b;){if(!(i++%b))r~='\n';r~=c;}return r;}

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

স্ট্রিংটিকে বাম আর্গুমেন্ট হিসাবে এবং পূর্ণসংখ্যকে ডান আর্গুমেন্ট হিসাবে গ্রহণ করে। এটি হ্যাটসুপয়েন্টারকুনের সি ++ উত্তর ডি এর একটি বন্দর is

Answer 23

সি (জিসিসি) , 83 79 বাইট

i,j;f(p,n)char*p,n;{for(;*p;p++)for(i=n;i--;puts(""))for(j=n;j--;putchar(*p));}

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

Answer 24

সিজেম, 11 বাইট

{__*@e*/N*}

স্ট্রিং গ্রহণ করে ফাংশনটি int এর পরে অনুসরণ করে।

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

Answer 25

কোটলিন 1.1 - 99 বাইট

fun s(s:String,c:Int)=s.flatMap{p->List(c,{p})}.joinToString("\n"){p->List(c,{p}).joinToString("")}

স্ট্রিং হিসাবে পুরো আউটপুট ফেরত।

1.1 সমর্থিত না হওয়ায় ট্রিআইটঅনলাইন ব্যবহার করতে পারবেন না

পরীক্ষা

fun s(s:String,c:Int)=s.flatMap{p->List(c,{p})}.joinToString("\n"){p->List(c,{p}).joinToString("")}

fun main(args: Array<String>) {
    println(s("Hello World", 5))
}

স্ট্রিংগুলির একটি তালিকা আউটপুট হিসাবে গ্রহণযোগ্য হলে তা 84 হবে 84

fun s(s:String,c:Int)=s.flatMap{p->List(c,{p})}.map{p->List(c,{p}).joinToString("")}

Answer 26

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

for($i=0;$i<strlen($s=$argv[1]);$i++)for($j=0;$j<$r=$argv[2];$j++)echo str_repeat($s[$i],$r)."
";

Answer 27

গণিত, 49 বাইট

(z=#2;Grid[Column/@Table[#,z,z]&/@Characters@#])&

ইনপুট

[ "টেস্ট", 4]

Answer 28

পাইথ , 12 বাইট

ছোট্ট মনের মানুষ, তবে আমি এখনও সেখানে পৌঁছতে পারি নি।

VQp*+*Nszbsz

ব্যাখ্যা:

VQ          For every letter in the first input...
  p         Print without newline...
   *+*Nszsz (The index * int(second input) + newline) * int(the second input)

পরীক্ষা স্যুট

Answer 29

ক্লোজার , 82 75 বাইট

#(dotimes[x(count %1)](dotimes[y %2](prn(apply str(repeat %2(get %1 x))))))

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

uncompressed:

#(dotimes [x (count %1)]
  (dotimes [y %2]
    (prn
      (apply str
        (repeat %2 (get %1 x))))))

সম্পাদনা: stdlib পুনরাবৃত্তি ফাংশন সঙ্গে একটি লুপ জন্য প্রতিস্থাপন করে শেষ কয়েক অক্ষর শেভ।

Answer 30

সি # (.নেট কোর) , 68 + 18 বাইট

a=>n=>new int[a.Length*n].Select((x,i)=>Enumerable.Repeat(a[i/n],n))

বাইট গণনায় অন্তর্ভুক্ত:

using System.Linq;

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

আউটপুট হ'ল অক্ষরের সংকলন (প্রতিটি লাইনের জন্য একটি সংগ্রহ)।

ব্যাখ্যা:

a => n =>                                // Take a string and a number
    new int[a.Length * n]                // Create new collection, 'n' times larger than 'a'
    .Select((x, i) =>                    // Replace every member with
        Enumerable.Repeat(a[i / n], n)   //     a collection of repeated character from 'a', based on index
    )