请问下各位,下面的式子,我想用循环实现,编程时出现了点问题,麻烦大家给指点指点~~) o1 d8 W9 ^+ c; A8 x# Z2 p, M/ y
y2(1)=(m1-m2)(m1-m3)(m1-m4)+ T! S4 n. y; S2 J" | Q2 }1 P3 s
y2(2)=(m2-m1)(m2-m3)(m2-m4)" q. N3 Y5 v8 ^3 {0 u6 v# x1 m9 @
y2(3)=(m3-m1)(m3-m2)(m3-m4)
# q }/ u; Z+ my2(4)=(m4-m1)(m4-m2)(m4-m3)
5 p0 D, \$ X3 k9 s; g/ G3 E' z7 u! {* g
程序如下' p2 v( A1 y# r0 P) a! d
NUMBER/m(4),y2(4)% k. B) ^3 o7 e
DATA/m(1..4),5,4,3,28 p: L) P5 D: B5 l5 a' l; m' P
& e! b) H: p; H6 j0 O# nDATA/y2(1..4),1,1,1,1" K1 `% a. `( ]
trm2:
' S: }; X: M$ _: F. aDO/trm3:,i,1,4
/ u9 D3 Q* A Z( j; B7 M: sDO/trm3:,j,1,4
# ]+ o% s* H7 a% w. G
$ x4 \& W+ {6 @! E! p2 d IFTHEN/i<>j0 N# {0 ^2 @6 K, j" U: Q4 v
y2(i)=y2(i)*(m(i)-m(j))6 M% W8 G9 o+ B5 i8 r% D
JUMP/trm2:; y. u4 H, j+ v% H6 i6 g
ENDIF) a, c4 S7 \0 M' s2 R2 w
PRINT/y2(i)+ |+ g( s+ }2 G0 n/ {
trm3:
, \; S8 z9 h2 z9 p) O6 }2 Nhalt7 v! S+ q/ D/ ?2 e
也是忙活了好几天,怎么弄也没弄对,麻烦大家帮忙看一下哪里不对,请多多指点^_^ |