28

প্রদত্ত এন (২ <= এন ), ফিবোনাচি সিরিজের এই জাতীয় অক্ষরের এন লাইনগুলি মুদ্রণ করুন (অর্থাত্ এন = 5) প্রথমে aএবং এর মাধ্যমে শুরু করুন b:

a
b

এরপরে, দুটি লাইন যুক্ত করুন।

a
b
ab

শেষ দুটি লাইন যুক্ত করা চালিয়ে যান।

a
b
ab
bab

চোলতে থাকা...

a
b
ab
bab
abbab

এবং আমরা সম্পন্ন করেছি।

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

code-golf string fibonacci

— অলিভার নি
সূত্র

4

সম্পর্কিত

— অ্যাডমবর্কবার্ক

এটি এমন কোনও ফাংশন হতে পারে যা শর্তাদির একটি তালিকা এন পর্যন্ত ফেরত দেয়?

— ফ্লিপট্যাক

আমাদের কি ফলাফল মুদ্রণ করতে হবে বা আমরা কোনও ফাংশন থেকে স্ট্রিংয়ের একটি তালিকা ফিরিয়ে দিতে পারি?

— নিমি

অপেক্ষা করুন, সুতরাং এটি n = 1 এর জন্য কাজ করতে হবে না?

— সকরাটিক ফিনিক্স

এছাড়াও, আমরা 0-ভিত্তিক সূচক ব্যবহার করতে পারি?

— সকরাটিক ফিনিক্স

10

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

@ এক্সনোরকে ধন্যবাদ 3 বাইট সংরক্ষণ করা হয়েছে

a,b="ab";exec"print a;a,b=b,a+b;"*input()

আইডিয়নে পরীক্ষা

কেবল পুনরাবৃত্ত সংজ্ঞা অনুসরণ করে।

— ETHproductions
সূত্র

এই প্রোগ্রাম হিসাবে খাটো: a,b="ab";exec"print a;a,b=b,a+b;"*input()।

— xnor

1

পাইথন 2 নির্দিষ্ট করতে পারে :)

— ফ্লিপট্যাক

8

হাস্কেল, 29 35 32 বাইট

a%b=a:b%(a++b)
(`take`("a"%"b"))

সাধারণ পুনরাবৃত্তি।

রেফারেন্সের জন্য: পুরানো সংস্করণ ( এই উত্তরের একটি অভিযোজন ), ভুল ক্রমে স্ট্রিংগুলিকে বোঝায় , সুতরাং আমাকে একটি যুক্ত করতে flip(...)হয়েছিল যা এটি খুব দীর্ঘ (35 বাইট) তৈরি করেছে।

f="a":scanl(flip(++))"b"f
(`take`f)

— nimi
সূত্র

আউটপুট উদাহরণ থেকে পৃথক ( ["b","a","ab","aba","abaab"]

— একচেটিয়াভাবে

@ অংস: উফ কি ভুল! সংশোধন করা হয়েছে।

— নিমি

6

05 এ বি 1 ই , 12 11 বাইট

বাইট সংরক্ষণের জন্য এমিগিনার ধন্যবাদ !

'a='b¹GD=Š«

সিপি -1222 এনকোডিং ব্যবহার করে । এটি অনলাইন চেষ্টা করুন!

— আদনান
সূত্র

1

ÍƒGআপনি যেমন ব্যবহার করছেন না ঠিক N

— তেমনই

@ এমিগনা ওহ হ্যাঁ, আপনি ঠিক বলেছেন! ধন্যবাদ :)!

— আদনান

5

জেলি , 11 10 বাইট

”a”bṄ;¥@¡f

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

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

”a”bṄ;¥@¡f  Main link. Argument: n

”a          Set the return value to 'a'.
  ”b    ¡   Call the link to the left n times, with left argument 'b' and right
            argument 'a'. After each call, the right argument is replaced with the
            left one, and the left argument with the return value. The final
            return value is yielded by the quicklink.
      ¥       Combine the two atoms to the left into a dyadic chain.
    Ṅ           Print the left argument of the chain, followed by a linefeed.
     ;          Concatenate the left and right argument of the chain.
       @      Call the chain with reversed argument order.
         f  Filter the result by presence in n. This yields an empty string
            and thus suppresses the implicit output.

