lisp2arx
Visual Programming for AutoLisp
Mathématiques en programmation Lisp..
doc2cpp,doc2lsp, sld2lsp, bmp2dcl,
free__GifCcapture for all-CAD'platforms..
|
Nou pe simpatie:
lonely_32
 | Femeie
24 ani
Valcea
cauta Barbat
26 - 57 ani |
|
|
lisp2arxReguliInregistrareLoginPozeNu sunteti logat. Lista Forumurilor Pe Tematici
|
| #1 |
|
|
(defun myLast (L)
(if (eq (cdr L) '())
(car L)
(myLast (cdr L)))) ;Evaluates to the last element of list L
(defun myCount (X L)
(cond ((eq L '()) 0)
((eq X (car L))(+ 1 (myCount X (cdr L))))
(+ (myCount X (cdr L))))) ;Evaluates to number of occurrences of X in L
(defun myMember (X L)
(cond ((eq L '()) '())
((eq X (car L)) t)
(t (myMember X (cdr L)))))
Code:
Noi daca specia umanoida este pregatita? , multe calculatoare par a aveea calcule matematice ale borgilor?. Noi oameni nici nu am zburat cel putin 100anii prin Cosmos, cu navete, avioane sau ozn-uri si noi ne-am apucat de religia Borgilor!!! Zeii borgilor stiu daca aceste super-computere aduc bine? |
_______________________________________
psw: cea de la wjndowsXP gigabyte..
|
|
| |
|
