以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://222.73.7.161/bbs/index.asp)
--  公式模型编写问题提交  (http://222.73.7.161/bbs/list.asp?boardid=4)
----  帮忙写个循环语句，谢谢  (http://222.73.7.161/bbs/dispbbs.asp?boardid=4&id=175999)
--  作者：zjhz102318
--  发布时间：2020/5/12 16:22:24
--  帮忙写个循环语句，谢谢
DD是一个变量，需要从nn=2开始到nn=100为止，找到第一个KURT(DD,NN)大于0的NN值是几，如果全都是负值则NN取值1.
写了一整天了，对循环语句实在陌生，完败，只好麻烦你们，谢谢
--  作者：FireScript
--  发布时间：2020/5/12 16:37:43
--  
 m:=1;//默认设置为1
for i=22 to 100 do
begin
if KURT(c,i)>0 then
begin
m:=i;//赋值给M
BREAK;//第一次满足条件直接退出循环
end
end
result:m;
--  作者：zjhz102318
--  发布时间：2020/5/12 16:40:08
--  
好的，非常感谢，我试试