— ডেনিস
সূত্র

আমার ”a”b;@Ṅঅংশটি নিচে ছিল, তবে সেখান থেকে কোথায় যাব তা আমি বুঝতে পারি না ... এখন আমি জানি :-)

— ইটিএইচ প্রোডাকশনগুলি

5

জাভা 7, 69 বাইট

String c(int n,String a,String b){return n--<1?"":a+"\n"+c(n,b,a+b);}

ungolfed

 class fibb {


public static void main(String[] args) {
    System.out.println( c( 7, "a" , "b" ) );

}
static String c(int n,String a,String b) {

    return n-- < 1  ? "" : a + "\n" + c(n,b,a + b);

}
}

— Numberknot
সূত্র

আপনার উত্তরগুলিতে আপনাকে অবশ্যই আপনার অলগল্ড কোডটি ফর্ম্যাট করতে হবে .. যদিও xD +1, এবং এটি কেবল aএবং এর চেয়ে পৃথক অন্য যে কোনও স্ট্রিংয়ের জন্যও কাজ করে b। বাইট-কাউন্টের দিকে "a"এবং "b"পরামিতিগুলি গণনা করা উচিত কিনা তা আমি নিশ্চিত নই , যেহেতু প্রশ্নটিতে বিশেষত এটি ব্যবহার করা উচিত aএবং বলা হয়েছে b। জাভা যে কোনওভাবেই জিতবে না এমন নয়। ;)

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

@ কেভিন ক্রুজসেন স্ট্রিং প্যারামিটারগুলি প্রয়োজনীয় কারণ প্রতিবার পদ্ধতিটি চালু করার সময় তাদের মান পরিবর্তন হয়।

@ স্বনাম আমি জানি তাদের প্রয়োজনীয়তা আছে .. আমি কেবল বলছি যে বাইট-কাউন্টটি সম্ভবত 75 বাইট হতে হবে (+6 এর জন্য) "a""b" 69 এর পরিবর্তে এবং ) কারণ চ্যালেঞ্জটি বিশেষভাবে জিজ্ঞাসা করা হয়েছিল aএবং bকোড স্নিপড / পদ্ধতি বর্তমানে ব্যবহার করছে একটি পরিবর্তনশীল ইনপুট। এই জাতীয় কিছু সম্পর্কে নিয়মগুলি কী তা নিশ্চিত তা নিশ্চিত নয় তবে আমি ব্যক্তিগতভাবে মনে করি এটি গণনা করা উচিত। অন্যথায় আপনার কিছু ভাষায় একটি ফাংশন থাকতে পারে যা একটি প্যারামিটার ফাংশন কার্যকর করে এবং তারপরে বাইটগুলি গণনা না করে কেবল প্যারামিটারে পুরো চ্যালেঞ্জ-ফাংশনটি দেয়। একটি স্ট্যান্ডার্ড-লুফোল রুলের মতো শোনাচ্ছে।

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

1

আমি জাভা উত্তর পছন্দ করি। তারা খুব সুন্দর দাঁড়িয়ে - 12 বাইট এখানে, 5 এখানে, 17 এখানে ... 70 বাইট সেখানে ... অপেক্ষা, কি? ওহ, এটি আবার জাভা ... +1

— রুডলফ জেলিন

5

ইমাস, 26 , 25-ইশ কীস্ট্রোক

কার্যক্রম

#nঅঙ্ক (গুলি) সঙ্গে কী-এর মত পড়তে হবে এন :

ARETBRETF3UPUPC-SPACEC-EM-WDOWNDOWNC-Y UPC-AC-SPACEC-EM-WDOWNC-EC-YRETF4C-#(n-2)F4

ব্যাখ্যা

