版塊導(dǎo)航: 正在加載中...

登錄注冊

應(yīng)《網(wǎng)絡(luò)安全法》要求，自2017年10月1日起，未進(jìn)行實(shí)名認(rèn)證將不得使用互聯(lián)網(wǎng)跟帖服務(wù)。為保障您的帳號能夠正常使用，請盡快對帳號進(jìn)行手機(jī)號驗(yàn)證，感謝您的理解與支持！

24小時熱門版塊排行榜

返回列表

【懸賞金幣】回答本帖問題，作者ymgy將贈送您 200 個金幣

ymgy

銅蟲 (初入文壇)

應(yīng)助: 0 (幼兒園)
金幣: 81.5
帖子: 7
在線: 9.9小時
蟲號: 2022759
注冊: 2012-09-23
專業(yè): 可再生與替代能源利用中的

[求助] 多參數(shù)擬合，求助1stopt代算

1stopt程序，麻煩大神幫我跑一邊程序吧，目前我沒有正版軟件，有點(diǎn)急用，非常感謝�。。�

Constant t=20 ;
Parameter e=[1,10], a(t)=[0.01,100], p(t)=[0.01,100], c(t)=[0.01,100];
Variable x,y[OutPut];
StartProgram [Pascal];
Procedure MainModel;
var i, j: integer;
temD1, temD2, er, ei, k, n: double;
Begin
for j := 0 to DataLength - 1 do begin
      temD1 := 0;
      temD2 := 0;
      for i := 1 to t do begin
         temD1 := temD1 + (sqr(p)*(sqr(a)-sqr(x[j])))/(sqr(sqr(a)-sqr(x[j]))+sqr(c)*sqr(x[j]));
         temD2 := temD2 + (sqr(p)*c*x[j])/(sqr(sqr(a)-sqr(x[j]))+sqr(c)*sqr(x[j]));
      end;
      er := e + temD1;
      ei := temD2;
      k := ei/sqrt(2*(er+sqrt(er*er+ei*ei)));
      n := sqrt((er+sqrt(er*er+ei*ei))/2);
      y[j] :=(sqr(n-1)+k*k)/(sqr(n+1)+k*k);
