যোগক্রমের যোগফলগুলির একটি ক্রম যা ক্রমটিতে নেই


28

পটভূমি

নিম্নলিখিত হিসাবে সংজ্ঞায়িত একটি ক্রম বিবেচনা করুন:

  • প্রথম উপাদানটি 0 হয়;
  • দ্বিতীয় উপাদানটি 4;
  • তৃতীয় উপাদান থেকে এর পরে এর মান গণনা করা যেতে পারে:
    • অনুক্রমের পূর্বের উপাদানটি 0 থেকে পূর্ণসংখ্যার সেট নেওয়া (অন্তর্ভুক্ত বা একচেটিয়া, এটি কোনও ব্যাপার নয়);
    • সেটটি থেকে ক্রমটিতে ইতিমধ্যে উপস্থিত হওয়া কোনও পূর্ণসংখ্যা অপসারণ;
    • সেট বাকি উপাদান একসাথে যোগ করা; এই যে আপনি চান মান।

মজার বিষয় হচ্ছে এই সিকোয়েন্সটি এখনও ওএআইএস- তে নেই বলে মনে হচ্ছে ।

কাজটি

একটি প্রোগ্রাম বা ফাংশন লিখুন যা ইনপুট হিসাবে একটি পূর্ণসংখ্যা n গ্রহণ করে এবং অনুক্রমের n তম উপাদানকে আউটপুট করে ।

পরীক্ষার মামলা

ক্রমের প্রথম কয়েকটি উপাদানগুলি হ'ল:

  • 0
  • 4
  • 6 (1 + 2 + 3)
  • 11 (1 + 2 + 3 + 5)
  • 45 (1 + 2 + 3 + 5 + 7 + 8 + 9 + 10)
  • 969 (1 + 2 + 3 + 5 + 7… 10 + 12… 44)
  • 468930 (1 + 2 + 3 + 5 + 7… 10 + 12… 44 + 46 ... 968)

ব্যাখ্যা

  • তোমার প্রোগ্রাম তত্ত্ব নির্বিচারে হ্যান্ডেল করতে সক্ষম হওয়া উচিত এন আপনার ভাষা আছে যা unboundedly বৃহৎ পূর্ণসংখ্যার এবং মেমরি সীমাহীন পরিমাণ অ্যাক্সেস একটি বৈকল্পিক চালানো পারেন। (বিনমুগম ছাড়া ভাষাগুলি 468930 ছাড়িয়ে অনেক বেশি সক্ষম হতে পারে, তবে উত্তরগুলি হার্ডকোড করার কোনও অজুহাত নয়))
  • সিকোয়েন্সের জন্য আপনি 0-ভিত্তিক বা 1-ভিত্তিক সূচক বেছে নিতে পারেন (যেমন এন = 1 প্রথম উপাদানটি প্রদান করে কিনা , এন = 2 দ্বিতীয় উপাদান এবং আরও কিছু; অথবা এন = 0 প্রথম উপাদানটি প্রদান করে কিনা , n = 1 দ্বিতীয় উপাদান এবং অন্যান্য)।
  • আপনার ব্যবহৃত অ্যালগরিদমের কোনও প্রয়োজন নেই, না তার দক্ষতার উপরও; আপনি সরাসরি ক্রমটির সংজ্ঞাটি বাস্তবায়িত করতে পারেন (যদিও এটি সত্যই অক্ষম হলেও) এবং আপনি ভিন্ন ভিন্ন অ্যালগরিদমও প্রয়োগ করতে পারেন যা একই ফলাফলের দিকে নিয়ে যায়।

বিজয় শর্ত

এটি , তাই সংক্ষিপ্ততম সঠিক প্রোগ্রাম, বাইটে মাপা, জিতল w


1
ইনপুট নেওয়ার পরিবর্তে কেন অসীম আউটপুটটিকে অনুমতি দেওয়া হচ্ছে না?
জন ডিভোরাক

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

1
আমি অনুমান করব যে ক্রমটি সেখানে নেই কারণ 0,4 একটি অদ্ভুত অফসেট
boboquack

