|
|
|
#1
|
|||
|
|||
|
[code] (defun pCount (number) (let (ans 0) (do ((iterator 1 (+ iterator 2))) ((equal iterator number)) (if (equal (0) (rem iterator 3))) (+ ans iterator) (if (equal (0) (rem iterator 5))) (+ ans iterator) (+ ans 0))))
__________________
Website Development Domain Name Forum |
![]() |
|
|