command(s)               explanation                      buffer reads (| = cursor aka point)
-----------------------------------------------------------------------------------------------
A<RET> B<RET>            input starting points            "a\nb\n|"
<F3>                     start new macro                  "a\nb\n|"
<UP><UP>                 move point two lines up          "|a\nb\n"
C-<SPACE> C-E M-W        copy line at point               "a|\nb\n"
<DOWN><DOWN>             move point two lines down        "a\nb\n|"
C-Y                      yank (paste)                     "a\nb\na|"
<UP>                     move point one line up           "a\nb|\na"
C-A C-<SPACE> C-E M-W    copy line at point               "a\nb|\na"
<DOWN>                   move point one line down         "a\nb|\na|"
C-E C-Y <RET>            yank (paste) and add new line    "a\nb|\nab\n|"
<F4>                     stop macro recording             "a\nb|\nab\n|"
C-#(n-3) <F4>            apply macro n-3 times            "a\nb|\nab\nbab\nabbab\n|"

এন = 10 সহ

a
b
ab
bab
abbab
bababbab
abbabbababbab
bababbababbabbababbab
abbabbababbabbababbababbabbababbab
bababbababbabbababbababbabbababbabbababbababbabbababbab

— YSC
সূত্র

1

আমি ছেঁড়া একদিকে আমি সর্বদা সম্পাদক-গল্ফকে উজ্জীবিত করি তবে অন্যদিকে আমি ভিএম ব্যবহার করি। ওহ ভাল, যাইহোক +1। :)

— ডিজেএমসিএমহেম

@ ডিআরএমসিএমএলেক্স কেবল এটিকে ভি এম এ রূপান্তর করুন কিউ এমএক্স রূপান্তর-টু-ভিমে

— ওয়াইএসসি

5

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

@ আরনাউল্ডকে একটি বাইট ধন্যবাদ সংরক্ষণ করা হয়েছে

f=(n,a="a",b="b")=>n&&f(n-!alert(a),b,a+b)

— ETHproductions
সূত্র

4

সিজেম, 19 17 বাইট

'a'b{_@_n\+}ri*;;

ব্যাখ্যা

"a": Push character literal "a" onto the stack.
"b": Push character literal "b" onto the stack.
{_@_p\+}
    {: Block begin.
    _: duplicate top element on the stack
    @: rotate top 3 elements on the stack
    _: duplicate top element on the stack
    n: print string representation
    \: swap top 2 elements on the stack
    +: add, concat
    }: Block end.
r: read token (whitespace-separated)
i: convert to integer
*: multiply, join, repeat, fold (reduce)
;: pop and discard
;: pop and discard

— Setop
সূত্র

যাইহোক, স্ট্রিং সংখ্যা বর্তমানে এক দ্বারা বন্ধ; শেষটি pএকটি হওয়া উচিত ;। আপনি যদি এর nপরিবর্তে ব্যবহার করেন তবে আপনি আউটপুটটির আশেপাশের উদ্ধৃতিগুলি থেকে মুক্তি পেতে পারেন p। শেষ পর্যন্ত 'a'bদুটি বাইট ওভার সাশ্রয় করে "a""b"।

— ডেনিস

3

ভি , 18 বাইট

ia
bkÀñyjGpgJkñdj

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

বা, আরও পাঠযোগ্য সংস্করণ:

ia
b<esc>kÀñyjGpgJkñdj

ব্যাখ্যা:

ia
b<esc>          " Insert the starting text and escape back to normal mode
k               " Move up a line
 Àñ       ñ     " Arg1 times:
   yj           "   Yank the current line and the line below
     G          "   Move to the end of the buffer
      p         "   Paste what we just yanked
       gJ       "   Join these two lines
         k      "   Move up one line
           dj   " Delete the last two lines

— ডিজেএমসিএমহেম
সূত্র

3

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

97c98ci2-:"yyh

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

97c     % Push 'a'
98c     % Push 'b'
i2-     % Input number. Subtract 2
:"      % Repeat that many times
  yy    %   Duplicate the top two elements
  h     %   Concatenate them

— লুইস মেন্ডো
সূত্র

3

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

def f(n):m='a','b';exec'print m[-2];m+=m[-2]+m[-1],;'*n

— মাইল
সূত্র

3

