ধৈর্য, ​​তরুণ "পাদোভান"

Question

ফিবোনাচি ক্রম প্রত্যেকে জানেন:
আপনি একটি বর্গ নিন, এর সাথে সমান বর্গক্ষেত্র সংযুক্ত করুন, তারপরে বারবার এমন একটি বর্গক্ষেত্র সংযুক্ত করুন যার পার্শ্ব দৈর্ঘ্য ফলাফলের আয়তক্ষেত্রের বৃহত্তম পাশের দৈর্ঘ্যের সমান।
ফলাফলটি স্কোয়ারগুলির একটি সুন্দর সর্পিল যার সংখ্যার ক্রমটি ফিবোনাচি ক্রম :

কিন্তু, আমরা স্কোয়ার ব্যবহার করতে না চাইলে কী হবে?

যদি আমরা একই ধরণের equ স্কোয়ারের পরিবর্তে সম দ্বি ত্রিভুজগুলি ব্যবহার করি তবে আমরা ত্রিভুজগুলির একটি সমান সুন্দর সর্পিল এবং একটি নতুন সিকোয়েন্স পাই : পাদোভান ক্রম , ওরফে A000931 :

টাস্ক:

, একটি ধনাত্মক পূর্ণসংখ্যা দেওয়া , আউটপুট , Padovan ক্রম বা প্রথম তম মেয়াদ শর্তাবলী।$N$$a_N$$N$$N$

অনুমান ক্রম প্রথম তিন পদ সব । সুতরাং, ক্রমটি নিম্নলিখিত হিসাবে শুরু হবে: $1$

$$1,1,1,2,2,3,...$$

ইনপুট:

• যেকোন ধনাত্মক পূর্ণসংখ্যা$N\ge0$

• অবৈধ ইনপুটটি আমলে নিতে হবে না

আউটপুট:

• Padovan ক্রমানুসারে তম মেয়াদ বা প্রথম Padovan ক্রম শর্তাবলী।$N$এন$N$

• যদি প্রথম শর্তগুলি মুদ্রিত হয় তবে আউটপুটটি যা সুবিধাজনক তা হতে পারে (তালিকা / অ্যারে, মাল্টি-লাইন স্ট্রিং ইত্যাদি)$N$

• হয় -indexed বা indexed হতে পারে$0$$1$

পরীক্ষার কেস:
(0-সূচকযুক্ত, ম মেয়াদ)$N$

Input | Output
--------------
0     | 1
1     | 1
2     | 1
4     | 2
6     | 4
14    | 37
20    | 200
33    | 7739

(1-ইনডেক্সড, প্রথম শর্তাবলী)$N$

Input | Output
--------------
1     | 1
3     | 1,1,1
4     | 1,1,1,2
7     | 1,1,1,2,2,3,4
10    | 1,1,1,2,2,3,4,5,7,9
12    | 1,1,1,2,2,3,4,5,7,9,12,16

নিয়মাবলী:

• এটি কোড-গল্ফ : যত কম বাইট, তত ভাল!

• স্ট্যান্ডার্ড লুফোলগুলি নিষিদ্ধ।

Comments

14(0-ইনডেক্সড) আউটপুট হিসাবে প্রদর্শিত হয় 28যখন আমি বিশ্বাস করি এটির ফল পাওয়া উচিত37

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

@ জোনাথান অ্যালান হ্যাঁ, আপনি ঠিক বলেছেন। আমি টার্মের জন্য শেষ দুটি পরীক্ষার কেস ঠিক করেছি তবে এটির জন্য নয়। পোস্টটি সম্পাদনা করা হয়েছে। $N$

— তাউ

@ লুইস মেন্ডো আমি বিশ্বাস করি। আমি পোস্টটি সম্পাদনা করব।

— তাউ

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

— তাউ

মনে রাখবেন যে আপনি যুক্ত করেছেন এমন OEIS ক্রমটি কিছুটা আলাদা, কারণ এটি ব্যবহার করে a_0=1, a_1=0, a_2=0। এটি কিছুটা স্থানান্তরিত হয়ে শেষ হয় কারণ তখনa_5=a_6=a_7=1

— কার্মিস্টার

Answer 1

জেলি , 10 বাইট

9s3’Ẓæ*³FṀ

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