end;
End;
EndProgram;
Data;
12.000       0.150
11.538       0.161
11.111       0.171
10.714       0.183
10.345       0.192
10.000       0.201
9.677       0.214
9.375       0.225
9.091       0.236
8.824       0.246
8.571       0.256
8.333       0.266
8.108       0.278
7.895       0.290
7.692       0.300
7.500       0.308
7.317       0.314
7.143       0.325
6.977       0.336
6.818       0.346
6.667       0.353
6.522       0.356
6.383       0.362
6.250       0.372
6.122       0.380
6.000       0.386
5.882       0.392
5.769       0.397
5.660       0.402
5.556       0.407
5.455       0.410
5.357       0.414
5.263       0.416
5.172       0.417
5.085       0.422
5.000       0.427
4.918       0.431
4.839       0.434
4.762       0.437
4.688       0.440
4.615       0.443
4.545       0.440
4.478       0.445
4.412       0.453
4.348       0.456
4.286       0.457
4.225       0.462
4.167       0.472
4.110       0.483
4.054       0.486
4.000       0.489
3.947       0.492
3.896       0.494
3.846       0.496
3.797       0.498
3.750       0.500
3.704       0.502
3.659       0.503
3.614       0.505
3.571       0.506
3.529       0.508
3.488       0.515
3.448       0.544
3.409       0.573
3.371       0.580
3.333       0.581
3.297       0.583
3.261       0.584
3.226       0.586
3.191       0.587
3.158       0.589
3.125       0.590
3.093       0.592
3.061       0.594
3.030       0.595
3.000       0.596
2.970       0.597
2.941       0.599
2.913       0.600
2.885       0.602
2.857       0.604
2.830       0.605
2.804       0.607
2.778       0.608
2.752       0.609
2.727       0.611
2.703       0.612
2.679       0.613
2.655       0.614
2.632       0.616
2.609       0.617
2.586       0.618
2.564       0.620
2.542       0.621
2.521       0.623
2.500       0.624
2.479       0.626
2.459       0.627
2.439       0.628
2.419       0.630
2.400       0.631
2.381       0.633
2.362       0.634
2.344       0.635
2.326       0.637
2.308       0.638
2.290       0.639
2.273       0.640
2.256       0.642
2.239       0.643
2.222       0.644
2.206       0.644
2.190       0.644
2.174       0.645
2.158       0.645
2.143       0.646
2.128       0.646
2.113       0.647
2.098       0.648
2.083       0.650
2.069       0.651
2.055       0.652
2.041       0.654
2.027       0.655
2.013       0.657
2.000       0.659
1.987       0.660
1.974       0.662
1.961       0.663
1.948       0.665
1.935       0.666
1.923       0.667
1.911       0.668
1.899       0.670
1.887       0.671
1.875       0.672
1.863       0.673
1.852       0.674
1.840       0.674
1.829       0.667
1.818       0.627
1.807       0.588
1.796       0.580
1.786       0.581
1.775       0.581
1.765       0.581
1.754       0.581
1.744       0.582
1.734       0.583
1.724       0.583
1.714       0.583
1.705       0.583
1.695       0.583
1.685       0.583
1.676       0.584
1.667       0.586
1.657       0.586
1.648       0.585
1.639       0.585
1.630       0.585
1.622       0.584
1.613       0.582
1.604       0.577
1.596       0.567
1.587       0.553
1.579       0.536
1.571       0.520
1.563       0.508
1.554       0.503
1.546       0.502
1.538       0.504
1.531       0.509
1.523       0.514
1.515       0.521
1.508       0.527
1.500       0.534
1.493       0.540
1.485       0.546
1.478       0.550
1.471       0.553
1.463       0.556
1.456       0.557
1.449       0.559
1.442       0.561
1.435       0.563
1.429       0.566
1.422       0.570
1.415       0.575
1.408       0.580
1.402       0.583
1.395       0.585
1.389       0.586
1.382       0.586
1.376       0.586
1.370       0.587
1.364       0.588
1.357       0.589
1.351       0.590
1.345       0.591
1.339       0.593
1.333       0.592
1.327       0.590
1.322       0.588
1.316       0.585
1.310       0.579
1.304       0.573
1.299       0.570
1.293       0.570
1.288       0.572
1.282       0.571
1.277       0.569
1.271       0.569
1.266       0.567
1.261       0.569
1.255       0.567
1.250       0.565
1.245       0.563
1.240       0.562
1.235       0.558
1.230       0.556
1.224       0.555
1.220       0.547
1.215       0.543
1.210       0.535
1.205       0.531
1.200       0.523

回復(fù)此樓

» 猜你喜歡

2026年循環(huán)經(jīng)濟(jì)功能材料國際會議（ICFMCE 2026）已經(jīng)有0人回復(fù)
2026年第五屆電氣、電子與信息工程國際會議（ISEEIE 2026）已經(jīng)有0人回復(fù)
物理學(xué)I論文潤色/翻譯怎么收費(fèi)? 已經(jīng)有184人回復(fù)
哈爾濱理工大學(xué)物理系招收物理學(xué)考研調(diào)劑已經(jīng)有5人回復(fù)
0702一志愿吉大B區(qū)求調(diào)劑已經(jīng)有5人回復(fù)
求調(diào)劑已經(jīng)有0人回復(fù)
0702一志愿吉大B區(qū)求調(diào)劑有論文已經(jīng)有0人回復(fù)
請問還有沒有用Latex寫文章的小伙伴們？已經(jīng)有0人回復(fù)
光學(xué)工程學(xué)碩調(diào)劑信息已經(jīng)有25人回復(fù)
歡迎加入課題組已經(jīng)有0人回復(fù)
散金幣，求好運(yùn)，祝面上順利！已經(jīng)有27人回復(fù)

1樓 2020-08-27 02:05:47

已閱回復(fù)此樓關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

相關(guān)版塊跳轉(zhuǎn) 我要訂閱樓主 ymgy 的主題更新

返回列表

不應(yīng)助 確定回帖應(yīng)助 (注意：應(yīng)助才可能被獎勵，但不允許灌水，必須填寫15個字符以上)

