复制内容到剪贴板

代码:

IC:=COST(0);
AC:=COST(100);
R:=(AC-IC)/10;
T0:=IC;
T1:=IC+R*1;
T2:=IC+R*2;
T3:=IC+R*3;
T4:=IC+R*4;
T5:=IC+R*5;
T6:=IC+R*6;
T7:=IC+R*7;
T8:=IC+R*8;
T9:=IC+R*9;
T10:=IC+R*10;
S1:=WINNER(T1)-WINNER(T0);
S2:=WINNER(T2)-WINNER(T1);
S3:=WINNER(T3)-WINNER(T2);
S4:=WINNER(T4)-WINNER(T3);
S5:=WINNER(T5)-WINNER(T4);
S6:=WINNER(T6)-WINNER(T5);
S7:=WINNER(T7)-WINNER(T6);
S8:=WINNER(T8)-WINNER(T7);
S9:=WINNER(T9)-WINNER(T8);
S10:=WINNER(T10)-WINNER(T9);
CYC:T1*S1+T2*S2+T3*S3+T4*S4+T5*S5+T6*S6+T7*S7+T8*S8+T9*S9+T10*S10-R/2
     LINETHICK2 POINTDOT COLOR36699

引用:

gwg 于 2004-10-23 12:31 AM 写道:
[code]IC:=COST(0);
AC:=COST(100);
R:=(AC-IC)/10;
T0:=IC;
T1:=IC+R*1;
T2:=IC+R*2;
T3:=IC+R*3;
T4:=IC+R*4;
T5:=IC+R*5;
T6:=IC+R*6;
T7:=IC+R*7;
T8:=IC+R*8;
T9:=IC+R*9;
T10:=IC+R*10;
S1:=W ...

这个公式原码是编写循环公式的好题目!

好！

谢！

谢谢

看看

ok,thaks

引用:

kjyhao 于 2004-10-24 09:17 PM 写道:
这个公式原码是编写循环公式的好题目!

是呀，你还真会找题目，学会了教我呀！

我怎么不能显示这个指标呢，谁贴个图上来啊。

谢谢支持原码提供

谢谢

谢谢提供原码

不能显示

用数组来写，不过我也不会