1-ইন্ডেক্স। এর বৃহত্তম উপাদানটিকে গণনা করে: যেখানে বাইনারি ম্যাট্রিক্সটি সুবিধামত হিসাবে গণনা করা হয়:

$$\begin{bmatrix}0&0&1 \\ 1&0&1 \\ 0&1&0\end{bmatrix}^n$$ $$\begin{bmatrix}\mathsf{isprime}(0)&\mathsf{isprime}(1)&\mathsf{isprime}(2) \\ \mathsf{isprime}(3)&\mathsf{isprime}(4)&\mathsf{isprime}(5) \\ \mathsf{isprime}(6)&\mathsf{isprime}(7)&\mathsf{isprime}(8)\end{bmatrix}$$

(এটি সম্পূর্ণ কাকতালীয় ঘটনা))

9s3         [[1,2,3],[4,5,6],[7,8,9]]    9 split 3
   ’        [[0,1,2],[3,4,5],[6,7,8]]    decrease
    Ẓ       [[0,0,1],[1,0,1],[0,1,0]]    isprime
     æ*³    [[0,0,1],[1,0,1],[0,1,0]]^n  matrix power by input
        FṀ                               flatten, maximum

Comments

এটি স্পষ্টতই

— একধরনের ভুডো

এটি প্রকাশ করা উচিত।

— ওয়াইএসসি

@YSC এটি ইতিমধ্যে A000931 এ প্রকাশিত হয়েছে । আমি প্রাইমস ট্রিকটি কখনই অনুমান করিনি :)

— ফ্লাওয়ার

... এটি তৈরি করুন "যদি না কেউ এই দুটি বাইট দুটি গল্ফ করতে না পারে" :) (এখন যে আমার 9 বাইট আছে )

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

আমি এখানে অযৌক্তিকভাবে ছোট উত্তরগুলি দেখতে অভ্যস্ত হয়েছি, আমি ভেবেছিলাম যে '

— জেলি'র

Answer 2

ওসিস , 5 বাইট

নবম পদ 0-সূচকযুক্ত

cd+1V

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

ব্যাখ্যা

   1V   # a(0) = 1
        # a(1) = 1
        # a(2) = 1
        # a(n) =
c       #        a(n-2)
  +     #              +
 d      #               a(n-3)

Answer 3

জেলি ,  10 9  8 বাইট

ŻṚm2Jc$S

একটি monadic লিঙ্ক গ্রহণ n(0-সূচিযুক্ত) যা ফলন করে P(n)।

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

কিভাবে?

প্রয়োগগুলি$P(n) = \sum_{i=0}^{\lfloor\frac{n}2\rfloor}\binom{i+1}{n-2i}$

ŻṚm2Jc$S - Link: integer, n       e.g. 20
Ż        - zero range                  [0, 1, 2, 3, 4, ..., 19, 20]
 Ṛ       - reverse                     [20, 19, ..., 4, 3, 2, 1, 0]
  m2     - modulo-slice with 2         [20, 18, 16, 14, 12, 10,  8,  6,  4,  2,  0]  <- n-2i
      $  - last two links as a monad:
    J    -   range of length           [ 1,  2,  3,  4,  5,  6,  7,  8,  9, 10, 11]  <- i+1
     c   -   left-choose-right         [ 0,  0,  0,  0,  0,  0,  0, 28,126, 45,  1]
       S - sum                         200

---

এবং এখানে একটি "টুইফার"
... 8 টি বাইটের জন্যও সম্পূর্ণ আলাদা পদ্ধতি (এটি 1 টি সূচকযুক্ত, তবে অনেক ধীর):

3ḊṗRẎ§ċ‘ - Link: n
3Ḋ       - 3 dequeued = [2,3]
   R     - range = [1,2,3,...,n]
  ṗ      -   Cartesian power         [[[2],[3]],[[2,2],[2,3],[3,2],[3,3]],[[2,2,2],...],...]
    Ẏ    - tighten                   [[2],[3],[2,2],[2,3],[3,2],[3,3],[2,2,2],...]
     §   - sums                      [ 2,  3,   4,    5,    5,    6,     6,...]
       ‘ - increment                 n+1
      ċ  - count occurrences         P(n)

Answer 4

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

(l!!)
l=1:1:1:2:scanl(+)2l

