※ 引述《phs (世故人情情難還...)》之銘言：
: 各位大大,
: 在mathematica裡面,我知道"Do"這個指令可以做重覆迭代的工作,例如
: x=1;Do[x=x+1,{10}];x
: 其中x=1 表示起始值 x_{0}=1
: x=x+1 表示 x_{n+1}=x_{n} +1 這個遞迴關係式
: {10} 表示迭代次數為10次
: 最後;x 為迭代10次之後結果
: 所以跑出來結果是 11
: 但我想請教各位大大, 如果今天遇到一組聯立方程式, 例如
: x_{n+1}=x_{n}+y_{n}+1
: y_{n+1}=y_{n}-x_{n}-1
: 那我該如何下指令呢?一直try不出來>"<
: 感謝各位!
x[0] = 1
y[0] = (你要給我的)
Do[
x[i+1] = x[i] + y[i] + 1 ;
y[i+1] = y[i] - x[i] - 1 ;
,{i,1,10}]
這樣你就 Print[ x[11] , y[11] ];
就有解了。