24小时热门版块排行榜

>论坛更新日志 (3250)
>虫友互识 (373)
>休闲灌水 (192)
>导师招生 (151)
>文献求助 (137)
>论文道贺祈福 (54)
>考博 (50)
>论文投稿 (48)
>博后之家 (41)
>考研 (36)
>硕博家园 (33)
>公派出国 (28)
>基金申请 (26)
>招聘信息布告栏 (24)
>找工作 (16)
>教师之家 (13)

返回列表

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;

回复此楼

» 猜你喜欢

基元I理论下三大核心空间现象精准推导与细节解析已经有0人回复
基于基元 I 统一理论的反重力理论推导已经有0人回复
物理学I论文润色/翻译怎么收费? 已经有173人回复
基于基元I统一理论的量子力学本源推导已经有1人回复
推荐一款可以AI辅助写作的Latex编辑器SmartLatexEditor，超级好用，AI润色，全免费已经有20人回复
【EI|Scopus 双检索】第六届智能机器人系统国际会议（ISoIRS 2026）已经有1人回复
2026年第四届电动车与车辆工程国际会议（CEVVE 2026）已经有0人回复

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

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

月只蓝

主管区长 (职业作家)

专家经验: +1059
计算强帖: 8
应助: 1712 (讲师)
贵宾: 8.888
金币: 68126.7
散金: 1938
红花: 443
沙发: 4
帖子: 4373
在线: 3291.4小时
虫号: 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关键词没用对，要限制参数范围，参数后直接加中括号，等号是多余的。