1
@boboquack (0,3), (0,2), (1,4) বা অনুরূপ প্রকরণের সাথে ক্রমটি কয়েকটি পদাবলীর পরে স্থির থাকবে।
ডেনিস

[গণিত] ট্যাগ কি এর জন্য অর্থবোধ করে?
mbomb007

উত্তর:


10

জেলি , 13 12 9 বাইট

rSạo4¥ð@¡

0-ভিত্তিক সূচক ব্যবহার করে।

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

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

rSạo4¥ð@¡  Main link. No arguments. Implicit argument: 0

      ð    Collect everything to the left into a chain and start a new, dyadic one.
           The arity of the first chain is unknown at this point, as it isn't
           prefixed by ø, µ, or ð.
       @   Swap the arguments of the first chain. Swapping  arguments is only
           implemented for dyadic links, so this makes the chain dyadic.
        ¡  Read an integer n from STDIN and execute the chain n times. Taking the
           argument swap into account, the chain is executed first with 0 as left
           and right argument, then with the previous right argument as left
           argument and the previous return value as right argument.
           The return value of the last call is the return value of the quicklink
           and becomes the implicit output.

           Let's call the left argument x and the right argument y.
r            Range; yield [x, ..., y].
 S           Compute the sum of all integers in the range.
     ¥       Convert the two atoms to the left into a dyadic chain, and call that
             chain with arguments x and y.
   o4          Take the logical OR of x and 4, replacing a 0 with 4 and leaving
               positive integers untouched.
  ạ          Take the absolute difference of the sum to the left and the result of
             the logical OR to the right.

10

পাইথন, 66 60 বাইট

@ ডেনিসকে 6 বাইট ছাঁটাই করার জন্য ধন্যবাদ!

f=lambda n:n>2and(f(n-1)-~f(n-2))*(f(n-1)-f(n-2))/2or(5-n)*n

এটি কোডের গল্ফিয়াস্ট টুকরা নয়, তবে এটি এমন একটি সূত্র ব্যবহার করে যা আমি তৈরি করেছি:

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

যেখানে xডানদিকে রয়েছে f(n - 1), এবং yরয়েছে f(n - 2)

ব্যাখ্যা:

থেকে একটানা পূর্ণসংখ্যার যোগফল aথেকে b(সমেত) এই সূত্র দ্বারা বর্ণনা করা যায়:

amount * average

যেখানে amount(সংখ্যার পরিমাণ) এভাবে বর্ণিত হয়েছে:

((a - b) - 1)

এবং average(সমস্ত সংখ্যার গড়) এভাবে বর্ণিত হয়েছে:

(a + b) / 2

সুতরাং সম্পূর্ণ সূত্রটি এখন:

  ((a - b) - 1)(a + b) / 2
= (a - b - 1)(a + b) / 2

আমরা যেভাবে চূড়ান্ত সূত্র এই সূত্র বাস্তবায়ন প্রতিস্থাপন হয় aজন্য f(n - 1), bজন্য f(n - 2)যা মূলত নতুন পদ সব সমষ্টি হিসাব করে,, এবং অন্য যোগ f(n - 1)(যা এখন a, উপর) যা সমস্ত পূর্ববর্তী পদ পরিধি এ পর্যন্তই।

একত্রিত করে, আমরা পাই:

  a + ((a - b - 1)(a + b) / 2)
= a + ((a^2 + ab - ab - b^2 - a - b) / 2)
= a + ((a^2 - b^2 - a - b) / 2)
= (a^2 - b^2 - a - b + 2a) / 2
= (a^2 - b^2 + a - b) / 2
= ((a + b)(a - b) + (a - b)) / 2
= (a + b + 1)(a - b) / 2

aসাথে xএবং এর bসাথে প্রতিস্থাপন করুন yএবং ওহে প্রেস্টো, আপনাকে উপরে সূত্র রাখতে হবে।



9

গণিত, 49 48 বাইট

