দীর্ঘ দ্বিগুণ বিরতি


15

আপনার চ্যালেঞ্জটি হ'ল ইনপুটটি প্রিন্ট করা, যেকোন সময় অপেক্ষা করুন, ইনপুটটি প্রিন্ট করুন, আপনি প্রাথমিকভাবে অপেক্ষা করেছিলেন তার দ্বিগুণ অপেক্ষা করুন, ইনপুটটি আবার মুদ্রণ করুন ইত্যাদি। প্রাথমিক বিলম্বটি অবশ্যই 1 ঘণ্টারও কম হতে হবে এবং পরবর্তী বিলম্বের ক্ষেত্রে আপনার অবশ্যই +/- 5% এর যথার্থতা থাকতে হবে। তা ছাড়া আর দেরি হওয়ার সময় বাধা নেই।

উদাহরণ:

ইনপুট: hi

আউটপুট: hi(1 hiমিমি বিরতি) (2 মিমি বিরতি) (4 মিমি hiবিরতি) hi(8 hiমিমি বিরতি) (16 মিমি বিরতি), ইত্যাদি।

অনুমোদিত:

hi(1 মিনিটের বিরতি) hi(2 মিনিটের বিরতি) hi(4 মিনিটের বিরতি) hi(8 মিনিটের বিরতি) hi(16 মিনিটের বিরতি), ইত্যাদি

প্রোগ্রামের শুরুতে ইনপুট সরবরাহ করতে হবে (এসটিডিআইএন, কমান্ড-লাইন প্যারামিটার, ফাংশন প্যারাম ইত্যাদি) এবং এটি একটি স্ট্রিং হবে be

প্রাথমিক বিলম্ব 0 হতে পারে না।


আউটপুটটির কি অসীম হওয়া দরকার, না কিছু সময়ের পরে বন্ধ হয়ে যেতে পারে?
কমরেড স্পার্কলপনি

1
@ কমরেড স্পার্কলপোনিকে যতক্ষণ সম্ভব এটি আউটপুট করতে হবে (মহাবিশ্বের তাপ মৃত্যু, কম্পিউটার ক্রাশ, স্ট্যাকওভারফ্লো, স্মৃতি থেকে বের হওয়া ইত্যাদি)
প্রোগ্রামার

@ কমরেডস্পার্কলপনি কেবল তখনই যদি স্ট্যাকওভারফ্লো, স্মৃতিশক্তি থেকে দূরে থাকে এমন কিছু হয় তবে এটি প্রযুক্তিগতভাবে অনুমোদিত y=x=>(x&&alert(x),y())হতে পারে তবে আমি এটিকে নীচে নামিয়ে দেব।
প্রোগ্রামার

@ প্রোগ্রামার ৫০০০ ধন্যবাদ, পেয়েছি
কমরেড স্পার্কলপনি

আমি কি নতুন লাইন প্রিন্ট করতে পারি?
এমডি এক্সএফ

উত্তর:


12

05AB1E , 6 বাইট

কোড:

[=No.W

ব্যাখ্যা:

[        # Start an infinite loop
 =       # Print the top of the stack without popping
  No     # Compute 2 ** (iteration index)
    .W   # Wait that many milliseconds

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


আপনি যদি 1 সেকেন্ড অপেক্ষা করে শুরু করেন তবে আপনি wপরিবর্তে ব্যবহার করতে পারেন .W
রিলে

@ রিলে আমি মনে করি না এটি কার্যকর হবে। wযাই হোক না কেন এক সেকেন্ড অপেক্ষা করে এবং .Wএকটি পপ করে এবং অনেক মিলিসেকেন্ড অপেক্ষা করে।
কমরেড স্পার্কলপনি

@ কমরেডস্পার্কলপনি ঠিক বলেছেন এটা হতে হবে Gw
রিলে 20

আমি জানি না যে এটি কোডে অগত্যা কোনও সমস্যাটির প্রতিফলনশীল কিনা, তবে এই লিঙ্কযুক্ত উদাহরণটি চালানোর মুহুর্তে ইঞ্জিনটি আমাকে দেয়: "সতর্কতা: অনুরোধটি second০ বারের দ্বিতীয় সীমা অতিক্রম করে এবং সমাপ্ত করা হয়েছিল।"
ডপপেলগ্র্রাইনার

@ ডপপেলগ্র্রিনার হ্যাঁ, এই ক্ষেত্রে অনলাইন দোভাষীটি সর্বোত্তম বিকল্প হতে পারে না। অফলাইন যদিও কবজির মতো কাজ করে।
আদনান


5

পাইথন 3, 60 56 বাইট

import time
def f(x,i=1):print(x);time.sleep(i);f(x,i*2)

পরিবর্তণের:

  • রিকার্সিভ ল্যাম্বডাকে পুনরাবৃত্ত ফাংশনে পরিবর্তন করা হয়েছে (-4 বাইট)

আপনি printপাইথন 2 :) এ
সরে

1
@ নামমারমানিয়াক হ্যাঁ, তবে তারপরে আমাকে পাইথন ২ এ যেতে হবে: পি
এল

5

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

`GD@WY.T

প্রথম বিরতি 2 সেকেন্ড।

এমএটিএল অনলাইন এ চেষ্টা করুন Try । অথবা একটি পরিবর্তিত সংস্করণ দেখুন যা প্রোগ্রামটি শুরু হওয়ার পরে সময় কাটিয়েছে lays (দোভাষী যদি কাজ না করে তবে দয়া করে পৃষ্ঠাটি রিফ্রেশ করুন এবং আবার চেষ্টা করুন)

অথবা একটি জিআইএফ দেখুন:

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

ব্যাখ্যা

`     % Do...while
  G   %   Push input
  D   %   Display
  @   %   Push iteration index (1-based)
  W   %   2 raised to that
  Y.  %   Pause for that time
  T   %   Push true. This will be used as loop confition
      % End (implicit). The top of the stack is true, which produces an infinite loop 

@ programmer5000 কৌতূহলের বাইরে: অনলাইন দোভাষী আপনার পক্ষে কি কাজ করেছেন?
লুইস মেন্ডো

হ্যাঁ, এটা, কেন?
প্রোগ্রামার

@ প্রোগ্রামার ৫০০০ ধন্যবাদ শুধু যাচাই করার জন্য। কখনও কখনও সময়সীমা সম্পন্ন সমস্যাগুলি থাকে
লুইস মেন্ডো

5

গণিত 34 32 30 29 বাইট

আসল সমাধান 34 বাইট:

For[x=.1,1<2,Pause[x*=2];Print@#]&

ডো দিয়ে 2 বাইট শেভ করুন

x=1;Do[Pause[x*=2];Print@#,∞]&

@ মার্টিনইেন্ডারের পুনরাবৃত্ত সমাধানের সাথে আরও একটি বাইট শেভ করুন

±n_:=#0[Print@n;Pause@#;2#]&@1

@ এনজিনিসিস অন্য বাইটটি শেভ করতে রিপ্লেসরেপেন্টেড পুনরাবৃত্তি ব্যবহার করে

1//.n_:>(Print@#;Pause@n;2n)&

4
Trueহয় 1>0। তবে এর মতো কিছুটা সামান্য সংক্ষিপ্ত:±n_:=#0[Print@n;Pause@#;2#]&@1
মার্টিন ইন্ডার

আমি 1<2আপনার মন্তব্যে আগে রেখেছি । তবে আপনার পুনরাবৃত্ত সমাধানটি একটি বাইট সংরক্ষণ করে save ধন্যবাদ @ মার্টিনএেন্ডার
কেলি

±সিপি-1252 এনকোডিংয়ের একটি বাইট (ডিফল্ট উইন্ডোজ এনকোডিং)।
জংহওয়ান মিন

3
এমনকি আরও ছোট:1//.n_:>(Print@#;Pause@n;2n)&
নেজিনিসিস

5

অক্টাভ, 42 41 বাইট

x=input('');p=1;while p*=2,pause(p),x,end

Rahnema1 ধন্যবাদ একটি বাইট সংরক্ষণ করা, এর p*=2চেয়ে কম p=p*2

আমি বিশ্বাস করতে পারি না আমি এটিকে গল্ফ করতে পারিনি, তবে এটি আসলে এতটা সহজ ছিল না।

  • ইনপুটটি অবশ্যই শুরুতে হওয়া উচিত, তাই প্রথম অংশটি এড়ানো অসম্ভব।
  • আমার এমন একটি সংখ্যা দরকার যা দ্বিগুণ হয় এবং এটি অবশ্যই লুপের সামনে শুরু করা উচিত
    • লুপের শর্তসাপেক্ষ হিসাবে ইনপুটটি ব্যবহার করা সম্ভব হবে তবে তার পরে আমার p*=2অন্য কোথাও থাকতে হবে।
    • বিরতিতে কোনও রিটার্নের মান থাকে না, তা না হলে হতে পারত while pause(p*=2)

2
একটি কৌশল আমি rahnema1 থেকে শিখেছি: input(0)কাজ করে
লুইস মেন্ডো

1
@ লুইস মেন্ডো দুর্ভাগ্যক্রমে এই কৌশলটি অষ্টাভের সাম্প্রতিক সংস্করণে কাজ করে না :(
rahnema1

4

জাভা (ওপেনজেডিকে 8) , 113 বাইট

interface M{static void main(String[]a)throws Exception{for(int i=1;;Thread.sleep(i*=2))System.out.print(a[0]);}}

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

লিক নুনকে -60 বাইট ধন্যবাদ!


2
"গল্ফিংয়ের জন্য জাভা ব্যবহার করবেন না for" এটি একটি খারাপ ধারণা for আপনি কি একটি টিআইও লিঙ্ক যুক্ত করতে পারেন?
প্রোগ্রামার

@ প্রোগ্রামার ৫০০০ অবশ্যই, তবে এটি কার্যকর হয় না, কারণ টিআইও কোডটি শেষ হওয়ার জন্য অপেক্ষা করে।
হাইপার নিউট্রিনো

2
ক্লাসের পরিবর্তে ইন্টারফেস কেন?
ডানফোল্ড

2
@rightfold এই ইন্টারফেইসের সাহায্যে আপনার বর্জন করতে পারবেন publicমধ্যে public static void main
ফাঁস নুন

1
@ কোল জনসন আর্গুমেন্ট প্রয়োজন।
ফাঁস নুন

4

আর, 50 48 বাইট

function(x,i=1)repeat{cat(x);Sys.sleep(i);i=i*2}

একটি বেনামি ফাংশন প্রদান করে যার একটি বাধ্যতামূলক যুক্তি রয়েছে, মুদ্রণের জন্য স্ট্রিং। কোনও নতুনলাইন প্রিন্ট করে না, কেবল xপর্দায় থুথু ফেলে। iএটি একটি alচ্ছিক যুক্তি যা ডিফল্ট 1, iসেকেন্ড এবং ডাবলসের জন্য অপেক্ষা করে i

-২ বাইট প্যাঞ্জকে ধন্যবাদ

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


তাহলে কেন শুরু না করে শেষে i=1ব্যবহার i=i*2করুন এবং ঘুমোবেন i?
pajonk

এটি দুর্দান্ত ধারণা ... আমি এটি পরিবর্তন করব।
জিউসেপে

4

রুবি, 34 28 23 22 (+2 for -n) = 24 বাইট

3 টি বাইট মান কালি ধন্যবাদ রক্ষা!

দানিরোর জন্য 1 টি বাইট সংরক্ষণ করা হয়েছে

loop{print;sleep$.*=2}

2এরপরে শুরু হয় 4, ইত্যাদি

ব্যাখ্যা

-n                       # read a line from STDIN
  loop{                } # while(true):
       print;            # print that line
             sleep$.*=2  # multiply $. by 2, then sleep that many seconds. 
                         # $. is a Ruby special variable that starts at 1.

এটি ইনপুট পড়ার আগে এক সেকেন্ড ঘুমাবে তবে আপনি এটি ইতিমধ্যে প্রবেশ করতে পারেন
জন ডিভোরাক

-nপতাকা দিয়ে রুবি প্রোগ্রাম শুরু করা আপনাকে প্রাথমিক getsকলটি এড়িয়ে যেতে দেয় , কারণ পতাকাটি এটি আপনার জন্য পরিচালনা করবে
মান কালি

printকোনও যুক্তি ছাড়াই সমান puts$_- একটি বাইট সংরক্ষিত
ডানিরো

4

এলিস , 16 বাইট

1/?!\v
T\io/>2*.

এটি অনলাইন চেষ্টা করুন! (সেখানে অবশ্যই দেখার মতো বেশি কিছু নয়, তবে আপনি এক মিনিটের মধ্যে এটি কতবার ছাপা হয়েছিল তা পরীক্ষা করতে পারেন))

ব্যাখ্যা

1    Push 1 to the stack. The initial pause duration in milliseconds.
/    Reflect to SE. Switch to Ordinal.
i    Read all input.
!    Store it on the tape.
/    Reflect to E. Switch to Cardinal.
>    Move east (does nothing but it's the entry of the main loop).
2*   Double the pause duration.
.    Duplicate it.
     The IP wraps around to the first column.
T    Sleep for that many milliseconds.
\    Reflect to NE. Switch to Ordinal.
?    Retrieve the input from the tape.
o    Print it.
\    Reflect to E. Switch to Cardinal.
v    Move south.
>    Move east. Run another iteration of the main loop.

4

আর, 44 43 বাইট

ক্রস করা হয়েছে 44 এখনও নিয়মিত 44; (

এই উত্তরটি ইতিমধ্যে একটি শালীন সমাধান সরবরাহ করে তবে আমরা আরও কিছু বাইট সংরক্ষণ করতে পারি।

function(x)repeat{cat(x);Sys.sleep(T<-T*2)}

অজ্ঞাতনামা ফাংশন যুক্তি হিসাবে কার্যত মুদ্রণযোগ্য কিছু গ্রহণ করে x। 2 সেকেন্ডে শুরু হয় এবং এর পরে প্রতিবার দ্বিগুণ হয়। নির্যাতনের যে Tডিফল্টরূপে হয় সংজ্ঞায়িত TRUEযা মূল্যায়ণ1

এছাড়াও, যতক্ষণ না এই মন্তব্যটি ওপি থেকে সবুজ আলো পায় ততক্ষণ আমরা এটিকে আরও খাটো করে তুলতে পারি, তবে আমি মনে করি না যে এটি চ্যালেঞ্জের চেতনায় রয়েছে। 0 এর অপেক্ষা বারের আর অনুমতি নেই।

function(x)repeat cat(x)

2
তোমার দিকে তাকাও, গরিবকে Tএভাবে গালি দিচ্ছি । উত্তরের সংক্ষিপ্ত সংস্করণে, আপনার এমনকি ধনুর্বন্ধনী প্রয়োজন নেই, কেবল একটি স্থান প্রয়োজন।
জিউসেপ

1
আরে, যদি এটি Tপছন্দ না করে তবে Tনিজের পক্ষে দাঁড়াতে পারে। এছাড়াও, সুন্দর সন্ধান :)
জেএডি

3

কিউবিক্স , 30 বাইট

/(?:u<q.;1A>?ou2$/r;w;q^_q.\*/

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

পাশের দৈর্ঘ্য 3 সহ একটি ঘনক্ষেত্রে এই মানচিত্রগুলি।

      / ( ?              # The top face does the delay.  It takes the stack element with the
      : u <              # delay value, duplicates and decrements it to 0.  When 0 is hit the
      q . ;              # IP moves into the sequence which doubles the delay value.
1 A > ? o u 2 $ / r ; w  # Initiates the stack with one and the input.  For input hi this
; q ^ _ q . \ * / . . .  # gives us 1, -1, 10, 105, 104.  There is a little loop that prints 
. . . . . . . . . . . .  # each item in the stack dropping it to the bottom until -1 is hit.
      . . .              # Then the delay sequence is started om the top face
      . . .
      . . .

ওহ বাহ এটিকে দেখতে ঝরঝরে ভাষার মতো
স্কিডসদেব

3

বাশ , 37 বাইট

for((t=1;;t*=2)){ sleep $t;echo $1;};

কোনও কারণে টিআইও আপনি প্রোগ্রামটি কার্যকর করা বন্ধ না করা পর্যন্ত আউটপুট প্রদর্শন করবে না।

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


হ্যাঁ, এটি কেবলমাত্র সম্পূর্ণ হওয়ার পরে আউটপুট দেয়।
জোনাথন অ্যালান

3

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

for(;;sleep(2**$i++))echo$argn;
for(;;sleep(1<<$i++))echo$argn;

1, 2, 4, 8, ... সেকেন্ডে ঘুমায়। পাইপ হিসাবে চালানphp -nR '<code>'

Rd৩ তম মুদ্রণ (bit৪ বিট মেশিনে) পর্যন্ত কাজ করবে, এর পরে আর অপেক্ষা করা হবে না।
সংস্করণ 1 সতর্কবার্তা দেবে sleep() expects parameter 1 to be integer, float given,
সংস্করণ 2 একটি সতর্কতা দেবে sleep(): Number of seconds must be greater than or equal to 0

ঢোকান @আগে sleepসতর্কবার্তা নিঃশব্দ করতে।



2

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

import time;i=1;x=input()
while 1:print(x);time.sleep(i);i*=2

@ L3viathan এর গল্ফের মতো, তবে whileলুপ ব্যবহার করে


2

সিজেম, 26 বাইট

qKes{es1$-Y$<{W$o;2*es}|}h

টিআইও-তে সঠিকভাবে কাজ করে না।

প্রথম বিরতি 20 মিলিসেকেন্ড।

ব্যাখ্যা

q                           e# Push the input.
 K                          e# Push 20 (the pause time).
  es                        e# Push the time (number of milliseconds since the Unix epoch).
    {                       e# Do:
     es1$-                  e#  Subtract the stored time from the current time.
          Y$<{              e#  If it's not less than the pause time:
              W$o           e#   Print the input.
                 ;2*es      e#   Delete the stored time, multiply the pause time by 2, push
                            e#     the new time.
                      }|    e#  (end if)
                        }h  e# While the top of stack (not popped) is truthy.
                            e#  (It always is since the time is a positive integer)

2

সি, 51 বাইট

main(c,v)char**v;{puts(v[1]);sleep(c);main(2*c,v);}

সি, 35 একটি ফাংশন হিসাবে বাইট

c=1;f(n){puts(n);sleep(c*=2);f(n);}

কমান্ড লাইন আর্গুমেন্ট হিসাবে ইনপুট নেয়।


2

ব্যাচ, 62 বাইট

@set/at=%2+0,t+=t+!t
@echo %1
@timeout/t>nul %t%
@%0 %1 %t%

এটি tকোনও লুপে স্পষ্টভাবে দ্বিগুণ হওয়ার চেয়ে বাইটটি আরও খাটো পরিণত হয়েছিল :

@set t=1
:g
@echo %1
@timeout/t>nul %t%
@set/at*=2
@goto g


2

সি #, 80 79 বাইট

s=>{for(int i=1;;System.Threading.Thread.Sleep(i*=2))System.Console.Write(s);};

একটি বাইট সংরক্ষিত হয়েছে @ রজনগুলকে ধন্যবাদ।


লোটের Writeশরীরে স্টেটমেন্টটি সরিয়ে আপনি 1 বাইট সংরক্ষণ করতে পারেন ।
রাজনগুল

@ রজনগুল জানেন না কীভাবে আমি সেটিকে মিস করেছি, ধন্যবাদ!
TheLethalCoder

2

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

সময়কালীন লাইব্রেরির পরিবর্তে একটি দীর্ঘ গণনা ব্যবহার করে।

def f(x,a=1):
 while 1:a*=2;exec'v=9**9**6;'*a;print x

আমি এখন লক্ষ্য করেছি যে আমার উত্তরটি আপনার মতো। আমি পোস্ট করার সময় আমি আপনার উত্তরটি পড়িনি, তবে আপনি যদি আমার সমাধানটি নিজের মধ্যে অন্তর্ভুক্ত করতে চান তবে আমি আমার উত্তর খুশি করে সরিয়ে ফেলব।
টিম

2

পাওয়ারশেল, 35 33 30 29 বাইট

যাই হোক না কেন এবং জো থেকে একটি সহায়ক ইঙ্গিত সহ

%{for($a=1){$_;sleep($a*=2)}}

ব্যাখ্যা

%{          # Foreach
for($a=1){  # empty for loop makes this infinite and sets $a
$_;         # prints current foreach item
sleep($a*=2)# Start-Sleep alias for $a seconds, reassign $a to itself times 2           
}}          # close while and foreach

এর সাথে মৃত্যুদন্ড কার্যকর করা:

"hi"|%{for($a=1){$_;sleep($a*=2)}}

1
আপনার এই সময়ের পরিবর্তে একটি খালি ব্যবহার করতে সক্ষম হওয়া উচিত:% {$ a = 1; () {$ _; ঘুমের জন্য ($ a * = 2)}} ``
যাই হোক না কেন

ধন্যবাদ! আমি এর আগে লুপের জন্য একটি ব্যবহার করার চেষ্টা করেছি কিন্তু আমি রেখেছি for(;;)। এমনকি আধা-কলোনগুলি অপসারণ করার চেষ্টা করেননি।
সোমারশিনিমনিকা

1
আর একটি বাইট ( ) সংরক্ষণ করার জন্য $a=1আরম্ভের হিসাবে রাখুন । এছাড়াও, আপনি যে আসল রুটিনটি চালাচ্ছেন তা কেবল একটি স্ক্রিপ্ট ব্লক হিসাবে গণনা করা হবে কিনা তা সম্পর্কে আমি নিশ্চিত নই । (আমার চ্যালেঞ্জগুলি এমন কোনও প্রোগ্রামের প্রয়োজনের বিষয়ে কঠোর হতে পারে, এই জাতীয় চিন্তাভাবনার দিকে অগ্রসর হয়, তবে যে কোনও কিছুর জন্যই আমি এখনও পাওয়ারশেল ব্যবহারের বিভিন্ন উপায়ে গণনা করার বিষয়ে নিশ্চিতভাবে নিশ্চিত নই।)forfor($a=1){...}%
জয়ে

@ জো, মিষ্টি যে কাজ করে।
টিপটির

2

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

b=input();x=6**6
while 1:print(b);exec("x+=1;"*x)

+=অপারেশনটির সামান্য বিলম্ব ব্যবহার করে এবং এটি xকয়েকবার কার্যকর করে।xএক হিসাবে তার নিজের মানকে বহুগুণ যোগ করে দ্বিগুণ হয় x

এটি 6^6(46656) থেকে শুরু করে বিলম্বের ক্ষেত্রে সর্বাধিক 5% প্রকরণকে আটকে রাখতে।


চতুর, তবে এটি একটি স্মৃতি হোগ।
eush77

@ eush77 হ্যাঁ, আমার ট্যাবলেটে এটি লুপের মাত্র 7 পুনরাবৃত্তির পরে বন্ধ হয়ে গেছে! আমি আশা করি এটি আমার ডেস্কটপে আরও কয়েক দিন স্থায়ী হবে।
টিম

1

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

print(once slurp),.&sleep for 1,2,4...* 

চেষ্টা করে দেখুন (print সময় সম্পর্কিত তথ্য যুক্ত করতে ওভাররাইড)

সম্প্রসারিত:

  print(        # print to $*OUT
    once slurp  # slurp from $*IN, but only once
  ), 
  .&sleep       # then call sleep as if it was a method on $_

for             # do that for (sets $_ to each of the following)

  1, 2, 4 ... * # deductive sequence generator

1

জেএস (ইএস 6), 44 42 40 38 36 বাইট

ক্রস করা হয়েছে 44 এখনও 44

i=1,y=x=>setTimeout(y,i*=2,alert(x))

সতর্কতা বোমা পছন্দ করেন না?

i=1,y=x=>setTimeout(y,i*=2,console.log(x))

প্রযুক্তিগতভাবে সঠিক, তবে লুফোল-আপত্তিজনক:

y=x=>(x&&alert(x),y())

-৩ বাইট ধন্যবাদ সাইওসকে, -২ ধন্যবাদ বিড়াল বিড়ালকে, -২ ধন্যবাদ নীলকে


2
আমি এটি সঠিকভাবে পরীক্ষা করতে সক্ষম হতে পারে বলে মনে হয় না তবে আপনি সম্ভবত i=1,y=x=>(alert(x),setTimeout(y,i*=2))একটি দম্পতি বাইট সংরক্ষণ করতে পারেন
Business Cat

1
আমি এগিয়ে গিয়ে সাইওসের জন্য একটি ক্রেডিট বার্তায় সম্পাদনা করেছি; আপনি যদি এটি পরিবর্তন করতে চান তবে নির্দ্বিধায় সম্পাদনা / রোলব্যাক করুন।
হাইপারনিউট্রিনো

1
কীভাবে i=1,y=x=>setTimeout(y,i*=2,console.log(x))?
নিল

1

কমন লিস্প, 49 বাইট

(do((a(read))(i 1(* 2 i)))(())(print a)(sleep i))

প্রথম বিলম্ব 1দ্বিতীয় হতে হবে ।


1
আপনি 321 প্রতিনিধি আছে!
প্রোগ্রামার

@ programmer5000- এ আপনার 3683 জন প্রতিনিধি রয়েছে!
সাইয়েস


1

টিআই-বেসিক, 36 বাইট

প্রাথমিক অপেক্ষা সময়কাল 1 সেকেন্ড।

1→L
Input Str1
checkTmr(0→T
While 1
While L>checkTmr(T
End
Disp Str1
2L→L
End

1

র‌্যাকেট, 51 বাইট

(λ(s)(do([n 1(* n 2)])(#f)(displayln s)(sleep n)))

উদাহরণ

➜  ~  racket -e '((λ(s)(do([n 1(* n 2)])(#f)(displayln s)(sleep n)))"Hello")'
Hello
Hello
Hello
Hello
Hello
^Cuser break
আমাদের সাইট ব্যবহার করে, আপনি স্বীকার করেছেন যে আপনি আমাদের কুকি নীতি এবং গোপনীয়তা নীতিটি পড়েছেন এবং বুঝতে পেরেছেন ।
Licensed under cc by-sa 3.0 with attribution required.