12 Nov 02:47
[Lisp-br users] Primeiro programa em LISP
Rafael Rosendo <listas <at> rosendo.com.br>
2008-11-12 01:47:29 GMT
2008-11-12 01:47:29 GMT
Oi pessoal, boa noite!
Conheci a linguagem Lisp através de um trabalho que tenho que fazer para a faculdade...
Tenho que fazer um programinha simples utilizando lisp.
Estou tentando fazer algo baseado no que encontrei na internet... e me pintou uma dúvida:
O que exatamente o comando "let" faz?
Achei um código pronto, e com base nele estou tentando fazer algo para a faculdade:
(let ((var 0) (noprime (list)) (index 1) (max 500))
(loop
(setq index (+ index 1))
(if (not (find index noprime))
(progn
(format t "~D~4 <at> T" index)
(setq var (+ var 1))
(let* ((j (* index 2)))
(loop
(pushnew j noprime)
(when (>= j max) (return))
(setq j (+ j index))
)
)
)
)
(when (>= index max) (return))
)
(format t "~%Contagem de primos: ~D~%" var)
)
No código citado acima, o que faz o "let"?
Muito obrigado e abraços!
Rafael Rosendo
RSS Feed