এটি অনলাইন চেষ্টা করুন! শূন্য-সূচকযুক্ত n'th পদটি আউটপুট করে।

আমি ভেবেছিলাম যে নীচে "সুস্পষ্ট" পুনরাবৃত্ত সমাধানটি অপরাজেয় হবে তবে আমি এটি খুঁজে পেয়েছি। এটি l=1:scanl(+)1lঅসীম ফিবোনাচি তালিকার ক্লাসিক গোল্ফির মত প্রকাশের অনুরূপ , তবে এখানে সংলগ্ন উপাদানগুলির মধ্যে পার্থক্যটি 4 পজিশনের শব্দটি। আমরা আরও সরাসরি লিখতে পারি l=1:1:zipWith(+)l(0:l), তবে এটি আরও দীর্ঘ।

যদি এই চ্যালেঞ্জটি অসীম তালিকার আউটপুটকে মঞ্জুরি দেয় তবে আমরা প্রথম লাইনটি কেটে 20 টি বাইট পেতে পারি।

27 বাইট

f n|n<3=1|1>0=f(n-2)+f(n-3)

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

Answer 5

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

f=lambda n:n<3or f(n-2)+f(n-3)

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

শূন্য সূচকযুক্ত n'th পদটি প্রদান করে। আউটপুট True1।

Answer 6

ওল্ফ্রাম ভাষা (গণিত) , 33 বাইট

a@0=a@1=a@2=1;a@n_:=a[n-2]+a[n-3]   

1-সূচকযুক্ত, নবম পদটি প্রদান করে

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

Answer 7

অক্টাভা / ম্যাটল্যাব, 35 33 বাইট

@(n)[1 filter(1,'cbaa'-98,2:n<5)]

প্রথম এন পদ আউটপুট ।

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

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

বেনামে ফাংশন যা একটি পুনরাবৃত্ত ফিল্টার প্রয়োগ করে ।

'cbaa'-98উত্পাদন একটি সংক্ষিপ্ত ফর্ম [1 0 -1 -1]।

2:n<5উত্পাদনের জন্য একটি সংক্ষিপ্ত রূপ [1 1 1 0 0 ··· 0]( এন −1 পদ)।

filter(1,[1 0 -1 -1],[1 1 1 0 0 ··· 0])[1 1 1 0 0 ··· 0]সংখ্যার সহগ 1এবং ডিনোমিনেটর সহগ সহ একটি স্থানান্তর ফাংশন দ্বারা সংজ্ঞায়িত একটি পৃথক সময় ফিল্টার মাধ্যমে ইনপুট পাস [1 0 -1 -1]।

Answer 8

জে , 22 বাইট

-2 বাইট এনএনজি এবং গ্যালেনকে ধন্যবাদ

বন্ধ ফর্ম, 26 বাইট

0.5<.@+1.04535%~1.32472^<:

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

পুনরুক্তি, 22 বাইট

(],1#._2 _3{ ::1])^:[#

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

Comments

