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

wll

请问下各位，下面的式子，我想用循环实现，编程时出现了点问题，麻烦大家给指点指点~~
y2(1)=(m1-m2)(m1-m3)(m1-m4)
: K' E% R1 _6 ~, z; Gy2(2)=(m2-m1)(m2-m3)(m2-m4)
y2(3)=(m3-m1)(m3-m2)(m3-m4)
y2(4)=(m4-m1)(m4-m2)(m4-m3)
. e2 z6 {1 B7 t$ F3 ?9 P. }. I
+ X5 V/ K5 o6 q+ y: T4 ~' x程序如下
0 k* v7 Z, A9 F$ g( G9 MNUMBER/m(4),y2(4)
DATA/m(1..4),5,4,3,2

: o8 |5 @) x' c. S% W6 o, gDATA/y2(1..4),1,1,1,1
9 C% E# Q9 o: `6 V1 C$ I4 j9 s9 itrm2:
) I& }) d& h3 a0 @+ y3 Z8 Q; F& ]DO/trm3:,i,1,4
7 {' c; d! S$ R) h$ }) c$ |( _DO/trm3:,j,1,4

IFTHEN/i<>j
! ^8 J0 J3 B# u+ `: \' Fy2(i)=y2(i)*(m(i)-m(j))
  y; U4 G* _, Q* r" o) H) T JUMP/trm2:
4 V, R0 w$ ?+ { ENDIF
4 \. w' g# v, z- ZPRINT/y2(i)
$ C8 D3 N  ?- A3 |& w  B$ a! B2 ttrm3:
halt
. i( }& h0 X. r2 T3 }) a也是忙活了好几天，怎么弄也没弄对，麻烦大家帮忙看一下哪里不对，请多多指点^_^

wll

已经解决了 是IF语句用得不对
2 l- x/ z  d( l9 V/ {( s# K/ d最后的程序时这样的
NUMBER/m(4),y2(4)
DATA/m(1..4),5,4,3,2
, v/ f6 U# F0 ^, Q1 r; XDATA/y2(1..4),1,1,1,1
- D5 e& B: K; oDO/trm3:,i,1,4
. V# [' [9 @) v' n/ J$ v% xDO/trm3:,j,1,4
& \, P% m8 o. B9 l IF/i<>j,y2(i)=y2(i)*(m(i)-m(j))
trm3:
PRINT/y2(1..4)
halt

-KASA-

编程需要细心的