±2=4;±1=0;±n_:=Tr@Range@±(n-1)-Tr@Array[±#&,n-1]
(* or *)
±2=4;±1=0;±n_:=-Tr@Array[(k=±#)&,n-1]+Tr@Range@k

সিপি-1252 এনকোডিং ব্যবহার করে। ফাংশন সংজ্ঞায়িত করে PlusMinus (±)। 1-ইন্ডেক্স।

ব্যাখ্যা

±2=4;±1=0;±n_:=Tr@Range@±(n-1)-Tr@Array[±#&,n-1]

±2=4;±1=0;                                        (* Define ±1 and ±2 *)
          ±n_:=                                   (* ±n equals ... *)
               Tr@Range@±(n-1)                    (* Sum of (1, 2, ..., ±(n-1)) ... *)
                              -Tr@Array[±#&,n-1]  (* Minus the sum of previous terms *)

8

ওসিস , 11 বাইট

কোড:

+>bc-*2/640


ব্যাখ্যা:

F n এর সম্পর্কটি কল্পনা করতে , আসুন f 5 উদাহরণটি নেওয়া যাক । 5 গণনা করতে , আসুন নীচের যোগফলটি একবার দেখুন:

1 + 2 + 3 + 5 + 7 + 8 + 9 + 10

গা bold় অংশটি f 4 এর মতোই । 7 + 8 + 9 + 10 অংশ পরিসীমা [চ এন-2 + 1 টি, চ এন -1 - 1] । এটি সূত্রটি এফ এন -1 + Σ করে তোলে [এফ এন -2 + 1 ... চ এন-1 - 1] ( ওল্ফ্রাম লিঙ্ক ):

f n = 0.5 × (f n-1 2 - f n-2 2 + f n-1 - f n-2 )

এগুলিতে আবার লিখিত হতে পারে:

f n = 0.5 × ((f n-1 - f n-2 ) (f n-1 + f n-2 ) + (f n-1 - f n-2 ))

f n = 0.5 × ((f n-1 - f n-2 ) (f n-1 + f n-2 + 1))

আমরা কোডটিতে যে সূত্রটি ব্যবহার করব:


কোড ব্যাখ্যা

640অংশ আমাদের বেস মামলা দেয়:

a(0) = 0
a(1) = 4
a(2) = 6

কার্যকর করা হবে এমন কোড (যা একটি (এন) সংজ্ঞায়িত করে ):

+>bc-*2/

+          # Add a(n + 1) and a(n + 2) implicitly
 >         # Add one to get a(n + 1) + a(n + 2) + 1
  b        # Push a(n + 1)
   c       # Push a(n + 2)
    -      # Subtract from each other
     *     # Multiply with the previous result
      2/   # Halve the result

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


3
ব্যাখ্যা? এটি অন্যান্য উত্তরগুলির তুলনায় আমাকে আরও কৌতূহলী করে তুলেছে।

@ ais523 আমি একটি ব্যাখ্যা যুক্ত করেছি।
আদনান

5

জুলিয়া, 39 33 32 বাইট

!n=n<3?5n-n^2:sum(!(n-2)+1:!~-n)

0-ভিত্তিক।

@ ডেনিসকে ধন্যবাদ, 6 বাইট সংরক্ষণ করা

@ গ্লেএনওকে ধন্যবাদ, একটি বাইট সংরক্ষণ করা।

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

পূর্ববর্তী উত্তর 1- ভিত্তিক:

!n=n<4?2(n>1)n:sum(!(n-2)+1:!~-n)

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

পূর্ববর্তী অমীমাংসিত উত্তর 1-ভিত্তিক:

f(n)=n<4?n<2?0:n*2:sum(f(n-2)+1:f(n-1))

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


1
অতিরিক্ত বাইট সংরক্ষণ করতে, n<3?5n-n^2:পরিবর্তে ব্যবহার করুন n<4?2(n>1)n:- নোট করুন যে এটি 0-ভিত্তিক সূচী ব্যবহার করে স্যুইচ করে।
গ্লেন ও

@ গ্লেনো ধন্যবাদ, 1 বাইট সংরক্ষিত!
rahnema1

4

জাভাস্ক্রিপ্ট (ES6), 47 বাইট

f=(n,b=4,a=6)=>n?--n?f(n,a,(a+b+1)*(a-b)/2):b:0

f(n) = sum(range(f(n-2) + 1, f(n-1) + 1))N> 2 এর সাথে পুনরাবৃত্তির সম্পর্কটি ব্যবহার করে ।


4

পাওয়ারশেল , 84 89 88 87 বাইট

$OFS='+'
for($a=0,4;$a.Count-le($n="$args")){$a+=("$(1..$a[-1])"|iex)-("$a"|iex)}$a[$n]

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

ব্যাখ্যা

0 ভিত্তিক সূচক। কেবলমাত্র n = 6(আমার উইন্ডোজ মেশিনে এটি স্ট্যাক ওভারফ্লো দিয়ে ক্র্যাশ হয়ে যায় n = 7) মাধ্যমে কাজ করে।

জাংহওয়ান মিনের উত্তরের মতো একই পদ্ধতি ব্যবহার করে (পূর্ববর্তী শর্তাবলীর বিয়োগ বিয়োগের যোগফল)।

PowerShell মধ্যে একটি সীমার / অ্যারের সামিং, দীর্ঘ, তাই আমি একটি অ্যারের যোগদান একটি কৌতুক ব্যবহার করছি +(যেমন একটি দীর্ঘ অভিব্যক্তি তৈরি করতে 1+2+3+4...etc) এবং তারপর মাধ্যমে এটি পাঠানোর iex( Invoke-Expression)।

যেহেতু আমার এটি দু'বার করা দরকার তাই আমি -joinবিশেষ ভেরিয়েবলটি সেট না করে $OFSযা আউটপুট ফিল্ড বিভাজকের জন্য দাঁড়িয়ে। আপনি যখন একটি অ্যারে স্ট্রিংফাই করেন তখন উপাদানগুলিতে যোগ দেওয়ার জন্য এটিই ব্যবহার করা অক্ষর; এটি একটি স্পেস ডিফল্ট। সুতরাং এটা সেট করে +(একবার), আমি ভালো কিছু প্রতিস্থাপন করতে পারেন $a-join'+'|iexসঙ্গে "$a"|iex

forসিক্যুয়েন্স গণনা ইনপুট পূর্ণসংখ্যার চেয়ে কম বা সমান না হওয়া পর্যন্ত একটি সাধারণ লুপ চলতে থাকবে, তারপরে আমি $nতম উপাদানটি ফিরিয়ে দেব ।


@ অ্যাডমবর্কবর্ক খুব সুন্দর! আমি সত্যিই মনে করি এটি একটি স্বতন্ত্র উত্তরের যোগ্য; পদ্ধতিটি যথেষ্ট আলাদা যে আমি এটি ব্যবহার করলে এটি আমার নিজের মতো মনে হবে না।
ব্রিটিশবাদী 20'17

1
@ অ্যাডমবর্কবর্ক ভাল, +1 করেছেন এবং আমি সেখান থেকে একটি জিনিস শিখেছি: লুপের ;পরে দরকার নেই for। এর আগে কখনই বুঝতে পারিনি।
ব্রিটিশবাদী

3

এমএটিএল , 17 16 বাইট

OKi:"tP:yX-sv]G)

1বেসড ইনডেক্সিং ব্যবহার করা হয়। কোডটি খুব অদক্ষ। জন্য n = 6এটি আগে থেকেই অনলাইন কম্পাইলার স্মৃতির সীমা ছাড়িয়ে গেছে।

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

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

O       % Push 0
K       % Push 4
i       % Input n
:"      % Do the following n times
  t     %   Push a copy of the top array (or number)
  P:    %   Range from 1 to the last element of array
  y     %   Push a copy of the second-top number/array
  X-    %   Set difference
  s     %   Sum
  v     %   Concatenate everything into a column vector
]       % End
G)      % Get n-th entry of the array. Implicity display

জন্য 20 বাইট , নিম্নলিখিত সংস্করণ মেমরির সীমাবদ্ধতা এড়াতে। তবে এখনও তথ্যের ধরণের সীমাবদ্ধতা রয়েছে ( doubleপ্রকারটি কেবল গ্যারান্টি দিতে পারে যে পূর্ণসংখ্যাগুলি যথাযথভাবে উপস্থাপিত হয় 2^53), সুতরাং ফলাফলগুলি কেবলমাত্র কার্যকর হয় n = 8

OKi:"t0)tQ*2/ys-v]G)

অনলাইনেও চেষ্টা করে দেখুন !


2

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

f 0=0
f 1=4
f 2=6
f n=sum[1+f(n-2)..f$n-1]

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

এই সরাসরি পুনরাবৃত্তি যে প্রয়োগ n>2, f(n)সমান f(n-1)প্লাস থেকে খোলা বিরতি এর সমষ্টি f(n-2)থেকে f(n-1)যা আবার থেকে আধ খোলা বিরতি এর সমষ্টি সমান f(n-2)করার f(n-1)সমেত।

f(0) = 0
f(1) = 4
f(2) = 6 = 1+2+3
f(3) = 11 = 1+2+3+5 = 6 + 5 = 6 + sum]4,6[ = f(2)+ sum]f(1),f(2)[ = sum]f(1),f(2)]
...
f(n) = sum]f(n-2),f(n-1)] = sum[f(n-2)+1,f(n-1)]

