আপনার কোডের প্রথম এন অক্ষরগুলি মুদ্রণ করুন


21

আপনার এমন একটি প্রোগ্রাম বা ফাংশন লিখতে হবে যা Nইনপুট হিসাবে ইতিবাচক পূর্ণসংখ্যার গ্রহণ করে এবং Nআপনার কোডের প্রথম অক্ষরগুলি মুদ্রণ করে । যদি Nআপনার কোড দৈর্ঘ্যের চেয়ে বড় হয় তবে আপনার কোডটি চক্রাকারে আউটপুট চালিয়ে যাওয়া উচিত।

আপনার উত্স কোডটি যে কোনও উপায়ে পড়া এবং ফাইল, স্টিডিও ইত্যাদি থেকে পড়া নিষেধ।

উদাহরণ

(আপনার কোডটি ধরে নিলে yourcode)

ইনপুট => আউটপুট:

5 => yourc
10 => yourcodeyo
22=>yourcodeyourcodeyour

শোধন

আপনার প্রোগ্রামটি কমপক্ষে 1 বাইট দীর্ঘ হওয়া উচিত।


15
2000 তম কোড গল্ফ চ্যালেঞ্জ পোস্ট করার জন্য অভিনন্দন! :)
মার্টিন এন্ডার


1
@ মার্টিনবাটনার আসলে, এখানে প্রায় 300 টিরও বেশি মোছা [কোড-গল্ফ] রয়েছে। তবে যথেষ্ট কাছে;)
ডোরকনব

11
@ মার্টিনবাটনার আপনাকে ধন্যবাদ একটি বৃত্তাকার সংখ্যা পর্যন্ত কেবল 48 টি!
এলোমেলো

5
হতে পারে যে আপনি স্পষ্টভাবে উল্লেখ করেছেন যে খালি প্রোগ্রামগুলি অবৈধ?
মার্টিন এন্ডার

উত্তর:



10

> <> , 49 বাইট

'3d*}r0ff+0i:&0(?.~~a*&"0"-+60.&~:?!;1-&:o}&" "0.

অর্ধেক কোড ইনপুটটিকে স্ট্রিং থেকে ইনটকে রূপান্তর করে। যদি আমাদের পরিবর্তে এসটিডিআইএন থেকে পঠিত একটি একক চরের কোড পয়েন্ট ব্যবহার করার অনুমতি দেওয়া হয়, তবে এই প্রোগ্রামটি 21 বাইটে অনেক ছোট হবে:

'3d*}ri:?!;1-&:o}&60.

ব্যাখ্যা

আমি ব্যাখ্যার জন্য দ্বিতীয় প্রোগ্রামটি ব্যবহার করব।

'স্ট্রিং পার্সিং শুরু হয়, সমাপ্ত উদ্ধৃতি না পাওয়া পর্যন্ত প্রতিটি চরকে ঠেলাঠেলি করে। যেহেতু বাকী রেখার কোনও 'উদ্ধৃতি নেই, তাই প্রাথমিক ব্যতীত প্রতিটি চর 'স্ট্যাকের দিকে ঠেলে দেওয়া হয়।

তবে> <> একটি টরোইডাল 2 ডি ভাষা, সুতরাং নির্দেশিকা পয়েন্টারটি শেষ হওয়ার পরে আবার শুরুতে 'আবার মোড়কে দেয় এবং আবার আঘাত করে স্ট্রিং পার্সিং বন্ধ করে দেয় । ফলাফলটি হ'ল আমরা প্রাথমিক উদ্ধৃতি ব্যতীত প্রয়োজনীয় সমস্ত কিছুই ঠেলে দিয়েছি, যথা

3d*}ri:0=?;1-&:o}&60.

'এএসসিআইআই 39, তাই আমরা প্রারম্ভিক উদ্ধৃতিটি পুশ করি 3d* = 3*13 = 39। তারপরে আমরা স্ট্যাকটি ডান ( }) এবং শিথিল করুন ( r) দিন:

