 |
 |
 |
 |
 |
 |
||
 |
 |
 |
 |
 |
| 10 | 1/1 | 返回列表 |
| 查看: 1203 | 回復(fù): 9 | |||
jyd3611新蟲 (初入文壇)
|
[求助]
δ函數(shù)或者comb怎么編程
|
| 如何在matlab上編寫二維梳狀函數(shù) |
回復(fù)此樓» 猜你喜歡
323求調(diào)劑
已經(jīng)有6人回復(fù)
-
一志愿北京化工大學(xué) 070300 學(xué)碩 336分 求調(diào)劑
已經(jīng)有4人回復(fù)
-
352求調(diào)劑
已經(jīng)有3人回復(fù)
-
一志愿東華大學(xué)化學(xué)070300，求調(diào)劑
已經(jīng)有8人回復(fù)
-
277材料科學(xué)與工程080500求調(diào)劑
已經(jīng)有7人回復(fù)
-
317求調(diào)劑
已經(jīng)有18人回復(fù)
-
293求調(diào)劑
已經(jīng)有5人回復(fù)
-
280分求調(diào)劑 一志愿085802
已經(jīng)有7人回復(fù)
-
0854電子信息求調(diào)劑
已經(jīng)有3人回復(fù)
-
263求調(diào)劑
已經(jīng)有4人回復(fù)
2樓2013-04-17 08:39:43
jyd3611
新蟲 (初入文壇)
- 應(yīng)助: 0 (幼兒園)
- 金幣: 1.8
- 帖子: 33
- 在線: 10小時(shí)
- 蟲號(hào): 2059571
- 注冊(cè): 2012-10-14
- 性別: GG
- 專業(yè): 光學(xué)
3樓2013-04-17 15:45:38
4樓2013-04-17 21:20:42
5樓2013-04-18 17:03:44
jyd3611
新蟲 (初入文壇)
- 應(yīng)助: 0 (幼兒園)
- 金幣: 1.8
- 帖子: 33
- 在線: 10小時(shí)
- 蟲號(hào): 2059571
- 注冊(cè): 2012-10-14
- 性別: GG
- 專業(yè): 光學(xué)
6樓2013-04-18 23:15:25
★ ★ ★ ★ ★ ★
華麗的飄過(guò): 金幣+6, 3q 2013-04-26 03:52:51
華麗的飄過(guò): 金幣+6, 3q 2013-04-26 03:52:51
|
Program main implicit none Real,External :: Gamma Write(*,*) "Gamma=",Gamma(X) !輸出Gamma積分結(jié)果 End !子函數(shù),計(jì)算Gamma積分 REAL Function Gamma(X) implicit none integer i Real X,Y,S,T,U Real :: A(11)=(/0.0000677106,-0.0003442342,0.0015397681,-0.0024467480,0.0109736958,-0.0002109075,0.0742379071,0.0815782188,0.4118402578,0.4227843370,1.0/) IF (X<=0) THEN Write(*,*) "ERR**X<0" Gamma=-1.0 End IF Y=X IF (Y<=1.0) THEN T=1.0/(Y*(Y+1.0)) Y=Y+2.0 ELSE IF (Y<=2.0) THEN T=1.0/Y Y=Y+1.0 ELSE IF (Y<=3.0) THEN T=1.0 ELSE T=1.0 10 IF (Y>3.0) THEN Y=Y-1.0 T=T*Y GOTO 10 END IF ENd IF S=A(1) U=Y-2.0 Do i=1,10 S=S*U+A(i+1) END do S=S*T Gamma=S Return END !子函數(shù)結(jié)束 !---------------------------------------------------------------- |
» 本帖已獲得的紅花（最新10朵）
jyd36117樓2013-04-20 16:10:30
jyd3611
新蟲 (初入文壇)
- 應(yīng)助: 0 (幼兒園)
- 金幣: 1.8
- 帖子: 33
- 在線: 10小時(shí)
- 蟲號(hào): 2059571
- 注冊(cè): 2012-10-14
- 性別: GG
- 專業(yè): 光學(xué)
8樓2013-04-20 19:52:04
9樓2013-04-20 20:08:03
jyd3611
新蟲 (初入文壇)
- 應(yīng)助: 0 (幼兒園)
- 金幣: 1.8
- 帖子: 33
- 在線: 10小時(shí)
- 蟲號(hào): 2059571
- 注冊(cè): 2012-10-14
- 性別: GG
- 專業(yè): 光學(xué)
10樓2013-04-21 09:00:13
相關(guān)版塊跳轉(zhuǎn)
我要訂閱樓主 jyd3611 的主題更新
| 10 | 1/1 | 返回列表 |
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 352求調(diào)劑 +3 | 大米飯！ 2026-03-22 | 3/150 |
|
|---|---|---|---|---|
|
|
[考研] 263求調(diào)劑 +4 | yqdszhdap－ 2026-03-22 | 4/200 |
|
|
|
[考研] 310求調(diào)劑 +4 | baibai1314 2026-03-16 | 4/200 |
|
|
[考研] 291 求調(diào)劑 +3 | 化工2026屆畢業(yè)?/a> 2026-03-21 | 3/150 |
|
|
|
[考研] 一志愿華中科技大學(xué)071000，求調(diào)劑 +4 | 沿岸有貝殼6 2026-03-21 | 4/200 |
|
|
|
[考研] 求調(diào)劑 +4 | 要好好無(wú)聊 2026-03-21 | 4/200 |
|
|
|
[考研] 299求調(diào)劑 +4 | 某某某某位 2026-03-21 | 4/200 |
|
|
|
[考研] 265求調(diào)劑 +12 | 梁梁校校 2026-03-19 | 14/700 |
|
|
|
[考研] 求調(diào)劑 +6 | Mqqqqqq 2026-03-19 | 6/300 |
|
|
|
[考研] 265求調(diào)劑 +9 | 梁梁校校 2026-03-17 | 9/450 |
|
|
|
[考研] 一志愿武理材料305分求調(diào)劑 +6 | 想上岸的鯉魚 2026-03-18 | 7/350 |
|
|
|
[考研] 308求調(diào)劑 +3 | 阿姐阿姐家啊 2026-03-18 | 3/150 |
|
|
|
[考研]
 材料與化工 322求調(diào)劑
+4
|
然11 2026-03-19 | 4/200 |
|
|
|
[考研] 353求調(diào)劑 +3 | 拉鉤不許變 2026-03-20 | 3/150 |
|
|
|
[考研] 求調(diào)劑 +3 | @taotao 2026-03-20 | 3/150 |
|
|
|
[考研] 286求調(diào)劑 +6 | lemonzzn 2026-03-16 | 10/500 |
|
|
|
[考研] 收復(fù)試調(diào)劑生 +4 | 雨后秋荷 2026-03-18 | 4/200 |
|
|
|
[考博] 26博士申請(qǐng) +3 | 1042136743 2026-03-17 | 3/150 |
|
|
|
[考研] 一志愿蘇州大學(xué)材料工程（085601）專碩有科研經(jīng)歷三項(xiàng)國(guó)獎(jiǎng)兩個(gè)實(shí)用型專利一項(xiàng)省級(jí)立項(xiàng) +6 | 大火山小火山 2026-03-16 | 8/400 |
|
|
|
[考研] [導(dǎo)師推薦]西南科技大學(xué)國(guó)防/材料導(dǎo)師推薦 +3 | 尖角小荷 2026-03-16 | 6/300 |
|