2

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

m#s=m:s#sum[m+1..s]
((0:4#6)!!)

ব্যবহারের উদাহরণ: ((0:4#6)!!) 6-> 468930এটি অনলাইন চেষ্টা করুন!

সাধারণ পুনরাবৃত্তি, যা mএ পর্যন্ত সর্বাধিক উপাদান এবং পরবর্তী মানের উপর নজর রাখে s


আমি যখনই কোনও নতুন চ্যালেঞ্জের কাছে আসছি, কেউ এক্সডি করতে পারার চেয়ে
যেহেতু

আমি সর্বদা কিছু গাণিতিক চ্যালেঞ্জ এ পৌঁছেছি, "আরে অবশেষে আমি হাসেল চেষ্টা করে দেখতে পারি!" সিএমডি-এফ 'হাস্কেল' - ওহ অপেক্ষা কর না, এই উত্তর ... অপেক্ষা কর, কী?
হ্যাশেল


2

পার্ল 6 ,  52 49 44  35 বাইট

{(|(0,4 X 0),{[+](^.[0])-.[1],.[0]+.[1]}...*)[$_;0]}

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

{(0,(4,0),{[+](^.[0])-.[1],.[0]+.[1]}...*)[$_;0]}

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

{(0,(4,0),{[+](^.[0])-.[1],.sum}...*)[$_;0]}

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

{(0,4,6,{[+] $^a^..$^b}...*)[$_]}

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

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

{ # bare block lambda with implicit parameter 「$_」

  (
    # generate a sequence

    0, 4, 6,      # seed the sequence

    {             # lambda with placeholder parameters 「$a」 「$b」
      [+]         # reduce with 「&infix:<+>」
          $^a     # n-2
          ^..     # Range that excludes the first value
          $^b     # n-1
    }
    ...           # keep generating values until
    *             # never stop

  )[ $_ ]         # get the value that was asked for (0 based index)
}

2

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

param($n)$a=0,4;1..$n|%{$a+=(0..$a[-1]|?{$_-notin$a})-join'+'|iex};$a[$n]

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

সংজ্ঞায়িত হিসাবে অ্যালগরিদম কার্যকর করে, এবং 0-সূচকযুক্ত। ইনপুট6টিআইও পরিচালনা করার জন্য খুব বেশি।

$aএকটি অ্যারে হতে সেট করে [0,4]1ইনপুট থেকে লুপগুলি $n। লুপে, আমরা আমাদের সংখ্যার 0বৃহত্তম সংখ্যা থেকে সংখ্যার পরিসর নিয়ে থাকি $a[-1]এবং ইতিমধ্যে উপস্থিত না থাকা কেবলমাত্র সংখ্যাগুলি টানতে একটি Where-Objectধারা ব্যবহার করি |?{...}। যে সংখ্যার অ্যারেটি -joinএস এর সাথে একত্রে সম্পাদিত হয় +এবং তারপরে দেওয়া হয় iex(এর জন্য সংক্ষিপ্ত Invoke-Expressionএবং এর মতো eval)) এর পরে মানটি শেষের দিকে অ্যারে-কনটেনটেটেড হয় $a। অবশেষে, আমরা আমাদের লুপটি প্রস্থান করব $nএবং আমাদের অ্যারেতে নাম্বারটি নিই । এই সংখ্যাটি পাইপলাইনে রেখে গেছে, এবং আউটপুট অন্তর্ভুক্ত।



1

ব্যাচ, 108 বাইট

@if %1==0 echo 0&exit/b
@set/ab=4,a=6
@for /l %%i in (2,1,%1)do @set/ac=(a+b+1)*(a-b)/2,b=a,a=c
@echo %b%

আমার জাভাস্ক্রিপ্ট উত্তর পোর্ট।


1

ডিসি , 47 বাইট

?d1-scd/4*dd[d1+*2/r-dsn+dlnlc1-dsc0<x]sxlc0<xp

কম্পিউটারের মেমরির ক্ষমতা পর্যন্ত আপনি যতটা চান পূর্ণসংখ্যার সাথে কাজ করে।

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

0-ভিত্তিক সূচীকরণ, স্টিডিনে ইনপুট, স্টডআউটে আউটপুট। (স্ট্যাডারের উপর আউটপুটও রয়েছে, যা এড়ানো হবে))

নমুনা রান:

$ for ((j=0;j<12;j++)){ echo -n "$j ";dc -f sumseq.dc <<<"$j";echo;} 2>/dev/null
0 0

1 4

2 6

3 11

4 45

5 969

6 468930

7 109947436950

8 6044219445882138462810

9 18266294354989892462984673364511343859409730

10 166828754731567805766174036610844675771635260155825966927845486666328\
837158267993261860

11 139159167026428037700805570917048711514125048327321592278500415852500\
422178720517080334552793040951056255170819719745908378102737875659900\
61575545777065220385544711322919415

এটি ব্যাশের নিম্নলিখিত সমাধানগুলির মতো একই অ্যালগরিদম ব্যবহার করে, যা (আরও একটু) বেশি পঠনযোগ্য:

খাঁটি বাশ, 60 বাইট

for((n=s=$1?4:0,k=1;k<$1;k++,s+=(n=n++*n/2-s))){ :;}
echo $n

তবে বাশ প্রোগ্রামটি কেবলমাত্র 7 টি ইনপুটগুলির জন্য কাজ করে, কারণ এটি এর বাইরে পূর্ণসংখ্যার ওভারফ্লোতে আঘাত করে its



0

সি # - 74 বাইট

int A(int f){int e=4,i=1,s=0;for(;i++<f;)e=e*-~e/2-(s+=e);return f>0?e:0;}

Ungolfed:

int A(int f)
{
    int e = 4, 
        i = 1, 
        s = 0; // e is the last element, s is the sum of all previous elements
    for (; i++ < f; ) // calculate for indexes 1 through max (don't need the index, just a correct number of loop cycles)
        e = e * -~e / 2 - (s += e); // -~e => (e + 1), higher precedence to remove parentheses
    return f > 0 ? e : 0; //handle input 0 as a special case, which is 0
}

আরও বেশি কিছু বাঁচানোর জন্য সম্ভবত এটি একটি ল্যাম্বডায় রূপান্তর করার কোনও উপায় বা gগ্রিগেট ফাংশন ব্যবহার করে is যদিও বর্তমানে আমার কোনও আমদানি নেই, তাই সম্ভবত এটি সন্ধি হয়ে গেছে?


0

> <> , 43 + 3 = 46 বাইট

আদনান এবং কিওয়ার্প-ডের্পের উত্তরগুলিতে উপস্থাপিত সূত্রটি ব্যবহার করে ।

:2(?^&46v
}v?=&:&l<,2*{-$@:}+1+@:{::
*>n;>4

ইনপুটটি স্ট্যাকের উপস্থিতি প্রত্যাশা করবে, সুতরাং -vপতাকাটির জন্য +3 বাইট ।

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

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