.06&}o:&-1;?=0:ir}*d3'

এখন আমরা সবাই মুদ্রণ শুরু করতে প্রস্তুত। iইনপুটের একটি লেখায় পড়েন, তবে> <> চরগুলি মূলত পূর্ণসংখ্যা হয়। প্রথম প্রোগ্রামে, iএকটি এমন লুপের সাথে প্রতিস্থাপন করা হয় যা STDIN থেকে একটি অঙ্কের স্ট্রিংটিকে পূর্ণসংখ্যায় রূপান্তর করে।

তারপরে আমরা প্রথম এন অক্ষরগুলি মুদ্রণের জন্য নিম্নলিখিত লুপটি কার্যকর করি:

:?!;               If the top of the stack (N) is 0, then terminate
                   Otherwise...
1-                 Subtract 1 from N
&                  Move N to the register temporarily
:o                 Output the next char in the program
}                  Shift the stack right
&                  Put N back on the stack
60.                Repeat loop by jumping back to the first :

9

সিজেম, 34 17 16 বাইট

এটি অনেক গল্ফ করা যেতে পারে ..

{`"_~"+ri_@*<}_~

কোড সম্প্রসারণ :

{`"_~"+ri_@*<}_~
{            }_~      "Put this code block on stack, take a copy and execute the copy";
 `                    "When executed, this block will the top element on stack to a string";
  "_~"                "Then put this string on stack";
      +               "Concat it to the the previous string on stack which ` created";
       ri             "Read an integer from STDIN";
         _@           "Copy the integer and put the concatinated string on top of stack";
           *          "Repeat the string input number of times";
            <         "Take the first input number of characters from the repeated string";

শেষ অবধি, স্ট্যাকের যে কোনও কিছুই স্বয়ংক্রিয়ভাবে STDOUT এ মুদ্রিত হবে

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


5

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

b=input();a=lambda x:(b*(2*(x+chr(34))+')'))[:b];print a("b=input();a=lambda x:(b*(2*(x+chr(34))+')'))[:b];print a(")

লাইফ প্রোটীপ: মৃত্যুদণ্ড কার্যকর করবেন না list(itertools.cycle(x))। কোনও কারণে, আমি ভাবতে পারি না কেন, এটি দোভাষীকে ক্র্যাশ করে।


1
itertools.cycle()অসীম জেনারেটর, সুতরাং আপনার কম্পিউটারে যদি অসীম স্মৃতি না থাকে তবে আপনার সমস্যা হতে চলেছে :)
Sp3000

5

জাভাস্ক্রিপ্ট (ES6), 65 52 50 47 41 39

q=n=>('q='+q).repeat(n/39+1).slice(0,n)

repeat()কোডটি ক্লোন করতে ES6 ব্যবহার করে তারপরে টুকরো টুকরো টুকরো করে। একটি হার্ডকডযুক্ত দৈর্ঘ্য ব্যবহার করে।


পুরানো সংস্করণ (50):

q=n=>n>(l=(t='q='+q).length)?t+q(n-l):t.slice(0,n)

qএকটি একক প্যারামিটার নিয়ে একটি ফাংশন তৈরি করে ।

এটি ফাংশনটির পাঠ্যকে nশক্তিশালী করে এবং পাঠ্যের দৈর্ঘ্যের চেয়ে বড় হলে পুনরাবৃত্তভাবে ফাংশনটি কল করে । অন্যথায়, এটি পাঠ্যের একটি স্ট্রিং প্রদান করে।

নন ES6 সংস্করণ (65):

function q(n){return t=q+'',l=t.length,n>l?t+q(n-l):t.slice(0,n)}

1
ES6 এর পরিবর্তে পুনরাবৃত্তি ব্যবহার করা .repeatছিল, কারণ চক্রীয় প্রয়োজনীয়তা ছিল কেবল প্রতিভা।
ইয়াকুব