আরেকটি 24 বাইট সমাধান (বোরিং): (1 # .2 3 $: @ - ~]) `1: @। (3 &>) এটি অনলাইনে চেষ্টা করুন!

— গ্যালেন ইভানভ

23 বাইট ধন্যবাদ এনএনজি 1:-> #: এটি অনলাইনে চেষ্টা করুন!

— গ্যালেন ইভানভ

@ গ্যালেন ইভানভ টিভম, এটি দুর্দান্ত কৌশল।

— যোনা

1:-> 1। "প্রতিকূল" ডানদিকে একটি বিশেষ্য দিয়ে কাজ করে, স্পষ্টত

— ngn

@ জিএন টিএল ... আবারও!

— জোনাহ

Answer 9

রেটিনা , 47 42 বাইট

K`0¶1¶0
"$+"+`.+¶(.+)¶.+$
$&¶$.(*_$1*
6,G`

এটি অনলাইন চেষ্টা করুন! nপৃথক লাইনে প্রথম পদগুলি আউটপুট দেয় । ব্যাখ্যা:

K`0¶1¶0

জন্য শর্তাবলীর সাথে ইনপুট প্রতিস্থাপন -2, -1এবং 0।

"$+"+`.+¶(.+)¶.+$
$&¶$.(*_$1*

nপুনরাবৃত্তি সম্পর্ক ব্যবহার করে পরবর্তী পদ তৈরি করুন । *_এখানে সংক্ষিপ্ত $&*_যার জন্য ম্যাচের (প্রথম) সংখ্যাটি আনারিতে রূপান্তরিত করা হয়েছে , তবে $1*সংক্ষিপ্ততর $1*_যার জন্য মধ্য সংখ্যাটি অ্যানারিতে রূপান্তরিত হয়েছে। $.(আয় তার ইউনারী আর্গুমেন্ট দশমিক সমষ্টি, প্রথম ও মধ্যম সংখ্যার যোগফল অর্থাৎ।

6,G`

প্রথম ছয়টি অক্ষর তথা প্রথম তিনটি লাইন ফেলে দিন।

Answer 10

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

এটি 0 টি সূচকযুক্ত এবং N ম পদটি আউটপুট করে

;@UOI010+p?/sqq;W.\(

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

পাশের দৈর্ঘ্য 2 দিয়ে একটি ঘনক্ষেতের উপর মোড়ানো

    ; @
    U O
I 0 1 0 + p ? /
s q q ; W . \ (
    . .
    . .

এটি চালান দেখুন

• I010 - স্ট্যাকের সূচনা করে
• +p? - স্ট্যাকের শীর্ষগুলি যুক্ত করে, স্ট্যাকের নীচে থেকে পরীক্ষাগুলি টান এবং পরীক্ষাগুলি
• /;UO@ - যদি কাউন্টার 0 হয় তবে শীর্ষ মুখের প্রতিফলন করুন, টিওএস, ইউ-টার্ন, আউটপুট এবং থামান remove
• \(sqq;W - যদি কাউন্টারটি ইতিবাচক হয় তবে প্রতিবিম্বিত করুন, হ্রাসের পাল্টা, টিওএসের অদলবদল করুন, উপরে থেকে নীচে দু'বার ধাক্কা দিন, টিওএস এবং শিফট লেনটি মুখ্য লুপের মধ্যে ফিরিয়ে আনুন।

Answer 11

পাইথন 2 , 56 48 বাইট

f=lambda n,a=1,b=1,c=1:n>2and f(n-1,b,c,a+b)or c

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

নবম মান, 0-সূচকযুক্ত প্রদান করে।

Answer 12

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

{(1,1,1,*+*+!*...*)[$_]}

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

এক্সপ্রেশন দ্বারা উত্পাদিত প্রতিটি নতুন উপাদান সহ একটি চমত্কার স্ট্যান্ডার্ড উত্পন্ন অনুক্রম * + * + !*। এটি তৃতীয়-পূর্বের উপাদান, দ্বিতীয়-পূর্বের উপাদান এবং পূর্ববর্তী উপাদানটির যৌক্তিক অবহেলা যোগ করে যা সর্বদা False, যা সংখ্যার দিক থেকে শূন্য।

Comments

এই সম্প্রদায়ের উইকি কেন?

— জো কিং

@ জোকিং আমাকে মারছে। যদি আমি এটি কোনওভাবে করি তবে এটি উদ্দেশ্যমূলক ছিল না।

— শান

Answer 13

05 এ বি 1 ই , 8 বাইট

1Ð)λ£₂₃+

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

1Ð)1D)3Å1$n$£

কিভাবে?

1Ð)λ£₂₃+ | Full program.
1Ð)      | Initialize the stack with [1, 1, 1].
   λ     | Begin the recursive generation of a list: Starting from some base case,
         | this command generates an infinite list with the pattern function given.
    £    | Flag for λ. Instead of outputting an infinite stream, only print the first n.
     ₂₃+ | Add a(n-2) and a(n-3).

Comments

আমি মনে করি 1Ð)না 2 বাইট টিবিএইচ হতে পারে। আমি ছয়টি ভিন্ন 3-বাইট বিকল্প বিবেচনা করতে পারি , তবে 2-বাইটার নেই।

— কেভিন ক্রুইজসেন

Answer 14

এপিএল (ডায়ালগ ইউনিকোড) , 20 18 17 বাইট ^{এসবিসিএস}