普通表情龍兔虎貓

最具人氣熱帖推薦 [查看全部]		作者	回/看	最后發(fā)表

[考研] 281求調(diào)劑（0805） +3	煙汐憶海 2026-03-16	7/350	2026-03-17 20:16 by peike
[考研] 277調(diào)劑 +5	自由煎餅果子 2026-03-16	6/300	2026-03-17 19:26 by 李leezz
[考研] 302求調(diào)劑 +9	負(fù)心者當(dāng)誅 2026-03-11	9/450	2026-03-17 17:13 by ruiyingmiao
[考研] 211本，11408一志愿中科院277分，曾在中科院自動化所實(shí)習(xí) +6	Losir 2026-03-12	7/350	2026-03-17 12:09 by danranxie
[考研] 材料專碩274一志愿陜西師范大學(xué)求調(diào)劑 +5	薛云鵬 2026-03-13	5/250	2026-03-17 10:15 by Sammy2
[考研] 材料與化工304求B區(qū)調(diào)劑 +7	邱gl 2026-03-11	8/400	2026-03-17 09:36 by 努力學(xué)習(xí)賺彩禮
[論文投稿] 有沒有大佬發(fā)小論文能帶我個二作 +3	增銳漏人 2026-03-17	4/200	2026-03-17 09:26 by xs74101122
[考研] 0854控制工程 359求調(diào)劑可跨專業(yè) +3	626776879 2026-03-14	9/450	2026-03-16 17:42 by 626776879
[考研] 中科院材料273求調(diào)劑 +4	yzydy 2026-03-15	4/200	2026-03-16 15:59 by Gaodh_82
[考研] 0703化學(xué)調(diào)劑，求各位老師收留 +8	秋有木北 2026-03-14	8/400	2026-03-16 15:21 by 哦哦123
[考研] 085600材料與化工求調(diào)劑 +13	enenenhui 2026-03-13	14/700	2026-03-16 15:19 by 了了了了。。
[考研] 機(jī)械專碩調(diào)劑 +3	笨笨兔子 2026-03-12	3/150	2026-03-15 20:02 by 栗子粥?
[考研] 289求調(diào)劑 +4	這么名字咋樣 2026-03-14	6/300	2026-03-14 18:58 by userper
[考研] 297一志愿上交085600求調(diào)劑 +5	指尖八千里 2026-03-14	5/250	2026-03-14 17:26 by a不易
[考研] 復(fù)試調(diào)劑 +4	z1z2z3879 2026-03-14	5/250	2026-03-14 16:30 by JourneyLucky
[考研] 材料與化工（0856）304求B區(qū)調(diào)劑 +6	邱gl 2026-03-12	7/350	2026-03-13 23:24 by 邱gl
[考研] 341求調(diào)劑 +4	番茄頭--- 2026-03-10	4/200	2026-03-13 23:12 by JourneyLucky
[考研] 0703，333分求調(diào)劑一志愿鄭州大學(xué)-物理化學(xué) +3	李魔女斗篷 2026-03-11	3/150	2026-03-13 22:24 by JourneyLucky
[考研] 工科278分求調(diào)劑 +5	周慢熱啊 2026-03-12	7/350	2026-03-13 15:49 by JourneyLucky
[考研] 321求調(diào)劑（食品/專碩） +3	xc321 2026-03-12	6/300	2026-03-13 08:45 by xc321

亭亭五月天在线观看,亭亭五月天在线观看,国产最新av一区二区,国产 高清 中文字幕,99re热久久亚洲综合精品成人,熟妇 一区二区三区,一级做a爰片性色毛片武则天,美女的骚穴视频播放,国产美女午夜免费视频

24小時熱門版塊排行榜

ymgy

[求助] 多參數(shù)擬合，求助1stopt代算

» 猜你喜歡

亭亭五月天在线观看,亭亭五月天在线观看,国产最新av一区二区,国产高清中文字幕,99re热久久亚洲综合精品成人,熟妇一区二区三区,一级做a爰片性色毛片武则天,美女的骚穴视频播放,国产美女午夜免费视频

[求助] 多參數(shù)擬合，求助1stopt代算