এ তো অনেক বানর

35

অসীম বানর উপপাদ্য বলে যে, অসীম সময় দেওয়া একটি মেশিন র্যান্ডম অক্ষরের একটি অবিরাম প্রবাহ পাঠানোর সবসময় কোনো লেখা টাইপ হবে।

এটি আমার কাছে চ্যালেঞ্জের জন্য দুর্দান্ত ধারণা বলে মনে হচ্ছে।

প্রক্রিয়া

একটি স্ট্রিং এ বানর-আইস করতে, নিম্নলিখিত পদক্ষেপগুলি নেওয়া উচিত:

  1. একটি খালি স্ট্রিং নিন। আমরা এই স্ট্রিং বি কল করব।
  2. একটি অবিশেষ এলোপাথারি মুদ্রণযোগ্য হওয়া ASCII অক্ষর (সীমার মধ্যে অক্ষর চয়ন করুন 0x20থেকে 0x7E) এবং বি যে চরিত্র যোগ
  3. যদি A বি এর একটি স্ট্রিং থাকে, বি আমাদের বানর-আকৃতির স্ট্রিং। অন্যথায়, পদক্ষেপ 2 টি পুনরাবৃত্তি করুন যতক্ষণ না A বি এর একটি স্ট্রিং থাকে until

এই প্রক্রিয়াটি কেবল একটি উদাহরণ, আপনার ভাষার উপর নির্ভর করে সহজ পদ্ধতি থাকতে পারে। যতক্ষণ আউটপুটগুলির একই বন্টন অর্জন করা হয় ততক্ষণ আপনাকে এই পদ্ধতিটি যথাযথভাবে অনুসরণ করতে হবে না।

চ্যালেঞ্জ

এমন কোনও প্রোগ্রাম বা ফাংশন লিখুন যা কোনও যুক্তিসঙ্গত বিন্যাসে একটি খালি-খালি স্ট্রিংয়ের পরে , সেই স্ট্রিংটির একটি বানর-ized সংস্করণ প্রদান করে।

আপনার প্রোগ্রামটিতে দৈনিক 3 বা তার কম দৈর্ঘ্যের ইনপুটগুলির জন্য ব্যবহারিকভাবে কাজ করতে হবে। দীর্ঘতর ইনপুটগুলির জন্য, এটিকে কিছু আউটপুট না দিয়ে বা তা ছাড়াই তাড়াতাড়ি শেষ করার অনুমতি দেওয়া হয়।

উদাহরণ

দুর্ভাগ্যক্রমে, এ জাতীয় এলোমেলো প্রকৃতি এবং বড় আউটপুটগুলির কারণে এই প্রশ্নের উদাহরণ তৈরি করা একরকম শক্ত।

যাইহোক, আমি ইনস্টেটের জন্য হস্তেবিনে একটি একক উদাহরণ সরবরাহ করতে hiপারি।

স্কোরিং

যেহেতু এটি কোড-গল্ফ , তাই কয়েকটি স্বল্পতম বাইটের সাথে জমাটি জিতে।

code-golf  string  random 
— LyricLy
সূত্র
— LyricLy
11
আউটপুট উত্পাদন করার জন্য আমাদের কি বর্ণিত পদ্ধতিটি অনুসরণ করতে হবে? যদি হ্যাঁ, এটি একটি অলক্ষণীয় প্রয়োজনীয়তা , যা সমস্যাযুক্ত। যদি তা না হয় তবে আমরা এলোমেলো অক্ষরের Bঅ-নেতিবাচক সংখ্যার প্রিপেন্ড করে সরাসরি জেনারেট করতে পারি । তারপরেই আসল সমস্যাটি হ'ল বিতরণটি জেনে রাখা (আমি জ্যামিতিক বিতরণের উপর বাজি ধরে)nAn
— লুইস মেন্ডো
1
@seshoumara- কে উত্তর দিচ্ছেন না
— LyricLy
7
@ লুইস মেন্ডো আমি এই লাইনগুলি বরাবর ভেবেছিলাম এবং সরাসরি উপসর্গটি সরাসরি উত্পন্ন করা সহজ নয়। এটিতে যুক্ত স্ট্রিংটি পূরণ করে এমন সীমানা অতিক্রম সহ লক্ষ্য স্ট্রিংটি ধারণ করতে পারে না। উপসর্গের দৈর্ঘ্যের বিতরণ কেবল লক্ষ্য স্ট্রিংয়ের দৈর্ঘ্যের উপর নির্ভর করে না, পাশাপাশি এর কাঠামোটিও নির্ভর করে।
— xnor
10
নীচের কয়েকটি সমাধান কম্পিউটার প্রোগ্রাম, যেমন .W!}zH+ZOrd\k, একটি বানর কী টাইপ করেছে তার মতো দেখতে অনেকগুলি।
— জেপ্পে স্টিগ নীলসেন

উত্তর:

12

সি, 192 বাইট

i;g(s,b,i,n,j)char*s,*b;{for(b[i+1]=0;b[n+j];++n)s[n]-b[n+j]&&(n=-1,++j);return n;}f(char*s){char*b=calloc(strlen(s),1);for(i=0;s[i];)i=(b[i]=putchar(rand()%95+32))-s[i]?i?g(s,b,i,0,0):0:i+1;}

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

এটি এখন গণ্ডগোল, তবে কমপক্ষে এটি কোণার ক্ষেত্রেও কার্যকর ...

