24小时热门版块排行榜

返回列表

fish2012

铁虫 (小有名气)

应助: 3 (幼儿园)
金币: 43.9
帖子: 124
在线: 117.3小时
虫号: 908189
注册: 2009-11-20
性别: MM
专业: 数学物理

[求助] 1stopt函数表达式有误已有1人参与

请高手看看以下1stopt代码，运行后总提示函数表达式有误

Parameter p0=[80,300],p1=[100,150],p2=[-10,10],p3=[-10,10],p4=[0,1],p5=[-1,1],p6=[-1,1],p7=[-100,100],p8=[80,200];
Minimum;
StartProgram [Pascal];
var
i,j,N:integer;
x:array of double;
begin
for i :=0 to 100 do begin
      x :=p2+i;
end;
N :=length(x);
SetLength(x,N);
j :=509;
if (j mod 2=1) then
begin
      FunctionResult :=p0+p1+p2+p3+p4+p5+p6+p7+p8-x[N-5];
end
else
      FunctionResult :=100000;

End;
EndProgram;

回复此楼

» 猜你喜欢

如何从铁电相到顺电相。已经有1人回复
各位大佬，求一份最新Wien2k版本作为学习用途已经有0人回复
物理学I论文润色/翻译怎么收费? 已经有194人回复
南科大活性流体和软物质课题组诚招2027级博士、硕士研究生和博后已经有42人回复
瑞典林雪平大学博士后招聘｜PEC Water Splitting 方向已经有24人回复
PRB投稿，Acknowledgment sent to author状态十天了已经有3人回复
PVA溶解已经有1人回复
基金申请已经有44人回复
CSC与新西兰维多利亚大学PhD奖学金项目已经有0人回复
新西兰Robinson研究所招聘CSC公派访问人员已经有0人回复
帮我的英语口语老师找学生已经有0人回复

1楼 2016-06-03 22:29:17

已阅回复此楼关注TA 给TA发消息送TA红花 TA的回帖

月只蓝

主管区长 (职业作家)

专家经验: +1059
计算强帖: 8
应助: 1712 (讲师)
贵宾: 8.888
金币: 68165.7
散金: 1938
红花: 443
沙发: 4
帖子: 4373
在线: 3292.3小时
虫号: 1122189
注册: 2010-10-14
专业: 宇宙学
管辖: 计算模拟区

【答案】应助回帖

感谢参与，应助指数 +1

Parameter p0=[80,300],p1=[100,150],p2=[-10,10],p3=[-10,10],p4=[0,1],p5=[-1,1],p6=[-1,1],p7=[-100,100],p8=[80,200];

Parameter关键词没用对，要限制参数范围，参数后直接加中括号，等号是多余的。