এই কোডটি 1-সূচকযুক্ত। nপ্যাডোভান ক্রমের আইটেমগুলি পেতে এটি একই সংখ্যক বাইট , কারণ আপনাকে শেষ কয়েক অতিরিক্ত সদস্যকে বাদ দিতে হবে। 0-ইনডেক্সিং পেতে এটি একই সংখ্যার বাইট।

সম্পাদনা করুন: -2 বাইট এনএনজি ধন্যবাদ। -1 বাইট এনএনজি ধন্যবাদ

4⌷2(⊢,⍨2⌷+/)⍣⎕×⍳3

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

ব্যাখ্যা

4⌷2(⊢,⍨2⌷+/)⍣⎕×⍳3

  ⍺(. . . .)⍣⎕⍵   This format simply takes the input ⎕ and applies the function
                   inside the brackets (...) to its operands (here marked ⍵ and ⍺).
  2(. . .+/)⍣⎕×⍳3  In this case, our ⍵, the left argument, is the array 1 1 1,
                   where we save our results as the function is repeatedly applied
                   and our ⍺, 2, is our right argument and is immediately applied to +/,
                   so that we have 2+/ which will return the pairwise sums of our array.
       2⌷          We take the second pairwise sum, f(n-2) + f(n-3)
    ⊢,⍨            And add it to the head of our array.
4⌷                 When we've finished adding Padovan numbers to the end of our list,
                   the n-th Padovan number (1-indexed) is the 4th member of that list,
                   and so, we implicitly return that.

Answer 15

কে (এনএনজি / কে) , 24 20 বাইট

-4 বাইট ধন্যবাদ এনএনজি!