সি,  63   62  61 বাইট

বাইট সংরক্ষণের জন্য @ জনাথন ফ্রেঞ্চকে ধন্যবাদ!

i;f(char*s){for(i=0;s[i=putchar(rand()%95+32)-s[i]?0:i+1];);}

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

— Steadybox
সূত্র
এটিকে হিট করলে কেন এটি বন্ধ হয়, আমার সম্পূর্ণ ধারণা নেই, +1
— এটাকো
1
@ATaco এটি iবড় হয়ে ওঠে যখন s[i]স্ট্রিংয়ের নাল টার্মিনেটরকে বোঝায় (অক্ষর 0)।
— স্টেডিবক্স
ওহ, সুতরাং এটি দুর্ঘটনাক্রমে তৈরি হওয়া অবধি এটিকে এলোমেলো অক্ষর নিক্ষেপ করার পরিবর্তে এটি এ পৌঁছানো পর্যন্ত এলোমেলো অক্ষর নিক্ষেপ করে। স্মার্ট।
— এটাকো
আমি এই উত্তরটি যতটা পছন্দ করি, বিশ্বাস করি র‌্যান্ড বানররা যখন "আব" টাইপ করে এটি "আব" এর মতো একটি ইনপুটটির জন্য ভেঙে যায়।
— zennehoy
আমার ধারণা আপনার কেএমপি জাতীয় কিছু দরকার যাতে এই পদ্ধতির বৈধতা পাওয়া যায়। ধরুন ইনপুট স্ট্রিংটি ababcএবং বানরের উত্পন্ন !!abababcহবে কি আপনার প্রোগ্রামটি থামবে?
— ব্যবহারকারী 202729
9

পাইথন , 79 বাইট

f=lambda x,s='':x in s and s or f(x,s+chr(randint(32,126)))
from random import*

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

এটি তাত্ত্বিকভাবে সাবলীল, তবে অজগরটির পুনরাবৃত্তি সীমাবদ্ধতার কারণে তাড়াতাড়ি ক্রাশ হবে (দীর্ঘতর ফলাফল পাওয়ার জন্য আপনি সেগুলি আরও সেট করতে পারেন)

পাইথন, 84 বাইট

from random import*
x,s=input(),''
while x not in s:s+=chr(randint(32,126))
print(s)

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

তুলনামূলকভাবে দীর্ঘতর স্ট্রিংগুলির জন্য এটির কাজ করা উচিত, যেহেতু এটি 5 বাইটের ব্যয়ে পুনরাবৃত্তির উপর নির্ভর করে না।

— ঊরীয়েল
সূত্র
স্ট্রিং রূপান্তর করতে ব্যাকটিক্স ব্যবহার করে আপনি তিনটি বাইট সংরক্ষণ করতে পারেন ( s+'randint(32,126)'
— মার্কডাউন
1
@nnmaw ব্যাকটিক randint(32,126)সংখ্যার একটি স্ট্রিং তৈরি করবে, আস্কি চর ম্যাপিং নয়
— উরিল
8

জিএনইউ সেড + কোর্টিলস, 75 + 1 (আর পতাকা) = 76 বাইট

h
:
s:.*:shuf -i32-126|dc -e?P:e
H;g
s:\n::2g
/^(.+)\n(.*)\1/{s::\2\1:;q}
b

এটি অনলাইন চেষ্টা করুন! (দৈর্ঘ্য 2 ইনপুটটির উত্তর পেতে অনেক রান দরকার হয়, কারণ বেশিরভাগ সময় আপনি অনুমতিপ্রাপ্ত টিআইও গণনার সময় শেষ করেন না))

ব্যাখ্যা:

h                                # copy input string 'A' to hold space
:                                # start loop
    s:.*:shuf -i32-126|dc -e?P:e # run shell script: shuf outputs a rnd permutation
                                 #of the set of numbers from 32 to 126, and '?P' in
                                 #dc converts the 1st read decimal to an ASCII char
    H;g                          # append char to hold space ('A\n.'), then copy
                                 #result back to pattern space
    s:\n::2g                     # remove all '\n's from pattern space, but first
    /^(.+)\n(.*)\1/{             # if pattern is 'A\n.*A' (A substring of B), then
        s::\2\1:;q               # search previous regex used and leave only '.*A',
                                 #then quit (implicit printing before exit)
    }
b                                # repeat loop

বেঞ্চমার্ক: আনুমানিক, কেবলমাত্র স্কেলিংয়ের উদ্দেশ্যে

  • ইনপুট দৈর্ঘ্য: 1, 10 এলোমেলো ইনপুট (রান), গড় সময়: <1 এস
  • ইনপুট দৈর্ঘ্য: 2, 10 এলোমেলো ইনপুট (রান), গড় সময়: 90 এস
  • ইনপুট দৈর্ঘ্য: 3, 10 এলোমেলো ইনপুট (রান), গড় সময়: প্রচুর ঘন্টা!
— seshoumara
সূত্র
7

ফানকি , 64 বাইট