রেটিনা , 33 বাইট

.+
$*
^11
a¶b
+`¶(.+?)1
¶$1¶$%`$1

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

10 (!) বাইটস সংরক্ষণ করেছেন @ মার্টিনইেন্ডারকে ধন্যবাদ !

ব্যাখ্যা

ইনপুটটিকে অচেনা রূপান্তরিত করে, বিয়োগ করে 2এবং যোগ করে aএবং bতারপরে পুনরাবৃত্তভাবে 1আগের দুটি স্ট্রিংয়ের সংমিশ্রণ দ্বারা অবশিষ্ট গুলি প্রতিস্থাপন করে ।

— ডোম হেস্টিংস
সূত্র

অপ্রয়োজনীয় ক্যাপচারগুলি এড়িয়ে কয়েকটি বাইট সংরক্ষণ করা হয়েছে: retina.tryitonline.net/…

— মার্টিন

নিবন্ধন করুন বেশ শক্তি দেখেনি $%` ! এবং অন্য ক্যাপচারটি ছিল কেবল খারাপ পরিকল্পনা ... আশ্চর্যজনক, আপনাকে ধন্যবাদ!

— ডম হেস্টিংস

2

ব্যাচ, 102 93 বাইট

@set a=a
@set b=b
@for /l %%i in (2,1,%1)do @call:l
:l
@echo %a%
@set a=%b%&set b=%a%%b%

ভাগ্যক্রমে অ্যাসাইনমেন্ট কার্যকর হওয়ার আগে প্রতিটি লাইনের জন্য ভেরিয়েবলগুলি প্রসারিত হয়, তাই আমি অস্থায়ী প্রয়োজন ছাড়াই উভয় aএবং bতাদের পুরানো মানগুলি সেট করতে পারি । সম্পাদনা: @ nephi12 ধন্যবাদ 9 বাইট সংরক্ষণ করা।

— নিল
সূত্র

আমি এটি করতে যাচ্ছিলাম;) যাইহোক, আপনি "প্রস্থান / বি" অপসারণ করে 2 টি থেকে আপনার লুপটি শুরু করে 8 বাইট সংরক্ষণ করতে পারেন:for /l %%i in (2,1,%1) etc..

— nephi12

@set a=a&set b=bশেষ লাইনটি দিয়ে আপনি যেমন করেছেন তেমন কমান্ড একই লাইনে রেখে আরও একটি (নিউলাইন) । যদিও প্রযুক্তিগতভাবে তারা সবাই একই লাইনে থাকতে পারে ... তবে তা হবে কুৎসিত ... হুম ...

— nephi12

2

আমার গল্ফ, 63 বাইট স্ট্যাক করুন

আমার ভাষা এখানে পান: https://github.com/cheertarts/Stack-My- গল্ফ ।

($1=(_(a))($2=(_(b))($2-f:1-f,)?)?)f\($1=(f)($1-p(\n),:f,)?)p\p

সম্ভবত একটি সংক্ষিপ্ত উপায় আছে তবে এটি সবচেয়ে সুস্পষ্ট।

— কুইনসি বি
সূত্র

2

পার্ল, 36 35 বাইট

জন্য +3 অন্তর্ভুক্ত -n

STDIN এ গণনা দিন

perl -M5.010 fibo.pl <<< 5

fibo.pl

#!/usr/bin/perl -n
$_=$'.s/1//.$_,say$`for(a1.b)x$_

— টন হসপেল
সূত্র

2

পার্ল, 45 +1 = 46 বাইট

-N পতাকার জন্য +1 বাইট

$a=a,$b=b;say($a),($a,$b)=($b,$a.$b)for 1..$_

বিদ্যমান 49-বাইট সমাধানের তুলনায় সামান্য উন্নতি, তবে আলাদাভাবে বিকাশ হয়েছে। এর জন্য প্রথম বন্ধনীগুলি say($a)প্রয়োজনীয় কারণ অন্যথায় $a,($a,$b)=($b,$a.$b)এটি আর্গুমেন্ট হিসাবে ব্যাখ্যা করে sayযা আমাদের প্রয়োজনের চেয়ে আরও বেশি আবর্জনা দেয়।

