Common Lisp – הבדלי גרסאות
תוכן שנמחק תוכן שנוסף
אין תקציר עריכה |
מ תקלדה |
||
שורה 132:
(* number1 number1)
)
</syntaxhighlight>דוגמה לפעולה [[רקורסיה|רקורסיבית]] אשר מחשבת עד [[סכום]] המספרים מ-0 עד למספר הנתון, כלומר, עבור פרמטר n : <math>{ 1+2+3\cdots+n }</math> , או בכתיב מתמטי :<math>\textstyle \sum_{k=0}^N \displaystyle</math>
(defun sum_to( num1 )
( if ( eq num1 0 )
| |||