{$[x<3;1;+/o'x-2 3]}

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

0-ইনডেক্সড, প্রথম এন শর্তাদি

Comments

f[x-2]+f[x-3]-> +/o'x-2 3( oএটি "পুনরাবৃত্তি")

— এনজিএন

@ ধন্যবাদ! আমি জেতে এটি চেষ্টা করেছি (সাফল্য ছাড়াই); এটি এখানে মার্জিত।

— গ্যালেন ইভানভ

@ngn আসলে জে: (1 # .2 3 $: @ - ~]) `1: @। (3 &>)

— গ্যালেন ইভানভ

আহ, ডান, বেস -1 ডিকোড যোগফলের জন্য একটি ট্রেন-বান্ধব উপায় :)

— এনজিএন

1:-> #জে দ্রবণে

— এনজিএন

Answer 16

x86 32-বিট মেশিন কোড, 17 বাইট

53 33 db f7 e3 43 83 c1 04 03 d8 93 92 e2 fa 5b c3

disassembly:

00CE1250 53                   push        ebx  
00CE1251 33 DB                xor         ebx,ebx  
00CE1253 F7 E3                mul         eax,ebx  
00CE1255 43                   inc         ebx  
00CE1256 83 C1 04             add         ecx,4  
00CE1259 03 D8                add         ebx,eax  
00CE125B 93                   xchg        eax,ebx  
00CE125C 92                   xchg        eax,edx  
00CE125D E2 FA                loop        myloop (0CE1259h)  
00CE125F 5B                   pop         ebx  
00CE1260 C3                   ret

এটি 0-সূচকযুক্ত। প্রারম্ভিকেশনটি সহজেই Eax * 0 গণনা করে অর্জিত হয় 128-বিটের ফলাফল 0 হয় এবং এটি edx: eax এ যায়।

প্রতিটি পুনরাবৃত্তির শুরুতে, নিবন্ধগুলির ক্রম হ'ল ebx, eax, edx। xchg eaxনির্দেশের জন্য এনকোডিংয়ের সুবিধা নেওয়ার জন্য আমাকে সঠিক ক্রমটি বেছে নিতে হয়েছিল - 1 বাইট।

আউটপুটটি পৌঁছতে দিতে লুপের কাউন্টারে আমাকে 4 যুক্ত করতে হয়েছিল eax, যা fastcallকনভেনশনে ফাংশনের রিটার্ন মান রাখে ।

আমি অন্য কিছু কলিং কনভেনশন ব্যবহার করতে পারি, যার সংরক্ষণ এবং পুনরুদ্ধার প্রয়োজন হয় না ebxতবে fastcallযাইহোক মজাদার :)

Comments

আমি পিপি ও সিজি-তে মেশিন কোডের উত্তরগুলি দেখতে পছন্দ করি! +1

— তাউ

Answer 17

জেলি , 11 বাইট

5B+Ɲ2ị;Ʋ⁸¡Ḣ

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

0-ইন্ডেক্স।

Answer 18

লুয়া 5.3,49 48 বাইট

function f(n)return n<4 and 1or f(n-2)+f(n-3)end

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

ভ্যানিলা লুয়ায় স্ট্রিংগুলিতে বুলেঁস (এমনকি tonumber(true)রিটার্ন nil) জোর নেই , সুতরাং আপনাকে সিডো-টের্নারি অপারেটর ব্যবহার করতে হবে। এই সংস্করণটি লুয়ার মতো 1-ইনডেক্সেড। 1orঅংশ পরিবর্তন করা হয়েছে 1 orঅ্যাপ্লিকেশন Lua 5.1, যা সংখ্যার lexing দের কে আলাদা ভাবে করেছে।

Answer 19

রুবি , 26 বাইট

f=->n{n<3?1:f[n-2]+f[n-3]}

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

Answer 20

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

$a(0)=a(1)=a(2)=1$

$N$

f=n=>n<3||f(n-2)+f(n-3)

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

Comments

আমি বলে রাখা যুক্তিযুক্ত বলে মনে করি না যে বাকী আউটপুট সংখ্যা হলে trueফিরিয়ে নেওয়াও একই রকম 1।

— নিত

@ নীট প্রাসঙ্গিক মেটা পোস্ট ।

— আর্নউল্ড

আমার মনে হয় আপনি কিছু প্রয়োজনীয়তা অনুপস্থিত: আমার পরিমার্জন কটাক্ষপাত (জাভা সংস্করণ) আছে এখানে ।

— শাক

@ শ্যাখ চ্যালেঞ্জটি স্পষ্টভাবে উল্লেখ করেছে যে অনুক্রমের প্রথম তিনটি পদ সমস্ত 1 টি । সুতরাং, এটি A000931 এ সংজ্ঞায়িত ক্রম নয় (তবে সূত্রটি একই)।

— আরনাউল্ড

@ আরনাউল্ড হ্যাঁ আমি এখন এটি দেখতে পাচ্ছি। দুঃখিত!

— শাক

Answer 21

জাপট -N , 12 বাইট

<3ªßUµ2 +ß´U

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

Comments

12 টি দেখে মনে হচ্ছে আমরা সবচেয়ে ভাল: Sha

— শেগি

আমি সংশোধন করেছি!

— শেগি

Answer 22

টিআই-বেসিক (টিআই -৪৪), 34 বাইট

[[0,1,0][0,0,1][1,1,0]]^(Ans+5:Ans(1,1

$N$

ইনপুট রয়েছে Ans।
আউটপুটটি ভিতরে রয়েছে Ansএবং স্বয়ংক্রিয়ভাবে মুদ্রিত হয়।

আমি অনুভব করেছি যে পর্যাপ্ত সময় পার হয়ে গেছে, একাধিক উত্তর পোস্ট করা হয়েছিল, যার মধ্যে এমন অনেকগুলি ছিল যা উত্তর উত্তরটি গল্ফ করে।

উদাহরণ:

0
               0
prgmCDGFD
               1
9
               9
prgmCDGFD
               9
16
              16
prgmCDGFD
              65

ব্যাখ্যা:

[[0,1,0][0,0,1][1,1,0]]^(Ans+5:Ans(1,1      ;full program (example input: 6)

[[0,1,0][0,0,1][1,1,0]]                     ;generate the following matrix:
                                            ; [0 1 0]
                                            ; [0 0 1]
                                            ; [1 1 0]
                       ^(Ans+5              ;then raise it to the power of: input + 5
                                            ; [4  7 5]
                                            ; [5  9 7]
                                            ; [7 12 9]
                               Ans(1,1      ;get the top-left index and leave it in "Ans"
                                            ;implicitly print Ans

Answer 23

পাইথ, 16 বাইট

L?<b3!b+y-b2y-b3

এটি ফাংশনটি সংজ্ঞায়িত করে y। এখানে চেষ্টা করুন!

এটি আরও মজাদার সমাধান, যদিও এটি 9 বাইট দীর্ঘতর; বাইট যদিও শেভ করা যেতে পারে।

+l{sa.pMf.Am&>d2%d2T./QY!

এটি ওইআইএস পৃষ্ঠায় ডেভিড কলান প্রদত্ত সংজ্ঞাটি ব্যবহার করে: "ক (এন) = অদ্বিতীয় এবং> = 3 অংশে এন এর রচনা সংখ্যা" " এখানে চেষ্টা করুন! এটি কোনও ফাংশন সংজ্ঞায়নের পরিবর্তে সরাসরি ইনপুট নেয়।

Comments

y-b2y-b3দ্বিখণ্ডিত বা সম্ভবত সঙ্গে সংশোধন করা যেতে পারে L? যদিও 2 টি উপাদানের অ্যারে ঘোষণা করা ব্যয়বহুল। yL-Lb2,3দীর্ঘ :(

— ভেন

@ ভেন আমি একই পরিমাণে বাইটের +y-b2y-b3সাথে প্রতিস্থাপন করতে সক্ষম হয়েছি smy-bdhB2; hB2অ্যারে ফলাফল[2, 3]

— আর কে।

ভাল হয়েছে hB2। খুব খারাপ এটি একই বাইট গণনা।

— ভেন

হ্যাঁ, যদিও আমি ভাবছি dমানচিত্রে এ থেকে মুক্তি পাওয়ার কোনও উপায় আছে কিনা ।

— আরকে

Answer 24

জাভা, 41 বাইট

ল্যাম্বডা (রানটাইম ত্রুটি) ব্যবহার করতে পারবেন না। এই জাভাস্ক্রিপ্ট উত্তর পোর্ট

int f(int n){return n<3?1:f(n-2)+f(n-3);}

Tio

Comments

আমি মনে করি আপনি কিছু প্রয়োজনীয়তা নিখোঁজ করেছেন: আমার সংশোধনটি এখানে দেখুন ।

— শাক

দয়া করে শকের মন্তব্যটিকে উপেক্ষা করুন: আপনার উত্তরটি সঠিক এবং সম্ভবত জাভা সবচেয়ে কম উত্তর (জাভা 12 হিসাবে)।

— অলিভিয়ার গ্রাগোয়ার

ঠিক আছে তাহলে। আমি কী "মিস" করেছি তা নিশ্চিত নই তবে ঠিক আছে। সম্পাদনা: এনভিএম আমি জেএস উত্তরটি পড়েছি।

— বেনজামিন আরউখার্ট

Answer 25

আর + পিআর , 38 36 বাইট

শূন্য সূচকযুক্ত পুনরাবৃত্তি ফাংশন।

f=pryr::f(`if`(n<3,1,f(n-2)+f(n-3)))

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

দুটি স্পষ্টত অপ্রয়োজনীয় বাইট দেখানোর জন্য @ জিউজ্পে ধন্যবাদ জানাই ।

Comments

আপনি যদি ব্যবহার করতে যাচ্ছেন pryrতবে ভাষাটি হওয়া উচিত R + pryrএবং এটি 36 বাইট

— জিউসেপ

@ জিউসেপ ধন্যবাদ! এখন আপডেট হয়েছে।

— rturnbull

Answer 26

সি (ঝনঝন) , 41 33 বাইট

a(i){return i<3?1:a(i-2)+a(i-3);}

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

Comments

পিপিসি তে আপনাকে স্বাগতম :)

— শেগি

Answer 27

সি # (ভিজ্যুয়াল সি # ইন্টারেক্টিভ সংকলক) , 34 বাইট

int f(int g)=>g<3?1:f(g-2)+f(g-3);

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

Answer 28

পার্ল 5 , 34 বাইট

sub f{"@_"<3||f("@_"-2)+f("@_"-3)}

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

Answer 29

ওল্ফ্রাম ভাষা (গণিত) , ২ by বাইট a

If[#<3,1,#0[#-2]+#0[#-3]]&

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

Answer 30

পরী / জিপি , 28 বাইট

0-ইন্ডেক্স।

f(n)=if(n<3,1,f(n-2)+f(n-3))

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

---

পরী / জিপি , 35 বাইট

1-ইন্ডেক্স।

n->Vec((1+x+O(x^n))/(1-x^2-x^3))[n]

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

$\frac{1+x}{1-x^2-x^3}$