ゆとり受け身マンだけどプログラミング勉強する #24

24以下、名無しにかわりましてVIPがお送りします:2019/05/01(水) 14:13:06.53 ID:5pqJBtWE

|(defun abcd(y)
| (if(= y 10) (print (abc y))
| (progn
| (defun abc(x)
| (if(= x (* y 10)) nil
| (cons x (abc (+ x y)))
| )
| )
| (print (abc y))
| (abcd (+ y 1))
| )
| )
|)
|(print (abcd 1))
 

このスレッドを全て表示


このスレッドは過去ログです。