ADeko Technologies
http://www.adeko.com/phpBB3/

Lispde sıralı değişkenleri bir liste olarak tutmak
http://www.adeko.com/phpBB3/viewtopic.php?f=7&t=182
1. sayfa (Toplam 1 sayfa)

Yazar:  Destek/Support [ 23 Eyl 2003 20:24 ]
Mesaj Başlığı:  Lispde sıralı değişkenleri bir liste olarak tutmak

Aşağıdaki lisp kodu bir liste içinde (listem) bir fonksiyondan gelen verileri saklar.

<pre id=code><font face=courier size=2 id=code>
(defun c:Listele (/ listem i)
(setq listem nil
i 0
)
(while (< i 10)
(setq listem (cons (birIslem i) listem)) <font color=green>;cons bir atomu listenin başına ekler</font id=green>
(setq i (1+ i))
)

<font color=green>;tam burada listem= '(18 16 14 12 10 8 6 4 2 0)</font id=green>
(setq listem (reverse listem))
<font color=green>;burada da listem= '(0 2 4 6 8 10 12 14 16 18)</font id=green>


(setq kacinci (getint "\nListenin kaçıncı elemanını görmek istiyorsunuz: "))

(princ (nth kacinci listem)) <font color=green>;İlk elemanın index nosu 0 (sıfır)dır</font id=green>
(princ)
)

<font color=green>;Kullanıcı tanımlı herhangi bir işlem</font id=green>
(defun birIslem (parametre1)
(* 2 parametre1)
)
</font id=code></pre id=code>

1. sayfa (Toplam 1 sayfa) Tüm zamanlar UTC + 2 saat [ GITZ ]
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group
http://www.phpbb.com/