请教各位高手解决一道编程题！！！！！没有人能帮忙吗！

Question

1、计算购买音响还银行贷款的问题：
我们刚刚购买了一套音响系统，支付了1000美元,并采用以下的分期付款方式归还贷款：没有首付款，年利率18%（月利率1.5%），在12个月归还本金和利息。以等额本息方法还款（每个月的还款金额相同，其中一部分用来支付利息，一部分用来归还本金。）
（1）计算：每个月需要归还的金额。
（2）计算：为此一共支付了多少利息。

Answer 1

（1）每个月需要归还的金额：$91.68
（2）为此一共支付了多少利息：$100.16

[b]分析：[/b]
每月归还本金 x(i)
每月归还利息 y(i)
i=0,1,2,...,12
x(0)=j(0)=0

方程：
price=1000
x(i)+y(i) = x(i-1)+y(i-1)
∑x(1..12)=price
y(i)=(price-∑x(1..i-1))*1.5/100

[b]Lingo代码[/b]：
[code="lingo"]
MODEL:
SETS:
MONTH /1..13/: x,y;
ENDSETS

DATA:
capital = 1000; !本金;
ENDDATA

!初始值;
x(1)=0;
y(1)=0;
!等额本息约束;
@FOR( MONTH(i)|i#gt#2:
x(i)+y(i)=x(i-1)+y(i-1)
);
!每月利息;
@FOR(MONTH (i)|i#gt#1:
y(i)=(capital-@sum(MONTH(j)|j#lt#i: x))*1.5/100
);
!本金求和;
@SUM(MONTH: x)=capital;
!利息求和;
sumy=@SUM(MONTH: y);
!每月支付本息;
UNIT=x(2)+y(2);
[/code]