পার্ল, 42 বাইট

$b=<>;$_=a;say,y/ab/bc/,s/c/ab/g while$b--

উপরের সমাধান থেকে পৃথক পদ্ধতি:

$b=<>;                                       #Read the input into $b
      $_=a;                                  #Create the initial string 'a' stored in $_
           say                               #Print $_ on a new line
               y/ab/bc/                      #Perform a transliteration on $_ as follows:
                                   #Replace 'a' with 'b' and 'b' with 'c' everywhere in $_
                        s/c/ab/g             #Perform a replacement on $_ as follows:
                                   #Replace 'c' with 'ab' everywhere in $_
              ,        ,         while$b--   #Perform the operations separated by commas
                                   #iteratively as long as $b-- remains truthy

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

— গ্যাব্রিয়েল বেনামি
সূত্র

1

সুইফট 3, 76 বাইট

func f(_ n:Int,_ x:String="a",_ y:String="b"){if n>1{print(x);f(n-1,y,x+y)}}

— আলেকজান্ডার - মনিকা পুনরায় স্থাপন করুন
সূত্র

1

পার্ল, 48 বাইট

47 বাইট কোড +1 এর জন্য -n।

সহজ পদ্ধতির। মূলত অ্যারে ফালি ব্যবহার করার চেষ্টা করুন $a[@a]="@a[-2,-1]"তবে এটি প্রয়োজনীয় $"=""বা অনুরূপ :( @ দাদাকে ধন্যবাদ 1 বাইট সংরক্ষণ করুন !

@;=(a,b);$;[@;]=$;[-2].$;[-1]for 3..$_;say for@

ব্যবহার

perl -nE '@;=(a,b);$;[@;]=$;[-2].$;[-1]for 3..$_;say for@' <<< 5
a
b
ab
bab
abbab

— ডোম হেস্টিংস
সূত্র

ব্যবহার করে আপনি এক বাইট সংরক্ষণ করতে পারবেন @;পরিবর্তে @aযাতে আপনি চূড়ান্ত সেমিকোলন বাদ যাবে (দেখুন আমি কি বলতে চাচ্ছি?)। (আমি জানি, একটি বাইট বেশ সস্তা তবে আমার আর ভাল ধারণা ছিল না ..)

— দাদা

@ দাদা হ্যাঁ, আমি চেষ্টা করেছিলাম, তবে এটি আমার মেশিনে সংকলিত হয়নি, তাই আমি ভেবেছিলাম সম্ভবত আমার সাথে কিছু অদ্ভুত ঘটনা চলছে:

perl -pe '@;=(a,b);$;[@;]=$;[-2].$;[-1]for 3..$_;say for@' <<< 5    syntax error at -e line 1, at EOF    Execution of -e aborted due to compilation errors.

তবে আমি মনে করতে পারি না যে উত্তর না দিয়ে যুক্ত করা ঠিক হবে না if এটি কাজ পেতে!

— ডম হেস্টিংস

অবশ্যই এর -peপরিবর্তে এর সাথে সম্পর্কিত নয় -nE? যাইহোক, এটি আমার উপর কাজ করে, সুতরাং এটি সম্ভবত আপনার পার্ল সংস্করণ বা সিস্টেমের সাথে সম্পর্কিত ... তবে বিশ্বাস করুন, আমি এটি পরীক্ষা করেছি এবং এটি কার্যকর হয়! ;)

— দাদা

@ দাদাও আমি একই সাথে পেয়েছি -nE( -peকোথা থেকে এসেছিল তা জানেন না ! অবশ্যই শুক্রবার হতে হবে ...) আমি যখন আপডেট পেয়েছি তখন আমি আপডেট করব! ভাগ করে নেওয়ার জন্য ধন্যবাদ!

— ডম হেস্টিংস

1

