版块导航: 正在加载中...

登录注册

应《网络安全法》要求，自2017年10月1日起，未进行实名认证将不得使用互联网跟帖服务。为保障您的帐号能够正常使用，请尽快对帐号进行手机号验证，感谢您的理解与支持！

24小时热门版块排行榜

返回列表

皓小天

木虫之王 (职业作家)

应助: 19 (小学生)
贵宾: 0.1
金币: 76016.6
散金: 502
红花: 137
帖子: 3801
在线: 869小时
虫号: 1864745
注册: 2012-06-19
性别: GG
专业: 力学中的基本问题和方法

[求助] 编程模式下1stopt如何使用积分拟合已有1人参与

编程模式下1stopt如何拟合下面的代码，版本6.0
要求：在编程模式下，正确的可执行代码和正确的运行结果
@dingd @月只蓝
Parameter a,b,c,d;
Variable x,y;
StartProgram [Pascal];
Procedure MainModel;
var
i:integer;
t:double;
begin
for i:=0 to DataLength-1 do
begin
y:=a-b*exp(-c*x^d)*int((t+x),t:=0.1,c);
end;
End;
EndProgram;
Data;
0.05       0.13
0.15       0.13
0.25       0.19
0.35       0.34
0.45       0.53
0.55       0.71
0.65       1.06
0.75       1.6
0.85       1.64
0.95       1.83
1.05       2.09
1.15       2.05
1.25       2.13
1.35       2.12
1.45       2.09
运行结果：
\1stopt 6.0\lib\fitdll(1)
\1stopt 6.0\lib\fitdll(1)
\1stopt 6.0\lib\fitdll(1)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\integrateunit_(1)
\1stopt 6.0\lib\integrateunit_(5)
\1stopt 6.0\lib\integrateunit_(7)
\1stopt 6.0\lib\integrateunit_(16)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\integrateinfunit_(1)
\1stopt 6.0\lib\integrateinfunit_(5)
\1stopt 6.0\lib\integrateinfunit_(7)
\1stopt 6.0\lib\integrateinfunit_(10)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(6)
\1stopt 6.0\lib\fitdll(29) error: undeclared identifier: 'x'
\1stopt 6.0\lib\fitdll(248) error: expression expected but ';' found
\1stopt 6.0\lib\fitdll(249) error: expression expected but ';' found
\1stopt 6.0\lib\fitdll(320) error: missing operator or semicolon
\1stopt 6.0\lib\fitdll(323) error: undeclared identifier: '3'
\1stopt 6.0\lib\fitdll(328) error: missing operator or semicolon
\1stopt 6.0\lib\fitdll(331) error: undeclared identifier: '4'
\1stopt 6.0\lib\fitdll(336) error: missing operator or semicolon
\1stopt 6.0\lib\fitdll(339) error: undeclared identifier: '5'
\1stopt 6.0\lib\fitdll(344) error: missing operator or semicolon
\1stopt 6.0\lib\fitdll(348
error: undeclared identifier: '6'
\1stopt 6.0\lib\fitdll(352) error: statement expected, but expression of type 'double' found
\1stopt 6.0\lib\fitdll(25) error: label declared and referenced, but not set: '30'
\1stopt 6.0\lib\fitdll(361) error: declaration expected but identifier 'temdy__i__' found
\1stopt 6.0\lib\fitdll(365) error: declaration expected but identifier 'temdy__i__' found
\1stopt 6.0\lib\fitdll(368) error: '.' expected but ';' found
\1stopt 6.0\lib\fitdll(372) warning: text after final 'end.' - ignored by compiler
\1stopt 6.0\lib\fitdll(392)
Compile failed, check your program codes please!

回复此楼

» 猜你喜欢

PRB投稿，Acknowledgment sent to author状态十天了已经有3人回复
PVA溶解已经有2人回复
物理学I论文润色/翻译怎么收费? 已经有90人回复
基金申请已经有44人回复
CSC与新西兰维多利亚大学PhD奖学金项目已经有0人回复
新西兰Robinson研究所招聘CSC公派访问人员已经有0人回复
帮我的英语口语老师找学生已经有0人回复
什么时候开奖？已经有13人回复
散金币祈福已经有94人回复
青基已中已经有1人回复

» 本主题相关价值贴推荐，对您同样有帮助:

编程模式下1stopt如何使用积分拟合已经有2人回复

请不要站内找我要书，如果需要请到书籍板块求助

1楼 2015-10-06 20:56:43

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

dingd

铁杆木虫 (职业作家)

计算强帖: 4
应助: 1641 (讲师)
金币: 15037.3
散金: 101
红花: 234
帖子: 3410
在线: 1223.7小时
虫号: 291104
注册: 2006-10-28

【答案】应助回帖

★ ★
感谢参与，应助指数 +1
ben_ladeng: 金币+2, 辛苦了 2015-10-09 07:24:51

改成如下试试：

CODE:

Parameter a,b,c,d;

Variable x,y;

StartProgram [Pascal];

Procedure MainModel;

var

i:integer;

t:double;

begin

for i:=0 to DataLength-1 do

begin

y[i]:=a-b*exp(-c*x[i]^d)*int((t+x[i]),t=0.1,c);

end;

End;

EndProgram;

Data;

0.05        0.13

0.15        0.13

....

赞一下

回复此楼

2楼2015-10-06 21:54:16

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

皓小天

木虫之王 (职业作家)

应助: 19 (小学生)
贵宾: 0.1
金币: 76016.6
散金: 502
红花: 137
帖子: 3801
在线: 869小时
虫号: 1864745
注册: 2012-06-19
性别: GG
专业: 力学中的基本问题和方法

引用回帖:

2楼: Originally posted by dingd at 2015-10-06 21:54:16
改成如下试试：

Parameter a,b,c,d;
Variable x,y;
StartProgram ;
Procedure MainModel;
var
i:integer;
t:double;
begin
for i:=0 to DataLength-1 do
begin
y:=a-b*exp(-c*x^d)*int((t+x),t=0.1,c) ...

你好，
我按照你的代码进行了运行，仍然出错，代码如下：
Parameter a,b,c,d;
Variable x,y;
StartProgram [Pascal];
Procedure MainModel;
var
i:integer;
t:double;
begin
for i:=0 to DataLength-1 do
begin
y:=a-b*exp(-c*x^d)*int((t+x),t=0.1,c);
end;
End;
EndProgram;
Data;
0.05       0.13
0.15       0.13
0.25       0.19
0.35       0.34
0.45       0.53
0.55       0.71
0.65       1.06
0.75       1.6
0.85       1.64
0.95       1.83
1.05       2.09
1.15       2.05
1.25       2.13
1.35       2.12
1.45       2.09
结果如下：
\1stopt 6.0\lib\fitdll(1)
\1stopt 6.0\lib\fitdll(1)
\1stopt 6.0\lib\fitdll(1)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\integrateunit_(1)
\1stopt 6.0\lib\integrateunit_(5)
\1stopt 6.0\lib\integrateunit_(7)
\1stopt 6.0\lib\integrateunit_(16)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\integrateinfunit_(1)
\1stopt 6.0\lib\integrateinfunit_(5)
\1stopt 6.0\lib\integrateinfunit_(7)
\1stopt 6.0\lib\integrateinfunit_(10)
\1stopt 6.0\lib\fitdll(4)
\1stopt 6.0\lib\fitdll(6)
\1stopt 6.0\lib\fitdll(31) warning: return value of function 'func__i__' might be undefined
\1stopt 6.0\lib\fitdll(320) error: missing operator or semicolon
\1stopt 6.0\lib\fitdll(323) error: undeclared identifier: '3'
\1stopt 6.0\lib\fitdll(328) error: missing operator or semicolon
\1stopt 6.0\lib\fitdll(331) error: undeclared identifier: '4'
\1stopt 6.0\lib\fitdll(336) error: missing operator or semicolon
\1stopt 6.0\lib\fitdll(339) error: undeclared identifier: '5'
\1stopt 6.0\lib\fitdll(344) error: missing operator or semicolon
\1stopt 6.0\lib\fitdll(348) error: undeclared identifier: '6'
\1stopt 6.0\lib\fitdll(352) error: statement expected, but expression of type 'double' found
\1stopt 6.0\lib\fitdll(25) error: label declared and referenced, but not set: '30'
\1stopt 6.0\lib\fitdll(361) error: declaration expected but identifier 'temdy__i__' found
\1stopt 6.0\lib\fitdll(365) error: declaration expected but identifier 'temdy__i__' found
\1stopt 6.0\lib\fitdll(368) error: '.' expected but ';' found
\1stopt 6.0\lib\fitdll(372)
Warning: Text after final 'END.' - ignored by compiler
\1stopt 6.0\lib\fitdll(392)
Compile failed, check your program codes please!

赞一下

回复此楼

请不要站内找我要书，如果需要请到书籍板块求助

3楼2015-10-06 22:11:47

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

dingd

铁杆木虫 (职业作家)

计算强帖: 4
应助: 1641 (讲师)
金币: 15037.3
散金: 101
红花: 234
帖子: 3410
在线: 1223.7小时
虫号: 291104
注册: 2006-10-28

这里运行没问题啊，单机企业版6.0的。

赞一下

回复此楼

4楼2015-10-09 10:07:41

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

皓小天

木虫之王 (职业作家)

应助: 19 (小学生)
贵宾: 0.1
金币: 76016.6
散金: 502
红花: 137
帖子: 3801
在线: 869小时
虫号: 1864745
注册: 2012-06-19
性别: GG
专业: 力学中的基本问题和方法

引用回帖:

4楼: Originally posted by dingd at 2015-10-09 10:07:41
这里运行没问题啊，单机企业版6.0的。

可以麻烦大神把结果和代码附上来吗，为什么我的有问题啊

赞一下

回复此楼

请不要站内找我要书，如果需要请到书籍板块求助

5楼2015-10-09 10:09:46

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

皓小天

木虫之王 (职业作家)

应助: 19 (小学生)
贵宾: 0.1
金币: 76016.6
散金: 502
红花: 137
帖子: 3801
在线: 869小时
虫号: 1864745
注册: 2012-06-19
性别: GG
专业: 力学中的基本问题和方法

引用回帖:

4楼: Originally posted by dingd at 2015-10-09 10:07:41
这里运行没问题啊，单机企业版6.0的。

可以麻烦大神把结果和代码附上来吗，为什么我的有问题啊

赞一下

回复此楼

请不要站内找我要书，如果需要请到书籍板块求助

6楼2015-10-09 10:10:06

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

dingd

铁杆木虫 (职业作家)

计算强帖: 4
应助: 1641 (讲师)
金币: 15037.3
散金: 101
红花: 234
帖子: 3410
在线: 1223.7小时
虫号: 291104
注册: 2006-10-28

就是2#给的代码。你用的什么版本？正版购买的？

赞一下

回复此楼

7楼2015-10-09 10:12:41

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

皓小天

木虫之王 (职业作家)

应助: 19 (小学生)
贵宾: 0.1
金币: 76016.6
散金: 502
红花: 137
帖子: 3801
在线: 869小时
虫号: 1864745
注册: 2012-06-19
性别: GG
专业: 力学中的基本问题和方法

引用回帖:

7楼: Originally posted by dingd at 2015-10-09 10:12:41
就是2#给的代码。你用的什么版本？正版购买的？

和你一样的版本，正版购买

赞一下

回复此楼

请不要站内找我要书，如果需要请到书籍板块求助

8楼2015-10-09 10:24:46

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

相关版块跳转我要订阅楼主皓小天的主题更新

返回列表

最具人气热帖推荐 [查看全部]		作者	回/看	最后发表

[基金申请] 国自然评审意见 +11	wangmingqi 2026-08-28	15/750	2026-08-29 00:17 by fangyl2005
[基金申请] 为什么资助数各大高校都创新高，自己申请怎么就这么难 +12	Kittylucky 2026-08-27	13/650	2026-08-29 00:04 by superceng
[基金申请] 国自然面上复盘~欢迎讨论 (金币+15) +13	晴天加油 2026-08-26	14/700	2026-08-28 18:36 by huagongfeihu
[教师之家] 导师吐槽：我怎么摊上了这么个极品研究生！ +8	苏东坡二世 2026-08-23	8/400	2026-08-28 14:41 by lkforward
[基金申请] 哪位高人中了，把查询到的截图贴出来让我看看，让我长长见识 +5	yuleib84 2026-08-26	6/300	2026-08-28 00:02 by yudaoqian88
[基金申请] 看板上这么多中的，有点像50人群里49个人都是骗子的那种感觉…… +5	a089 2026-08-26	6/300	2026-08-27 14:05 by jonewore
[基金申请] 怎么看青基中了没有啊 +5	叶九微 2026-08-26	5/250	2026-08-27 10:35 by l_zh2008
[基金申请] 为什么国际(地区)合作与交流项目没有放榜？ 10+3	majunge000 2026-08-26	11/550	2026-08-27 08:42 by 北京莱茵编辑
[基金申请] 范进中举一文的中心思想 +9	炎黄贵胄 2026-08-22	10/500	2026-08-26 15:40 by semaglutide
[基金申请] 2026年8月25日国自然放榜前突然收到列入评审专家邮件，有关系吗？ +25	木水思豆 2026-08-25	28/1400	2026-08-26 14:53 by draco1987
[基金申请] 能否退出参与的面上项目解除限项 +23	koalala 2026-08-24	26/1300	2026-08-26 14:29 by 宝贝虫子
[基金申请] 为什么国自然不能直接公布 +4	bjdxyxy 2026-08-26	4/200	2026-08-26 13:12 by qingmu1201
[基金申请] 国合里面能看到了 +7	一怀馨秋 2026-08-26	7/350	2026-08-26 11:23 by zhaosm1982
[基金申请] 系统进不去 +4	yanglien 2026-08-26	5/250	2026-08-26 11:10 by wenfengw83
[基金申请] 国合可查了 +3	paperzjh 2026-08-26	3/150	2026-08-26 10:41 by LemmonTr
[基金申请] 今天务委会开完了，明天出结果吗 +19	angus9576 2026-08-25	23/1150	2026-08-26 10:03 by zp519
[基金申请] 国合现在查不到了吗？ +10	chengyan1220 2026-08-24	20/1000	2026-08-26 08:57 by peasantsprig
[基金申请] 牛来！米来！面来！ +8	beefly 2026-08-26	8/400	2026-08-26 08:37 by xuzhipiao
[基金申请] 没有任何消息-是不是就凉了 +9	图啦图啦 2026-08-24	10/500	2026-08-25 11:59 by 南海小哥
[教师之家] 跳槽后在研项目怎么办？ +5	简单化xn 2026-08-22	10/500	2026-08-23 12:38 by 简单化xn

24小时热门版块排行榜

[求助] 编程模式下1stopt如何使用积分拟合 已有1人参与

» 猜你喜欢

» 本主题相关价值贴推荐，对您同样有帮助:

【答案】应助回帖

[求助] 编程模式下1stopt如何使用积分拟合已有1人参与