Herkese selamlar daha önce lisp Dili ile ilgili örnekleri yapmıştık şimdi devam ediyoruz. Fibonacci serisi kendinden önce gelen iki sayının toplamıyla oluşan dizidir. 1 1 2 3 5 8 13 …
Yukarıdaki kısmı açıklayalım şimdi..
(define (fibo n) ; fibo adıyla yeni bir fonksiyon oluşturuyoruz
(if (= n 1)1 ; 1. elemana geldi mi kontolü ve 1. elemana geldi ise 1 yaz ve bitir
(if(= n 2)1 ; 2.elemana geldi mi kontrolü ve 2. elamana geldi ise 1 yaz
(+ (fibo (- n 1)) ; önceki değer ile
(fibo (- n 2)))))) ;ondan da önceki ile topla dediğimiz kısım
;Fonksiyonumuzu çağırıp fibonacci hesabını yapmasını istiyoruz..
(fibo 1)
(fibo 2)
(fibo 3)
(fibo 4)
(fibo 5)
(fibo 6)
(fibo 7)
1 1 2 3 5 8 13 değerleri görseldeki gibi yazılmış olacaktır. Sizler de bu örüntüyü takip ettirebilir ya da istediğiniz sıradaki(indis) değeri hesaplayabilirsiniz.
Umarım faydalı olmuştur.