1
প্রকৃতপক্ষে, দেখে মনে হচ্ছে এটি ব্যবহার করে repeat()আমাকে এটি একগুচ্ছ কাটতে সক্ষম করেছে, সুতরাং পরিবর্তে আমি এটি ব্যবহার করেছি।
স্কিমোনস্টার

তা দেখেনি। যাইহোক - এটি খুব সুন্দর উত্তর
জ্যাকব

কেন /39+1? শুধু একটি দীর্ঘ যথেষ্ট স্ট্রিং ছেড়ে না কেন?
l4m2

1
q=n=>('q='+q).repeat(n).slice(0,n)ফায়ারফক্সে দুর্দান্ত কাজ করে
l4m2

5

জে - 24 চর

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

($],quote)&'($],quote)&'

জে এর কোনও স্ব-রেফারেন্স ট্রিকস নেই, তাই আমরা কেবল এটি দুর্দান্ত উপায়ে করি। বিস্ফোরণ দ্বারা ব্যাখ্যা:

  ],quote                 NB. right arg prepended to quotation of right arg (quine)
 $                        NB. cyclically take left-arg characters from that
(        )&'($],quote)&'  NB. preload right arg with  ($],quote)&

$জে এর ডায়াডিক অপারেটরটি বক্ররেখায় নির্দিষ্ট মাত্রাগুলির সাথে ফিট করে চক্রাকারে তার ডান যুক্তি থেকে আইটেম নেয়। যখন মাত্রাটি একটি একক সংখ্যা হয়, এটি অক্ষরের একটি সাধারণ 1D তালিকা হয়, সুতরাং আমরা প্রশ্নটি যা ঠিক জিজ্ঞাসা করি ঠিক তাই করি।

এটি চেষ্টা করে দেখুন tryj.tk এ


quoteক্রিয়াটির সাধারণ উদ্দেশ্য কী ?
এলোমেলো

