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/ |