এসওএমএল , 8 বাইট (প্রতিদ্বন্দ্বী)

 a b.{;t⁴+

ব্যাখ্যা:

 a b.{;t⁴+                                        stack on 1st cycle
 a              push "a"                               ["a"]
   b            push "b"                               ["a","b"]
    .{          repeat input times                     ["a","b"]
      ;         swap the two top things on the stack   ["b","a"]
       t        output the top thing on the stack      ["b","a"]
        ⁴       copy the 2nd from top thing from stack ["b","a","b"]
         +      join them together                     ["b","ab"]

এটি প্রতিযোগিতামূলক না হওয়ার কারণ হ'ল এই ভাষাটি এখনও বিকাশে রয়েছে এবং এটি লেখার সময় আমি কয়েকটি নতুন ফাংশন যুক্ত করেছি।

এছাড়াও, পিপিসিজিতে প্রথম পদ!

— dzaima
সূত্র

1

পিপিসিজিতে আপনাকে স্বাগতম! দুর্দান্ত প্রথম পোস্ট!

— অলিভার নি

1

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

'a'bVUFX,XYUYJV

1

সি , 156 বাইট (ইনডেন্ট ব্যতীত)

void f(int n)
{
    char u[999]="a",v[999]="b",*a=u,*b=a+1,*c=v,*d=c+1,*e,i;
    for(i=0;i<n;++i)
    {
        printf("%s\n",a);
        for(e=c;*b++=*e++;);
        e=a;a=c;c=e;e=b+1;b=d;d=e;
    }
}

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

— ফিল
সূত্র

আপনি হার্ডকোড করেছেন 5তবে এটি ব্যবহারকারীর ইনপুট হওয়া উচিত

— কার্ল ন্যাপফ

হুম ... আমি ধাঁধাটিতে "ইউজার ইনপুট "টিকে প্রয়োজন হিসাবে দেখছি না ... পার্ল, পাইথন, সি ++, ... উত্তরগুলির মতো একই পথ অনুসরণ করে" ইনড মেইন () "এর সাথে" অকার্যকর এফ (ইন্টার ঢ) "।

— ফিল

Given N (2 <= N), print N lines of the letter Fibonacci series like this (i.e. N = 5)

— কার্ল ন্যাপফ

ভাল, ব্যবহারকারীর ইনপুট শব্দের ক্ষেত্রে একটি খারাপ পছন্দ ছিল। আমি বলতে চাইছি আরও গতিশীল Nএবং স্থির নয়। অথবা ব্যবহারকারী এমন কেউ হতে পারেন যা আপনার ফাংশন / প্রোগ্রামটি ব্যবহার করে।

— কার্ল ন্যাপফ

নুল টার্মিনেটরটি অনুলিপি না করার বিষয়ে আমি একটি বোকা ভুল সংশোধন করেছি। আমি ফাংশনটি আরও পঠনযোগ্য স্থানে রেখেছি (একটি লাইনার মজাদার, তবে কার্যকর নয়)। প্রকৃতপক্ষে এই ফাংশনটি পরীক্ষা করতে, এটি ব্যবহার করুন: int main (int n, char ** p) {f (n <2? 5: atoi (p [1]));

— ফিল

1

পিএইচপি, 63 62 বাইট

পুনরাবৃত্ত সংস্করণ:

function f($n,$a=a,$b=b){return$n--?"$a
".f($n,$b,$a.$b):'';}

— ক্রিপ্টো
সূত্র

অপ্রয়োজনীয় সাদা স্থান পরেreturn

— টাইটাস

0

পাইথ , 17 বাইট

J,\a\bjP.U=+Js>2J

একটি প্রোগ্রাম যা কোনও পূর্ণসংখ্যার ইনপুট নেয় এবং ফলাফল মুদ্রণ করে।

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

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

J,\a\bjP.U=+Js>2J  Program. Input: Q
 ,\a\b             Yield the two element list ['a', 'b']
J                  Assign to J
        .U         Reduce over [0, 1, 2, 3, ..., Q] (implicit input):
          =J+        J = J +
              >2J     the last two elements of J
             s        concatenated
       P           All of that except the last element
      j            Join on newlines
                   Implicitly print

— TheBikingViking
সূত্র

0

পাইথ - 16 15 বাইট

A"ab" m=H+
~GHH

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

— Maltysen
সূত্র

0

এপিএল, 30 বাইট।

⎕IOঅবশ্যই 1।

{⎕←⍵}¨{⍵∊⍳2:⍵⌷'ab'⋄∊∇¨⍵-⌽⍳2}¨⍳

— Zachary
সূত্র

0

গণিত, 49 বাইট

f@1="a";f@2="b";f@n_:=f[n-2]<>f[n-1];g=f~Array~#&

gএকক সংখ্যার ইনপুট গ্রহণ করে একটি ফাংশন সংজ্ঞায়িত করে ; স্ট্রিংগুলির একটি তালিকা প্রদান করে। স্ট্রিং-জয়েনিং অপারেটরটি ব্যবহার করে সোজাভাবে পুনরাবৃত্তির প্রয়োগ implementation<>.

গণিত, 56 বাইট

NestList[#~StringReplace~{"a"->"b","b"->"ab"}&,"a",#-1]&

নামহীন ফাংশন, উপরের মতো একই ইনপুট / আউটপুট ফর্ম্যাট। এই সমাধানটি স্ট্রিংগুলি উত্পন্ন করার জন্য একটি বিকল্প উপায় ব্যবহার করে: তালিকার প্রতিটি স্ট্রিং একই সাথে প্রতিস্থাপনের ফলাফল, পূর্ববর্তী স্ট্রিংয়ে, "a" এর "বি" এর সমস্ত উপস্থিতি এবং "আব" এর সাথে "খ" এর সমস্ত উপস্থিতি।

— গ্রেগ মার্টিন
সূত্র

0

গ্রোভি, 79 বাইট

{println("a\nb");x=['a','b'];(it-2).times{println(y=x.sum());x[0]=x[1];x[1]=y}}

— Magic Octopus Urn
সূত্র

0

PHP, 53 bytes

for($a=b,$b=a;$argv[1]--;$a=($_=$b).$b=$a)echo$b.'
';

— chocochaos
সূত্র

save one byte by using double quotes and putting $b in the string.

— Titus

0

C++11, 89 98 bytes

+7 bytes for all lines, not only the last one. +2 bytes more for N being the number of lines printed, not some 0-based stuff.

#include<string>
using S=std::string;S f(int n,S a="a",S b="b"){return n-1?a+"\n"+f(n-1,b,a+b):a;}

Usage:

f(5)

— Karl Napf
সূত্র

0

Ruby (1.9+) 46 bytes

a,b=?a,?b;ARGV[0].to_i.times{puts a;a,b=b,a+b}

— shabunc
সূত্র

একটি চিঠি ফিবোনাচি মুদ্রণ করুন

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

হাস্কেল, 29 35 32 বাইট

05 এ বি 1 ই , 12 11 বাইট

জেলি , 11 10 বাইট

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

জাভা 7, 69 বাইট

ungolfed

ইমাস, 26 , 25-ইশ কীস্ট্রোক

কার্যক্রম

ব্যাখ্যা

এন = 10 সহ

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

সিজেম, 19 17 বাইট

ভি , 18 বাইট

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

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

রেটিনা , 33 বাইট

ব্যাখ্যা

ব্যাচ, 102 93 বাইট

আমার গল্ফ, 63 বাইট স্ট্যাক করুন

পার্ল, 36 35 বাইট

পার্ল, 45 +1 = 46 বাইট

পার্ল, 42 বাইট

সুইফট 3, 76 বাইট

পার্ল, 48 বাইট

ব্যবহার

এসওএমএল , 8 বাইট (প্রতিদ্বন্দ্বী)

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

সি , 156 বাইট (ইনডেন্ট ব্যতীত)

পিএইচপি, 63 62 বাইট

পাইথ , 17 বাইট

পাইথ - 16 15 বাইট

এপিএল, 30 বাইট।

গণিত, 49 বাইট

গণিত, 56 বাইট

গ্রোভি, 79 বাইট

PHP, 53 bytes

C++11, 89 98 bytes

Ruby (1.9+) 46 bytes