Fibonačio skaičius

Per Algoritmų teorijos paskaitą gavau užduotį, sukurti programą, kuri parašytų reikiamą kiekį Fibonačio skaičių.

Fibonačio skaičių seka – sveikųjų skaičių seka {Fn}, nusakoma taip: F0 = 0, F1 = 1, Fn+1 = Fn + Fn-1. Seka prasideda šiais skaičiais: 0, 1, 1, 2, 3, 5, 8, 13, 21, 34, 55, 89, 144, 233. Paprasčiau tariant, kiekvienas šios sekos skaičius lygus dviejų prieš jį einančių skaičių sumai.

Taigi, pateikiu savo programą – SIŲSTIS

7 thoughts on “Fibonačio skaičius

  1. funkcija fibonačio skaičiui rasti:
    function fibo(n: integer);
    var fn, fn1, fn2, k : integer;
    begin
    fn1 := 1;
    fn := 0;
    for k := 1 to n do
    begin
    fn2 : = fn1;
    fn1 := fn;
    fn := fn1 + fn2;
    end;
    fibo := fn;
    end;

  2. Labas.
    Bandau programuoti Pascal’iu.
    Ką tik atsisiunčiau Tavo uždavinį apie Fibonačio skaičius. Patark, kaip suprogramuoti panašaus tipo uždavinį, tik reikia nustatyti, ar duotas skaičius yra Fibonačio skaičius. Jei nėra, išvesti į eraną du jo kaimynus. Ačiū.

Leave a Reply