帮我看一下那里有错误好吗 单循环 不运行

bbk2720

data = Table[0, {i, 0, qmax, 0.002}, {j, 1, 4}];
* l. l' [# H! a+ _' J) y% Elength = Dimensions[data][[1]]
  c( X8 F* {  I0 O8 J! S6 E/ r8 p8 yDo [q1 = Range[0, qmax, 0.002][[i]];
   q = q1 Ew Ipw/R/L^2;
MM = q L^2/8;
; u& _3 R) H" ?* y If [  MM <= Mc,
  lg = L/2;
6 s( E4 _& d( H/ F  C- @   w = q/lg^3/2/EI (L/3 - lg/4),
  ly = L/2;
' X, I/ Z  n# E) u  lg = L/2 - L/2*Sqrt[1 - 8 Mc/q/L^2];
3 C, Z, j+ q% O  weiyi1 = q*lg^3/2/EI (L/3 - lg/4);
) ^9 L3 H3 C% I$ p  w = weiyi1 + (cmax - Cc)/(mmax - Mc) (q*ly^3/2*(L/3 - ly/4) +
1 g. M) T) a" Z  A2 t2 m       Mc/2 (lg^2 - ly^2) - q*lg^3/2*(L/3 - lg/4)) +
    Cc/2 (ly^2 - lg^2);];
w1 = w/L;
data[[i]] = {q1, w1, q, w};, {i, 1, length};]
0 I6 B4 @% H) X& O3 @提示以下错误
) I! r( z. J9 ]- j) eDo::itform: Argument {i,1,length}; at position 2 does not have the correct form for an iterator. >>
8 ?  M3 Z1 H7 P
0 R/ W% v8 i( \" D3 h& M7 M2 ^9 ~拜托帮我看一下

hopeoflight

不太懂。。。。

zj-jscsbao

什么软件？……