@ আর্যান্ডোমরা স্ট্যান্ডার্ড লাইব্রেরিতে এর সংজ্ঞাটি হ'ল ''''&,@(,&'''')@(#~ >:@(=&''''))বা ইংরেজিতে, "কোনও 'অক্ষর দ্বিগুণ করুন, তারপরে একটি শুরু এবং শেষের সাথে একটি যুক্ত করুন।" জে অ্যাডা-জাতীয় স্ট্রিং লিটারেল ব্যবহার করে তাই এই স্ট্রিংটি থেকে বেরিয়ে যায়।
অ্যালগরিদমশর্ক

4

কে 2 - 7 চর

{x#$_f}

ইংরাজীতে এটি একটি যুক্তিযুক্ত একটি ফাংশন xযার সংজ্ঞা " xটেক স্ট্রিং সেল্ফ" is

  • স্ব (বিশেষ্য _f) হ'ল অভ্যন্তরীণতম বর্তমানে সঞ্চালিত ফাংশন। এখানে এটি ফাংশন {x#$_f}
  • স্ট্রিং (একাকী$ ) তার যুক্তিটিকে রূপান্তর করে। কোনও ফাংশনের ক্ষেত্রে এটি ফাংশনের মূল সংজ্ঞা সহ একটি স্ট্রিং তৈরি করে।
  • টেক (ডায়াডিক #) বাম-আর্গ আইটেমগুলি ডান-আর্গের তালিকা তৈরি করে । স্ট্রিংয়ের ক্ষেত্রে, আইটেমগুলি অক্ষর, সুতরাং এটি আমরা যা চাই ঠিক তা করছে।

এটি ওপেন-সোর্স কোনায় কাজ করবে না , কারণ মনে হয় যে এটি ব্ল্যাক হোল তৈরি করে যা এগুলিকে কোনও কিছুর যুক্তি হিসাবে ব্যবহার করার সমস্ত প্রচেষ্টা খায়। আমি সঠিক কে 3 শব্দার্থবিজ্ঞানের বিষয়ে অনিশ্চিত তবে তারা সম্ভবত খুব দয়ালু নয় not

প্রশ্নে, এটি {x#string .z.s}এবং কে 4-এ {x#2_$.z.s}। আমাদের কে 4-তে 2_দুটি প্রাথমিক অক্ষর ফেলে দিতে হবে, কেবলমাত্র কোনও মা পছন্দ করতে পারে তার জন্য।


3

রুবি, 66 64 63 বাইট

eval s=%q(puts"eval s=%q(#{s})".chars.cycle.take(gets.to_i)*'')

কল এড়াতে ফাংশন ব্যবহার করে একই getsকিছুটা দীর্ঘ (81 বাইট):

def f(i);eval s=%q(puts"def f(i);eval s=%q(#{s});end".chars.cycle.take(i)*'');end

একই লাম্বদা সংস্করণ 69 এবং 65 বাইট হয়:

l=->i{eval s=%q(puts"l=->i{eval s=%q(#{s})}".chars.cycle.take(i)*'')}
->i{eval s=%q(puts"->i{eval s=%q(#{s})}".chars.cycle.take(i)*'')}

1
.cycleঝরঝরে, আমি এটা মনে রাখতে হবে। :) আপনি সম্ভবত এটি সংক্ষিপ্ত .joinকরতে পারেন *''
মার্টিন এেন্ডার

আপনি String#formateval s="$><<('eval s=%p'%s).chars.cycle.take(gets.to_i)*''"
বিরক্তি

3

গণিত, 65 বাইট

Print[StringTake[StringJoin @@ Table[ToString[#0], {#1}], #1]] & 

এটিকে একটি যথাযথ কুইন তৈরির জন্য সমস্ত স্থান প্রয়োজনীয়, এটি একটি খাঁটি ফাংশন, যা আপনি নিম্নলিখিত হিসাবে ব্যবহার করতে পারেন:

Print[StringTake[StringJoin @@ Table[ToString[#0], {#1}], #1]] & [75]

যা প্রিন্ট করে

Print[StringTake[StringJoin @@ Table[ToString[#0], {#1}], #1]] & Print[Stri

দুর্ভাগ্যক্রমে, ToStringকোনও ফাংশনে প্রয়োগ করার ফলে আপনি ঠিক যেমনটি ফাংশনটি প্রবেশ করেছিলেন সেভাবে ফল পাওয়া যায় না, তাই আমি ফাংশন কলগুলির জন্য হোয়াইটস্পেস সরিয়ে, সংক্ষিপ্ত #1করে #বা উপসর্গ চিহ্নটি ব্যবহার করে এটি সংক্ষিপ্ত করতে পারি না ।



অন্যদিকে রাউন্ডের মাউন্ডারমোনোরাইলকে ধন্যবাদ, ধন্যবাদ
মার্টিন এন্ডার

3

ম্যাটল্যাব, 319 ১৪১ টি অক্ষর

আমি আসলটি থেকে কয়েকটা বাইট হ্রাস করতে পেরেছি:

function d=g(n);d='gvodujpo!e>h)o*<e>(<e>\e)2;2:*.2-e-e)2:;foe*.2^<e>e)2,npe)1;o.2-252**<';d=[d(1:19)-1,d,d(19:end)-1];d=d(1+mod(0:n-1,141));

দুর্দান্ত উত্তর ...! কীভাবে এটি কাজ করে তার কোনও ধারণা নেই :-)
লুইস মেন্ডো

3

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

f=n=>n&&('f='+f+f(n-1)).slice(0,n)

পুনরাবৃত্তি ফাংশন যা কোড nবার পুনরাবৃত্তি করে , তারপরে ফলাফলটি টুকরো টুকরো করে।


3

জাপট , 2 বাইট

îî

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

প্রথমটি îএমন একটি সংখ্যা পদ্ধতি যা একটি প্যারামিটার নেয় এবং এটি দৈর্ঘ্যে পুনরাবৃত্তি করে n। কারণ এটি প্রথম পদ্ধতি, nইনপুট হয়ে যায়। দ্বিতীয়টি îএকটি স্ট্রিংয়ে কাস্ট হয়ে যায় এবং পুনরাবৃত্তি হয়।

এটি স্থানান্তর করে:

n.î("î")-> "î"দৈর্ঘ্য না হওয়া পর্যন্ত পুনরাবৃত্তি করুনn

8 বাইট সমাধান

îQi"îQi"

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

îQi"îQi" প্রতিস্থাপন n.î(Qi"îQi")

n.î(Qi"îQi")
      "îQi"    // String "îQi"          -> îQi
    Qi         // Insert "              -> îQi"
n.î            // Repeated to length n  -> îQi"îQi"îQi"  (n=12)

1
এর সরলতায় সুন্দর!
শেগি

2

আর, 203 বাইট

যখন এন = 203, কোড সম্পূর্ণ নিজেই মুদ্রণ করে।

(f <- function(N){
str <- paste0("(f <- function(N)", paste0(as.character(body(f)), collapse = "\n"), ")}(", N, ")")
cat(rep(str, floor(N/nchar(str))), sep = "")
cat(substr(str, 1, N%%nchar(str)))})(203)

যখন এন = 50, কোড নিজেই ছাঁটাই করে দেয়।

(f <- function(N){
str <- paste0("(f <- function(N

যখন এন = 300, কোডটি আংশিকভাবে পুনরাবৃত্তি করে।

(f <- function(N){
str <- paste0("(f <- function(N)", paste0(as.character(body(f)), collapse = "\n"), ")}(", N, ")")
cat(rep(str, floor(N/nchar(str))), sep = "")
cat(substr(str, 1, N%%nchar(str))))}(300)(f <- function(N){
str <- paste0("(f <- function(N)", paste0(as.character(body(f)), collapse = "\

একবার চেষ্টা করে দেখুন:(f=function(N){s=paste0("(f=",paste0(capture.output(f),collapse=""),")");cat(rep(s,N%/%nchar(s)),substr(s,1,N%%nchar(s)),sep="")})(200)
টমাস

2

মতলব (57)

function s=f(n);s=evalc('type f');s=s(mod(1:n,nnz(s))+1);

শেষ লাইনে প্রাথমিক 1সূচক (পরিবর্তে 0) হ'ল কারণ মতলব ফাংশন typeএকটি প্রাথমিক লাইন-ফিড প্রবর্তন করে, যা অপসারণ করা উচিত। ডেনিসকে তার সংশোধন করার জন্য (শেষ সূচক) এবং তার পরামর্শের জন্য (তার nnzচেয়ে ছোট numel) ধন্যবাদ জানাই ।


আমি আশঙ্কা করি যে এটি আমি প্রত্যাশা করে না তা করে না (চ (4) 'মজাদার'), সুসংবাদটি হ'ল আপনি 2 টি অক্ষর সঞ্চয় করে এটি ঠিক করতে পারেন। (অপসারণ -1)। - আমি মনে করি আপনি দ্বিতীয় নতুন লাইনটিও সরাতে পারেন এবং এর numelজন্য স্যুপ আউট করতে পারেন nnz
ডেনিস জহেরুদ্দিন

@ ডেনিস এই দুটি ধারণার জন্য ধন্যবাদ! আমি উভয়কে সংযুক্ত করার জন্য সম্পাদনা করেছি
লুইস মেন্ডো

এইচএম, আমি কোনও বাজকিল হতে চাই না, তবে কোনও type fঅংশে আপনার উত্স কোডটি পড়া এবং ফাইল, স্টাডিও ইত্যাদি পড়ার বিষয়টি নিষিদ্ধ নয় ?
নিডসেল্প

@ কেনডেলসপ্প আমি মনে করি আপনি ঠিক বলেছেন। আমারও সন্দেহ ছিল। typeসম্ভবত হার্ড ডিস্ক অ্যাক্সেস। আপনি কি মনে করেন আমার উত্তরটি সরিয়ে দেওয়া উচিত?
লুইস মেন্ডো

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

2

ইউনারি (1-8 সংস্করণ) , 23855 বাইট

'1 এর অবিচ্ছিন্ন হিসাবে ইনপুট নেয় এবং কোডটি 23855' 1 এর ( ,[.,])


1
এটি কোন ব্রেইনফাক অনুবাদ করে?
DJMcMayhem

@ ডিজেএমসিএমহেম এটি একটি বিড়াল
l4m2

এখন এমন ভাষা সন্ধান করুন যা অখণ্ড ইনপুটটি বোধগম্য হয় এবং কিছু 1-চর প্রোগ্রাম বিড়াল হয়
l4m2

2

Japt , 40 28 বাইট


"îR+Q+V+Q+R+V"
îR+Q+V+Q+R+V

প্রথমবার একটি কুইন লিখুন, সুতরাং এটি সম্ভবত বেশ কিছুটা ছোট করা যেতে পারে। অন্যদিকে, আমি একেবারেই কাজ করতে পেরে আমি বেশ খুশি।

ইচ্ছাকৃতভাবে নতুন লাইনের শীর্ষস্থানীয়, দ্বিতীয় লাইনটি হ'ল ডেটা এবং এর বাকি অংশগুলি ডেটা আনপ্রেপ করে, তারপরে পুরো ফলাফলের স্ট্রিংটি পুনরাবৃত্তি করে যতক্ষণ না এটি ইনপুটের সমান দৈর্ঘ্যে পৌঁছায়।

ধন্যবাদ পুরো এক 12 বাইট বন্ধ অলিভার

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


সুন্দর :) আপনি এটির tTUসাথে প্রতিস্থাপন করতে পারেন ¯Uএবং আপনি এটির সামনে রেখে এই îস্থানে ব্যবহার করতে পারেন p: অনলাইনে চেষ্টা করে দেখুন
অলিভার

দ্বিতীয় চিন্তায়, আমার মনে হয় না যে আপনার এটিকে মোটেই টুকরো টুকরো করা দরকার। îR+Q+V+Q+R+Vঠিক কাজ করা উচিত।
অলিভার

@ অলিভার ওহ যে চতুর, আমি জানতাম না î, এটি খুব সহজ। অনেক ধন্যবাদ!
নিট

আমিও কুইনসের সাথে খুব ভাল নই তবে আমিও মনে করি এটি 24 বাইটের জন্য কাজ করা উচিত।
শেগি

1

সি ++, 305

int L=305;string s="int main(){string t=\"string s=\";int n;cin>>n;t+=s;t+=\"\";\";t+=s;while(n>0){if(n>L){cout<<t;n-=L;}else{cout<<t.substr(0,n);}return 0;}";
int main(){string t="int L=305;string s=\"";int n;cin>>n;t+=s;t+="\";";t+=s;while(n>0){if(n>L){cout<<t;}else{cout<<t.substr(0,n);}n-=L;}return 0;}

ব্যাখ্যা পালানোর চরিত্রটি ছাড়াও অন্যান্য সমস্ত অক্ষর মুদ্রিত। মূল পদ্ধতিটি স্ট্রিংয়ের অভ্যন্তরে এবং প্রধান অভ্যন্তরে সম্পূর্ণ স্ট্রিংটি স্ট্যান্ডআউটে নির্মিত এবং মুদ্রিত হয়


1

Pyth, 15 13 14 বাইট

<jN*Q]"<jN*Q]"

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

এর পরিবর্তিত সংস্করণ স্ট্যান্ডার্ড পাইথ কুইনের


@ l4m2 কিভাবে? দয়া করে ব্যাখ্যা করুন, আমি কোনও ভুল দেখছি না ...
hakr14

29 <jN*Q]"<jN*Q]<jN*Q]"<jN*Q]<jNভুল হওয়া উচিত ?
l4m2

@ l4m2 আহ, ঠিক আছে তুমি। আমি এটা ঠিক করেছি।
hakr14

<jN*Q]"<jN*Q]"কাজ মনে হচ্ছে?
l4m2

হ্যাঁ, আমি বুঝতে পেরেছি। বিটিডব্লিউ সাহায্যের জন্য ধন্যবাদ!
hakr14

1

হুন , 185 বাইট

=/(f "=/(f k |=(n=@ =+((trim 5 f) `tape`(scag n `tape`(zing (reap n :(weld p <f> (slag 1 q))))))))" |=(n=@ =+((trim 5 f) `tape`(scag n `tape`(zing (reap n :(weld p <f> (slag 1 q))))))))

fপ্রোগ্রামের কোডটিতে টেপ হিসাবে সেট করুন তবে নিজের জন্য "কে" দিয়ে। অক্ষর 5 এ টেপটি বিভক্ত করুন, ভেরিয়েবলগুলি সেট করুন [p=left q=right]। স্ট্রিংগুলি p, মূল স্ট্রিং fএবং এর 1 ম চরিত্রের পরে সবকিছু একসাথে .ালুন q। সেই স্ট্রিং বারটি পুনরাবৃত্তি করুন n, তারপরে এর প্রথম nঅক্ষরগুলি ফিরিয়ে দিন ।

এটি করার ফলে হুন স্টাডলিব কোনও ফর্ম্যাট ফাংশন না পেয়ে বা সন্ধান-প্রতিস্থাপন না করে কিছুটা বাধাগ্রস্থ হয়েছিল ... এছাড়াও, আমি নিশ্চিত নই যে আমাদের পরে কেন অন্য কাস্ট দরকার scag, যেহেতু এটি টাইপ তথ্য রাখা উচিত। সুতরাং এটি যায়।




1

গোল> <> , 12 বাইট

"r2ssIFLko|;

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

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

"r2ssIFLko|;

"..."   Push the chars in reverse order
r2ss    Reverse the stack, then push `"`
IF...|  Input n, and repeat the following n times...
  L     Push the loop counter (0 to n-1)
   k    Pop x and copy x-th from the top
    o   Pop and print as char
;       Halt

k যে কোনও সংখ্যক বার মোড়ানো করতে পারে, সুতরাং ইনপুটটির উপর নির্ভর করে আমাদের পুরো স্ট্যাকটি সদৃশ করার দরকার নেই।


1

স্মাইলব্যাসিক, 106 66 বাইট

INPUT N?MID$(("+CHR$(34))*3,23,N)INPUT N?MID$(("+CHR$(34))*N,23,N)

0

KSFTgolf - 4 টি চর, 6 বাইট

কেএসএফটিগল্ফ যদি কোনও ভাষা আমি কোড গল্ফের জন্য ডিজাইনের চেষ্টা করছি। আমি এটিকে অনেক পরিবর্তন করে চলেছি তাই সম্ভবত এটি গণনা করা উচিত নয়।

☃\@2

এই কি ভাষা ? কোন লিঙ্ক? স্পেক? ব্যাখ্যা ..
অপ্টিমাইজার

@ অপ্টিমাইজার আহ, ঠিক আছে। আমি এটি সম্পর্কে ভুলে গেছি। এটি এমন একটি ভাষা যা আমি কোড গল্ফের জন্য ডিজাইন করেছি। এটি অবশেষে একটি চ্যালেঞ্জ যেখানে (যদি আমি সমস্ত বাগগুলি স্থির করি) এটি আসলে জিততে পারে।
কেএসএফটি

1
তদুপরি, আমি যতদূর দেখতে পাচ্ছি, ভাষাটি 10 ​​মিনিটের আগে তৈরি হয়েছিল, তাই প্রযুক্তিগতভাবে, এটি একটি প্রতিযোগিতামূলক উত্তর :)। এছাড়াও, আমি অনুমান এই আপনার সংশ্লিষ্ট ব্লক কোড, যা সম্পূর্ণই এমন কিছু বিষয় যা বিশেষভাবে এই চ্যালেঞ্জ জন্য কাজ করা হয়েছে (যেমন সেখানে আপনার পুরো ফাইল অন্য কোন ইউনিকোড ভিত্তিক কোড ব্লক হয়) মত দেখায়।
অপ্টিমাইজার

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

4
আপনি কি একটি তুষার মানব তৈরী করতে চান?
flawr


0

জে, 41 বাইট

এখন সেটাই ছিল মস্তিষ্কের টিজার!

((,quote,')$~'"_)'((,quote,'')$~''"_)')$~

ব্যাখ্যা:

((,quote,')$~'"_)'((,quote,'')$~''"_)')$~  | Expression taking 1 argument
                                       $~  | Reshape left argument to fit right, taking cyclically.
(                                     )    | One large expression that evaluates to a string
                 '((,quote,'')$~''"_)'     | String literal containing the code to the left of it
 (,quote,'$)~'"_)                          | A 4-Hook:
         '$)~'"_                           | The string '$)~'
   quote,                                  | Appended to the quoted version of the string
  ,                                        | Appended to the raw string

উদাহরণ:

   ((,quote,')$~'"_)'((,quote,'')$~''"_)')$~ 10
((,quote,'

   ((,quote,')$~'"_)'((,quote,'')$~''"_)')$~ 20
((,quote,')$~'"_)'((

   ((,quote,')$~'"_)'((,quote,'')$~''"_)')$~ 30
((,quote,')$~'"_)'((,quote,'')

   ((,quote,')$~'"_)'((,quote,'')$~''"_)')$~ 41
((,quote,')$~'"_)'((,quote,'')$~''"_)')$~

   ((,quote,')$~'"_)'((,quote,'')$~''"_)')$~ 50
((,quote,')$~'"_)'((,quote,'')$~''"_)')$~((,quote,


0

জাভা 10, 193 176 বাইট

n->{var s="n->{var s=%c%s%1$c;s=s.format(s,34,s);for(int i=n;i>0;i/=176)s+=s;return s.substring(0,n);}";s=s.format(s,34,s);for(int i=n;i>0;i/=176)s+=s;return s.substring(0,n);}

ব্যাখ্যা:

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

n->{                       // Method with integer parameter and String return-type
  var s="n->{var s=%c%s%1$c;s=s.format(s,34,s);for(int i=n;i>0;i/=176)s+=s;return s.substring(0,n);}";
                           //  Unformatted source code
  s=s.format(s,34,s);      //  Create the formatted quine
  for(int i=n;i>0;         //  Loop `i` as long as it's not 0
      ;                    //    After every iteration:
       i/=176)             //     int-divide `i` by the hardcoded length of the source code
    s+=s;                  //   Exponentially enlarge the source code
  return s.substring(0,n);}//  Return the first `n` characters of the source code

:

  • দ্য var sঅবিন্যস্ত সোর্স কোড রয়েছে।
  • %s এই স্ট্রিংটি নিজের সাথে ইনপুট করতে ব্যবহৃত হয় s.format(...)
  • %c, %1$cএবং 34এগুলি ডাবল-কোট ফর্ম্যাট করতে ব্যবহৃত হয়।
  • s.format(s,34,s) সব একসাথে রাখে।

চ্যালেঞ্জ অংশ:

  • for(int i=n;i>n;i/=176)লুপ ceil(n/176)বার, যেখানে176 উত্স কোডের দৈর্ঘ্য।
  • s+=s;সোর্স কোড স্ট্রিংয়ের আকারটি তাত্ক্ষণিকভাবে বৃদ্ধি করে। ( abহয়ে abab; ababহয়ে abababab; ababababহয়ে যায়)abababababababab ; ইত্যাদি)
  • s.subtring(0,n);স্ট্রিংয়ের প্রথম nঅক্ষর গ্রহণ করে।


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