我是一個新手在lisp, 我嘗試編程lisp程序,計算二項式係數迭代(階乘),但不遞歸。 從來就嘗試寄託都,全局函數,局部函數(階乘)), 但我PROGRAMM doesn't的工作,例如,當我的命令:(binom(7 4)),只是得到了一個錯誤 SELECT ALL
(defun binom-coef(a b)
(if (or (< a b) (< b 0))
我有一個計算二項式係數的代碼,但是當數字大於20時,它開始計算錯誤,問題在哪裏?感謝 #include <iostream>
using namespace std;
long int bin(long int x)
{
if(x==0)
return 1;
long int r = x;
for(int i = r-1;i>0;i--)