s=>{S=""whileS::sub((#S)-#s)!=s S+=S.char(math.random(32,126))S}

এটি ফানকিতে যেমন ব্যবহার করতে চাইছিলাম এমন কয়েকটি কৌশল ব্যবহার করে যেমন একটি কীওয়ার্ডের পরে যেমন একটি ভেরিয়েবল নামের whileSথাকে এবং stringলাইব্রেরিতে স্পষ্টভাবে পিতামাতার স্ট্রিং ব্যবহার করে ।

Ungolfed

function monkey(target){
    monkeyCode = ""
    while (monkeyCode::sub((#monkeyCode)-#target)!=target){
        monkeyCode += string.char(math.random(32,126))
    }
    monkeyCode
}

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

— ATaco
সূত্র
6
তাহলে কি এমন হবে ... ফানকি বানর?
— সেবাস্তিয়ান লেনারটোইভিজ
7

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

import System.Random
s#(a:b)|and$zipWith(==)s$a:b=s|1>0=a:s#b
m a=(a#).randomRs(' ','~')<$>newStdGen

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

বেসিক ধারণাটি হ'ল অক্ষরগুলির একটি অসীম তালিকা তৈরি করা randomRsএবং স্ট্রিংটি খুঁজে পাওয়ার পরে এটি বন্ধ করা।

— user1472751
সূত্র
একটি লজ্জা isPrefixOfস্ট্যান্ডার্ড প্রিলিওডে নেই ...
— বার্গি
7

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

a=>{var b="";for(var r=new Random();!b.Contains(a);b+=(char)r.Next(32,127));return b;}

Randomউদাহরণটি তৈরি করা কতটা নেয় তা আমি সত্যিই পছন্দ করি না তবে এর আশেপাশে কোনও উপায় আছে বলে আমি মনে করি না।

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

— Wakawakamush
সূত্র
3
পিপিসিজিতে আপনাকে স্বাগতম! বর্তমানে আপনার সমাধানটি যথাযথভাবে কোনও এলোমেলো অক্ষর তৈরি করতে পারে না কারণ ডকস অনুসারে , উপরের সীমানাটি Random.Next(Int32,Int32)একচেটিয়া এবং তাই উত্পন্ন সংখ্যাগুলির মধ্যে একটিও নয়। এটি প্রতিস্থাপনের 126মাধ্যমে স্থির করা যেতে পারে 127।
— 0 '
@ 0 ওফ, লেখার সময় আমি এটি সম্পর্কে ভেবেছিলাম তবে পোস্ট করার আগে এটি পরীক্ষা করতে ভুলে গিয়েছিলাম। ধন্যবাদ!
— ওয়াকাওয়াকামুশ
প্রকৃতপক্ষে সেই দীর্ঘ প্রায় একটি উপায় আছে Random, আপনি পরিবর্তনশীল ঘোষণা মুছে ফেলতে পারেন! 79 বাইট
— ফ্লিপট্যাক
@ ফ্লিপট্যাক আকর্ষণীয়, আমি সি # ইন্টারেক্টিভ এ চেষ্টা করেছি এবং এটি কার্যকর হয়নি কারণ এটি কেবল একই সংখ্যা তৈরি করে চলেছে। এটি টিআইওতে কাজ করে তা দেখতে অদ্ভুত।
— ওয়াকাওয়াকামুশ
6

পার্ল 5, 31 +2 (-পা) বাইট

}{$_.=chr 32+rand 95until/\Q@F/

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

— নাহুয়েল ফৌইলুল
সূত্র
\E$বহিরাগত হওয়ায় আপনি 3 বাইট সংরক্ষণ করতে পারবেন
— জায়েদ
প্রকৃতপক্ষে, লক্ষ্য করার জন্য আপনাকে ধন্যবাদ
— নাহুয়েল ফিউইলুল
আরও 2 টি বাইট সংরক্ষণ করেছে
— নাহুয়েল ফুইলুল
ওটা লুক্কায়িত। সত্যিই খুব সুন্দর :)
— জায়েদ
এবং আরও বেশি, -3 বাইটস
— নাহুয়েল ফিউইলুল
6

আর , 79 76 75 বাইট

-3 বাইট ধন্যবাদ র্যান্ডম স্যাম্পেলারটি পরিবর্তনের মিকিটিকে

-1 বাইট র্যান্ডম স্যাম্পেলারটি আবার এলোমেলো করার জন্য রবিন রাইডারকে ধন্যবাদ জানায়

function(S){G=""
while(!grepl(S,G))G=paste0(G,intToUtf8(32+95*runif(1)))
G}

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

— : Giuseppe
সূত্র
হাই, আপনার নমুনাটি প্রতিস্থাপন করা যেতে পারেintToUtf8(runif(1,32,127))
— মিকিটি
@ মিকিটি দুর্দান্ত, আপনাকে ধন্যবাদ!
— জিউসেপ
32+95*runif(1)আপনার এলোমেলো নমুনা হিসাবে আপনি 1 বাইট সংরক্ষণ করতে পারেন ।
— রবিন রাইডার
6

কাঠকয়লা, 15 14 12 বাইট

Ｗ¬№ωθ≔⁺ω‽γωω

এটি অনলাইন চেষ্টা করুন! লিঙ্কটি কোডটির ভার্জোজ সংস্করণ। সম্পাদনা করুন: চারকোলে পরবর্তী বাগ ফিক্সের কারণে 2 বাইট সংরক্ষণ করা হয়েছে। ব্যাখ্যা:

    θ           Input string
   ω            Predefined variable `w`
  №             Count number of occurrences
 ¬              Logical not
Ｗ               Loop while true
       ω        Predefined variable `w`
      ⁺         Concatenated with
         γ      Predefined printable characters
        ‽       Random element
     ≔    ω     Assign to predefined variable `w`
           ω    Predefined variable `w`
                Implicitly print
— নিল
সূত্র
4

গণিত, 65 বাইট

""//.x_/;x~StringFreeQ~#:>x<>RandomChoice@CharacterRange[32,126]&

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

জোনাথন ফ্রেচ -3 বাইট

— J42161217
সূত্র
আমি মনে করি FromCharacterCode[RandomInteger@94+32]সংক্ষিপ্ত সমান RandomChoice@CharacterRange[32,126]।
— জোনাথন ফ্রেচ
@ জোনাথানফ্রেচ হ্যাঁ, এটি!
— J42161217
4

অক্টাভা , 62 বাইট

t=input(o="");while(~nnz(regexp(o,t)))o=[o,randi(95)+31];end;o

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

ব্যাখ্যা:

t=input(o="");               % get stdin and define output
while(~nnz(regexp(o,t)))     % while no matches
    o=[o,randi(95)+31];      % concatenate string with ascii char
end;                            
o                            % output result

সম্পাদনার জন্য লুইস মেন্ডোকে অনেক ধন্যবাদ!

— অ্যালান
সূত্র
1
সাইটে স্বাগতম! :)
— ডিজেএমসিএমহেম
আপনি isvectorদ্বারা প্রতিস্থাপন করতে পারবেন না nnz? এবং strfindদ্বারা regexp। এছাড়াও, আপনি ব্যবহার করতে পারেন randi(95)+31বা পুরো sprintfবিবৃতিটি o=[o,randi(95)+31];(চরকে অন্তর্ভুক্ত রূপান্তর) দ্বারা প্রতিস্থাপন করতে পারেন
— লুইস মেন্ডো
ভালো কিছু - এছাড়াও, আমরা সাধারণত একটি ফাংশান বা একটা প্রোগ্রাম যা তার ইনপুট (যেমন ইনপুট ধারণকারী একটি পরিবর্তনশীল সংজ্ঞা থেকে ভিন্ন) লাগে প্রয়োজন এই
— লুইস মেন্ডো
আমি এটি করার চেষ্টা করেছি, তবে আমি কোনও সংক্ষিপ্ত পথের কথা ভাবতে পারি নি তাই আমি এড়িয়ে গেছি। সুন্দর রিভিশন!
— অ্যালান
1
আপনার উত্তরের মধ্যে এই পরামর্শগুলি নিখরচায় অন্তর্ভুক্ত করুন। এই সাইটে এটি স্ট্যান্ডার্ড
— লুইস মেন্ডো
3

অ্যালিস , 21 বাইট

/U!?"$~dr@
\idwz K"o/

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

ব্যাখ্যা

/...@
\.../

এটি বেশিরভাগ লিনিয়ার প্রোগ্রামগুলির কাঠামো যা পুরোপুরি অর্ডিনাল (স্ট্রিং-প্রসেসিং) মোডে কাজ করে। আইপি প্রোগ্রামটির মধ্য দিয়ে দু'বার তির্যকভাবে উপরে উঠে যায়, যার অর্থ আসল কোডটি কিছুটা অদ্ভুতভাবে ইন্টারলিভড। প্রকৃত অর্পণ করা কমান্ডগুলি হ'ল:

i!w" ~"rUd?z$Kdo

এর মাধ্যমে চলুন:

i       Read all input.
!       Store the input on the tape for later.
w       Push the current IP address onto the return address stack.
        This marks the beginning of the main loop.

  " ~"    Push this string.
  r       Range expansion. Turns the string into " !...}~", i.e. a string
          with all printable ASCII characters.
  U       Random choice. Picks a uniformly random character from this
          string. This will remain on the stack throughout the rest of
          the program and will form part of the resulting string.
  d       Join stack. This takes all strings on the stack and joins them
          into a single string and pushes that (it does this without actually
          removing any elements from the stack).
  ?       Retrieve the input from the tape.
  z       Drop. If the joined string contains the input, everything up to
          and including the input will be discarded. Otherwise, nothing
          happens to the joined string. This means that the result will be
          an empty string iff the joined string ends with the input.
$K      If the top of the stack is not empty, jump back to the w to continue
        with another iteration of the main loop.
d       Join the stack into a single string once more.
o       Print it.
— মার্টিন ইন্ডার
সূত্র
3

পার্ল 6 , 39 বাইট

{("",*~(" ".."~").pick...*~~/$_/)[*-1]}

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

(...)[*-1]ক্রম দ্বারা নির্ধারিত ক্রমের শেষ উপাদানটি প্রদান করে ..., যার মধ্যে:

  • "" প্রথম উপাদান;

  • * ~ (" " .. "~").pickপূর্ববর্তী উপাদানটিতে উপযুক্ত পরিসরে একটি এলোমেলো অক্ষর যুক্ত করে পরবর্তী উপাদানটি তৈরি করে; এবং

  • * ~~ /$_/শেষের শর্ত, যা বর্তমান উপাদানটি মূল ফাংশনের ইনপুট আর্গুমেন্টকে $_আক্ষরিক সাবস্ট্রিং হিসাবে মেলে ।

— শন
সূত্র
আপনি *~~-3 টিও.রুন
— ফিল এইচ
3

জাভা 8, 81 79 78 বাইট

a->{String b="";for(;!b.contains(a);b+=(char)(32+Math.random()*95));return b;}

-১ বাইট @ অলিভিগ্রগ্রোয়ারকে ধন্যবাদ জানায় যে আমি (বড়>। <) ভুল করেছিলাম আমাকে ..

ব্যাখ্যা:

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

a->{                    // Method with String as both parameter and return-type
  String b="";          //  Result-String, starting empty
  for(;!b.contains(a);  //  Loop as long as the result does not contain the input
    b+=(char)(32+Math.random()*95)
                        //   Append a random character to `b`
  );                    //  End of loop
  return b;             //  Return the result-String
}                       // End of method
— কেভিন ক্রুইজসেন
সূত্র
1
এটা হওয়া উচিত 32+Math.random()*95। সেখানে ... বাগ ফিক্সড এবং একটি বাইট সংরক্ষিত! ;-)
— অলিভিয়ার গ্রাগোয়ার
@ অলিভিগ্রগ্রোওরে ওয়ুপস .. স্থানটির জন্য হেক্সাডেসিমাল কোডটি দেখেছেন তবে টিলডের জন্য নিয়মিত দশমিক ..>>> লক্ষ্য করার জন্য ধন্যবাদ। আমি কীভাবে এটি মিস করেছি তা নিশ্চিত নই, যেহেতু আউটপুটে স্পষ্টভাবে '
— অ-ছাপানো
3

05 এ বি 1 ই , 10 9 বাইট (-1 @ এমিগিনা)

[žQΩJD¹å#

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

বানরকে আমার সাথে কর।

[              | Loop forever.
 žQ            | Push 0x20-0x7E as a single string.
   .R          | Pick from it randomly.
     J         | Join stack (B) with new char.
      D        | Duplicate (B).
       ¹å      | Push input (A) and check if input (A) is in (B).
         #     | If the previous statement is true, break loop.
— ম্যাজিক অক্টোপাস উরন
সূত্র
1
আপনি Ωপরিবর্তে করতে পারেন .R।
— Emigna
2
লোল, ওহম ব্যবহার করে ওহম ভি 2 কে পরাস্ত করতে। কী সুন্দর.
— ম্যাজিক অক্টোপাস উর্ন
2

কিউবিআইসি , 33 বাইট

≈instr(Z,;)<1|Z=Z+chr$(_r32,126|)

ব্যাখ্যা

≈instr( , )<1|   WHILE InStr() can't find
         ;        the input (cmd line string argument) as part of
       Z          the output (Z$, which is printed automatically on exit)
Z=Z+             add to the output
chr$(         )  an ASCII character
     _r32,126|   with a random codepoint between 32 and 126 (incl)

নমুনা রান:

Command line: hi

`;7L3f$qy )H99tZ@>(-Z1efL|Q-5'BE=P8BdX?Lem/fp|G#~WY[ Q4s9r~Af*T})P4`4d$#ud3AiuTwQPFS@8c7_59C$ GlJ%iJ[FA(rNt<y>Hl=r,wSbBB%q!8&#*CixWbnwE."wrZ:R53iKJkN*@hpQt aMj6Mw<KfT@hkik>_k'_>$~3)jl|J!S`n\Yw|lXi:WAKWp?K"F.cAGI/:~uR8*[;Die{]B*]@;Vhjv,$9]Ys:AIdy!j{aXlr:0=txCP-n{/3lgq,;jXaP\]u}.Zl/7eKF+N54[J9^r:>%/.e~*9aK%de>^TW%p%(_uJPvuV%d<&]zu`t;vkEPC>7pofok0Kj}j?9G{TUxSccth)[)J>@'E)NMzA(i!UV7%;$.Z#j3q@#9Q%}<" &VsbL*<SrG-$NC MAQ\`iIT+.P|5}nv )FZl5_.Kc*AUV9u&fvk.USt3Y!s7^UEL{|D$k#k8.9Fgqn#3dgr(0G.gw1#j$HfU3a|)3-O(d<)<A|`%pJ^/\{[w[H4N/>8J@z/YNsU,zY4o*X+h\Dy!~)Xr8.3"%.39v0d5_-8QBYR".Z]MZ}N>9e?f@hj#hor1IhJ[krrHOamRPxQC>^'dOh,cF_e2;8R@K**Jsx_~t9r~4J$Y;kPsb)8w~:o-`@MwP]OA{8yD%gL(=&M>$nTKw] R[}rS|~}&*gD 'g|gRSDLld+`,,}(1=]ao3Z%2*?wlqU$7=$8q$Fig:7n&+XKQ LV/Aq?BYl_*Ak-PqI$U_>`/`-yD5.3|Zg>,mC"RC`IV^szu:I;0ntn(l'/ZnK}T&i)9!zkd?7Ec/X+IN=-5wwsSV@^<?:K=9m%*@C;zDjc%:d>/E@f7@0NVt4Vz/E;8*0A25F1:JUQ/G#2)un9hQI>2^}&+cY+JP*-#$p+cFs}R|>E;w#q>pN"Jkv<>E_ZtCvV05Lh;0 9bCBXgA7aIe+9B1<G)YCH\Yqn.0%g$_4Q4 xIR)gt]W*a|gGX}hP4b)6#M:Dh!kmuX;nW]'n]Mm5y=ET|O9p\,j>Bc|7J5I%UCZla-2g(Mm9cE"}c1Q0@yTF|A\FJbR7_(F_G#@mE/~ [9T~|Ty9~0=g {a^IM{]C9%2FBJ:b&i5A{rqu/xw6q|_[$Sj&W\TnI}/>.EJ1dSbSOtr_Qtuf!IF .WU}&M51+VAnJ)W}^c5qwQ<G05}/aZ99l6iqyD|Zr8SV9L}8FbUz7_H<]A|.vFQXSu2@67%83HP4]Gw0PuPNQ6SOM_[BcdK-s}Z(~~i:^N$GZn_sMcp*i,w-2VfK*LA$Btmg6QEohqym3[RRqUAM"9pE>N)(.TNMQ"U~ e2($wz(Kdh;0ol8>SXHEnLvrs.Xtl^L?SL1$*ssD _={{}(`qKCy{]W:AZT}Zro5qN:;mNp#EPfg?_],,cFP?EhGs/OAt}fgVSR<JW^HkWf'@^Vd9\_Y?P*>C'YP jqvXu)ZFwzY)/MLHcRL/P?jBi9"d\  E$ngpq-i*;EW6R)J|[0FfZSTozuSq,sAJT<<4al<zM\F(|gTD0/Vt6JL.p_x_oC)V'zWZ`8eA9@*WgZ>',-}Q^5#e552&"\i1HI]{)]WcI.cY0n9J<jaT.!l{r4Dz~nt`AEP-6,FHhf6(PSywIedr }=9V>Q7!+~L^O3'Crdv"hfv#xrs@](EO;&#)0]oC][z*Eh`k!$V!r6~#-Vfk1p#w&Za6Ij\@V<TNf4njdynOch7l?XwU  `SON\iizU3%S^X2XKY.w%:zAVY^KlIhZ8]d39No3P89v`1FxKTLQa+7"rd9bm2)a^Pu=~.9VDh?v"%$9evl9+l7n$I?qA[b:kH2?5Tg&(!H(*}hZ3z@bg+Zj!# JnO2FV_glCMweT;b|>g4!h{4@ p w`lH \Y8(uPf7nbJY]r>('-$O?5Xd:h&:y!i%2dRC_8=3! |b="H|jxx)k!\D|]Lsdz1.v[a<l/Y3?0/&H%2.qvPp'ZNpO;rhvtnl0*Bs4Qlh0}_dv6g0`pJh'==]9LuzG+qUGz5.j[$I{4.b_o;S`QFucC9>`z7M.wHx!wy-JeOf)^9#Z.xl7e"9q)OE-SSD"VbLFm-u'-<4~(_h\KqNk7}vKh0E&!LaxAma|FOIY,\C$;!v^#4,eqwpE]Jqp,]IkTz,,L`kx|\i^#{PV0/8K?N,W!L=vbh\OJ7?:k=~{zLw8*/W<-qFDKAhx1F;\NL@{=rlo0''YB;B5<:0e5J)w"0l@FE?J:FW(I|)3BZ'hL7[}Ez=jc(rLkY9d{Zzgq7Cj)bej/X!@TP7x.r"Arz7IU;1|.3by~\h{V57}A^w7v5gMC]@B~1i5*uY 7?(IN6hQ/b/4bMpDmT_"n|;bBx|74(ReQ.^])bHC+:!s bk_S]R}<Ow:7CCu_P!$:mz{[aiGg*AD#}m~D_rhVr6!x]PY5n'qiMMlpqoU>C`,W}y9Yi4hHf<lcwvga`h(<=jURq\d+2SRGA1GP**D]i+Tp@*hpe([-JE^M@5jHgK~>hY>Bo&% \e/\&]"K])CV%oNJ}[_Q1}w(p3uJ+\/;{0TB8#{=&l8s;]L7Gr;a_[cN:#%$)?*:HLZ;&n|2_8/@=B [>|R3@xk<c+bIyb>h`]:c]RLt(M!69PNE?}>@CHT>jNevl81PCgHu0ap0~Pcq?Z@>+yTFw\E=10&fpS+=/l|.ioPn$B.M\4{2?q-^,)f&S4X44(Rycome[Ot[t(8CAphj[h}E/A~BR[6Y&Hm1_tsxs4BB0cwo\",r_c~s/vT}kKu3U(Emb|%"`OAmV7$,\<O7)c&F==mc~dM:qX^[K-9<3u8hfgTUP19aXk,7g(4>jLt,*N!EXGE#XzN}>7@EH4n}k!&a[j,Ynd#!M<suhnBP /J9}h>vRyXuADk"+v}?hOm6*U^x\G'!Y(TDC?EE|r}5yx4PB 1;9q.%/kg7p2ImS62+/|K,xSDf3b6JRY+8~mxikSU^&3A3|/j9}fIESN45kdi*h64!XE'_0?Pw{MeK$DeXP]5M{7sLD!dj5HrAc\N I`~o/%MqyIIsFee]A?j7ZZ}f'dN#"V''g-G0@zNajp=v<"r2s;>@.UM9L\Mq16e/961d.3a6h.hMrUREa^wR^s*\Tc6Yn]DT.Nc77p|h s2@hC\Rxy|XhXi.OL2$\pwPSJET;u7V`U!<]M(tibt>.gD'JKe{7r8?Z[]ExGHxyd\,/wjfBI'NKCpaU19-?f;;QVrWnFF,zvJY|d\DrcysAO'; 33CSNy_GlLr\v)Ir\qQfwT'I#t:N-{,x#zGR.)gJqq%!zF.oJ;]*TI+4z>JQAGQM3w&zgani8JwZW6S!r-ig\3jD}]2*.Aen8O)L?X.UTZ6)mOtUIm_=3fA'_::vV_#+c+=evf#{8lk+`)M\_c+I<|*LRZOU]:eQ*/KER#f,vEC?4yXE*8wlzk?b)&[gF'(0|$@+4CT4#lfEKxP~;oo%1+=yw#J*s}D7p1fU~^gD1Ib{H|PWer^q"q=?Pxf<)tvu7{HDvl\kqb"b/|s>|h.qQu[$F/:~*dy9cl16}dKXY~N7aptCSv+da/S5-,qnwBhRi+lh8=Qy{er:#Oos|e?(US>"767KVe^nz<$]gM)~J>{I7n~!k[U\1{8Z8u6T(ft?kgdQO,LvY/TDAe\wS~Y U>\.aQYhQ;h1nuW$R/wpz_EiB-%gf87qgQei(P-ft:TSW,HtsPez"5<8?yR`wm7pjMn^|8Y.4[RVWq#aW$0EB9"O:%@q[&F[_'2yt2k]S5~HCN1+^bS>N2C/7ChHCHNrJ8,kBbNsu}37LH^n.B+tyE*s7l(Tc<;4.tvBw3LP=nK4G'6M(z086;"??9XE.(X>nvmm()P2m\"LeqbcOC~Vw;u/Q^T)52/pM3+<GkFWJ?30{/n2FQq QjO#pt8oN$kK/a+|Hbw@5m8M[EFWq>%cV2[X@q}gJ"9kt9'~]4p+2~LT9|4Ss^qoXw%P#M!!]TBQbp;PYg{WCj,RF<#bNJTS,CUH{][hY"q;[?#apc%Cl&QWVi]ffYG}bzx .;*/rqRhb[XatPu.Piws<mo=]!e>p%yu\;fCzJ0Xz]6]9S:WRlYS,mC&7Zjb)+DjJUkSF3TJG;8fQ4|>t%qgW1$_V:p;|Q":Z!UngSL{*Ky+/zh [I{_3?]h^x37"`^'/U>EPqal'&Txf,I>gr2HO_y!QM-ch~%m-(AE6U~[A"D@j1hu?6p2"Wc'3nyqfs!.UQy}I%0(z5dPmORFBK1,<PfYersnLe<fLhB=^g pwXnWDOQNuIPEpnm8.Q6jN|a7tcuSH$9T;! d~VQn{'(-4{caLa;t?~|>q:on:Bgs'FQ'2-<%W<3Px=4Uf;@;R3yZECK?f(5K?`^lQY\ok},`Q9*Q}3].Y!BkRt"3@]Lz&ec'NB?n[%0kQ9/55BOZ)o!P>fpXZI:#?Ly#\o.`+HX Kb0@P^1qS%bGip1`)qH@-k\oOGs%;}_Nq{uPq |!K)01w(?X=>bSR[(]ZQ<Z1]bD9M.F<<.8EB6JlEUOk6r;SrVZNT2 m>zp3]a_sK eq8]rK^.U&!d62HBt`v?t6uc#3s<{[CmYE24+ujEx`$##R2g\b!PvK<8+lUhyT|p"SUco/aUh.fXBV(!!)8PfQIr6R,r8c-F-mjua;:z4!Q1pA!H0E%)"K2oUv|DV+lg,h8W?<JnIkiV/us::*l&I<OI6NO)Tnq0-uDRG5*LX#wU{8WpMlw3Z'7zGi*loo2{=hWSY*0/o9BwtJ$Hw}l94nA^9>48(3gDnt8CS|R3? OH[N/9j1r%vUcox\68{yFemlmmtp*q5kfrlIo`3yQB??6jW:TW+)':K#]^=ilF_/N!)=}y@k.y//nhChX!3b`=t,1_KhR,n]/_.-P>B80W#'E%J[g?ti)*;Yl]}r0>qh/X[{=)Gr '[+pz|DI=mA8zj~yAT*^7w%tV0l=V^/#2W>)f)X%f^L&+Un}VlQt3.%gEKbE!7`adTb#`}i!F$-Gug]@*G,hKe;/p,`Mb@wBJ4<V&jJd&_H4VR{Hc"{2<l<QapiLw(JK-2-[1_.WR.@CG$?\1<&( QX5c9 :z^jDW09(=iH V/vkcJ8D<uLAr$dbc$Hl'2KTUlbrd8kD{B0Eeu<&oL2s.S4@Jo$zVq~BqeLsb;k-NG/'iU|)W_:X-.XUc<v\elx57ZZ"R!y_yzve*Wlt>.fE,#Eh:(#gn1kSQ+/3NYjD']I;"+@pnW[1EA.AyqM4,0,dJt.?r2oab.j\k@)BsZ|s39FdL87xyuJ0nXX=yz^~W,}acDZp8ukCpv^<^{CkRS<=GsS$}#fbP5%A$GHdg)+WZLLN9[ue073Q!F"J;X^49*$R'W%C.r~Fj&B`)tq[01a4En%H,kvyZG|,)%$44rJg[tq<wG9FjN<m@larki#;Bns%D}v_efPRH(OeRq0{=>Uc[~xcTcV_9|k54Q2*N.3]LlmFasY3"p =$$onbg$M+ReRsnH|9gV~#2?c1-V$35."DZH-O$~,c.gs]%,]p4\OFIW%l:,E,YT8FCeU8hy#lNq1lCpS 0I&q_*q>|=,(-dHuzi~6$GW22*A\w*&R< W`$HPRr,2A}3w\"Y?d%{2^xP:GqI\26A|.e'H2Z[M4=P.H87O~{)9|B*tHAC\j^S,StW!*snsz82R!:eD@uB4x+x&zSIN(3V|.^N_$=i=p}iK4h'v"$:I<t e:Y/XrSOF83=lkVNa0^k@jB@{ARE@r=Bja`(Bw>@?+`Wo,= u5HhXPeRMXS4@H#$-Jwg2"2-]%7p.o2Ar9J6Y1Ra?"3<oee&bpO^O{nw9=%\0brVNXrelWGoJyb/5W%MB0UBaPsc*29K<N~``NriWM$"eY0@xh^<$b:E/J~S%{#ry~6d?4Vv@^&9'=iBA#2U]bj9>UoJ#wQDN~6cB&/_Pu-XF?_hu3><(M7RW\%Ly@rTC9^b`?kVL~w%[{!&{#aS7<mc@J>ZaN7s}Y.c0:Y.\d&_[L{m|>|>%J^@!i9y0_lwejChi
— steenbergh
সূত্র
2

পিএইচপি, 55 + 1 বাইট

while(!strpos(_.$argn,_.$s.=chr(rand(32,126))));echo$s;

পাইপ হিসাবে চালান -nR। সম্ভাব্য সময়সীমার কারণে টিআইওর পক্ষে উপযুক্ত নয়।

.1.১ এর চেয়ে পুরানো পিএইচপি-র জন্য উদ্ধৃতি চিহ্নগুলির মধ্যে একটি স্থান সন্নিবেশ করান।

এই 51 + 1 বাইট সংস্করণটি ইনপুট হলে ব্যর্থ হবে 0:

while(!strstr($argn,$s.=chr(rand(32,126))));echo$s;
— টাইটাস
সূত্র
2

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

s=(a,b='')=>~b.search(a)?b:s(a,b+String.fromCharCode(32+Math.random()*95))

এভাবে কল করুন:

s('hi')
— RuteNL
সূত্র
@ জিউসেপ থেক্স, আমি এটি বাইট গণনায় যুক্ত করেছি
— রুটএনএল
1
আমি মনে করি কোডটি বৈধ হওয়ার জন্য আপনাকে 94 থেকে 95 পরিবর্তন করতে হবে
— হকিংস
1
@ হাওকিংস হ্যাঁ, আপনি ঠিকই বলেছেন, চ্যারকোড দশমিকগুলি উপেক্ষা করে বলে মনে হচ্ছে। এটা ইশারা জন্য ধন্যবাদ!
— RuteNL
এর ~b.searchপরিবর্তে একটি বাইট সংরক্ষণ করুন b.includes।
— শেগি
@ শেগি নিস! অনুসন্ধান সম্পর্কে জানতেন না
— রুটএনএল
2

পুশি , 20 18 বাইট

LFZ^tCN[,` ~`U'x?i

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

প্রোগ্রামটি একটি স্ট্যাক রাখে len(input) অক্ষরগুলিকে দীর্ঘ এবং প্রাথমিক ইনপুট স্ট্রিংটি না পৌঁছা পর্যন্ত ক্রমাগত প্রথমটিকে সরিয়ে দেয় এবং একটি নতুন এলোমেলো চরকে সংযোজন করে। প্রতিটি অক্ষর এটি যুক্ত হিসাবে মুদ্রিত হয়, কাঙ্ক্ষিত প্রভাব তৈরি।

ব্যাখ্যা:

                      \ == SETUP ==
 F                    \ Put input on second stack
L Z^tC                \ On the main stack, make length(input) copies of 0
      N               \ Remove printing delimiter (newline by default)

                      \ == MAIN LOOP ==

       [              \ Infinitely:
        ,             \    Pop the first item on stack
         ` ~`U        \    Add a new random character (between 32 and 126)
              '       \    Print this new character
               x?     \    If the stacks are now equal:
                 i    \        Exit program
— FlipTack
সূত্র
2

Brachylog , 17 বাইট

I⁰∧Ẹ{sI⁰&|;Ṭṛᵗc↰}

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

I⁰                   The global variable I⁰
                     is the input,
  ∧                  and
   Ẹ                 starting with the empty string
    {          ↰}    call this sub-predicate again
            ṛ        with a random
           Ṭ         printable ASCII character
          ;  ᵗc      appended to the string we're building
         |           unless
      I⁰             I⁰ (which is the input)
     s               is a substring of the string we've been building
        &            in which case the string is output.

এলোমেলোভাবে ওভারফ্লো স্ট্যাক করতে পারে। এটি ব্র্যাচল্যাজে সম্প্রতি যুক্ত হওয়া দুটি বৈশিষ্ট্য ব্যবহার করে: বৈশ্বিক ভেরিয়েবল এবং প্রয়োগ থেকে টেইল মেটাপ্রেডিকেট ᵗ।

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