一个GRIP小程序，出了点错，麻烦大家指点下^_^

wll

请问下各位，下面的式子，我想用循环实现，编程时出现了点问题，麻烦大家给指点指点~~
& K, T8 d# s5 c0 ~8 A- o* V+ ay2(1)=(m1-m2)(m1-m3)(m1-m4)
4 Z4 |6 r: s6 a( Wy2(2)=(m2-m1)(m2-m3)(m2-m4)
y2(3)=(m3-m1)(m3-m2)(m3-m4)
$ z/ F; c  ^9 W) ey2(4)=(m4-m1)(m4-m2)(m4-m3)
0 o7 v. }# o) M( u$ o( `
程序如下
NUMBER/m(4),y2(4)
( f. g3 c- l- n: c, W' l2 R9 D. `DATA/m(1..4),5,4,3,2
. E$ q8 l$ [/ u* `* m, W! W4 w4 @
/ r9 y* p+ ~1 U  b1 c* vDATA/y2(1..4),1,1,1,1
& h3 l' e7 b2 r2 h: ^% rtrm2:
9 ^; r6 M9 Y$ qDO/trm3:,i,1,4
DO/trm3:,j,1,4

IFTHEN/i<>j
0 d( R4 r* N$ U5 W" by2(i)=y2(i)*(m(i)-m(j))
JUMP/trm2:
ENDIF
# f5 A+ Z, _+ }1 \+ {5 f+ bPRINT/y2(i)
6 L0 c" W% y7 C  Y; U2 ~& @1 mtrm3:
+ m5 k7 H) M1 e) s8 C  z. ahalt
' E$ |6 p" f( {7 D4 Y+ W也是忙活了好几天，怎么弄也没弄对，麻烦大家帮忙看一下哪里不对，请多多指点^_^

wll

已经解决了 是IF语句用得不对
最后的程序时这样的
NUMBER/m(4),y2(4)
# }$ L6 D3 Y  |" D; ^7 CDATA/m(1..4),5,4,3,2
DATA/y2(1..4),1,1,1,1
- U3 S1 X$ J% oDO/trm3:,i,1,4
DO/trm3:,j,1,4
IF/i<>j,y2(i)=y2(i)*(m(i)-m(j))
trm3:
* g7 c  [* K2 U9 Z& w- XPRINT/y2(1..4)
7 D0 w' [  j  j; Q2 r  Uhalt

-KASA-

编程需要细心的