AMADEUS html plain

---

   {\it Fibonacci\_algarv}$(n)$     Antud: naturaalarv $n>2$     Tulemus: tagastatakse v\"ahim algarvuline Fibonacci arv,     \hspace{50pt} mis on suurem kui $n$

---

    abimuutujad: $e, f, g, k$
    $e := f := 1$

---

---


    $e$ ja $f$ on kaks j\"arjestikust Fibonacci arvu
    $g := e + f$ $g$ on j\"argmine Fibonacci arv
    leida uus paar $(e, f)$:
    $e := f$
 ?  $(f := g) \leq n$
 <------

    $f > n$, kontrollida tuleb veel $f$ algarvulisust
 ?  $f$ mod $2 = 0$
    $f$ on paaris
 <------

    $f$ on paaritu

---

 * $k = 3, 5, \ldots, \sqrt{f}$

---


 ? $f$ mod $k = 0$
    $f$ pole algarv, sest jagub arvuga $k$
 <----------
---

 <==========($f$) $f$ osutus algarvuks, l\~opetada ja tagastada vastus

---

---