 |
 |
 |
 |
 |
 |
||
 |
 |
 |
 |
 |
| 10 | 1/1 | 返回列表 |
| 查看: 1193 | 回復(fù): 9 | ||
jyd3611新蟲(chóng) (初入文壇)
|
[求助]
δ函數(shù)或者comb怎么編程
|
| 如何在matlab上編寫(xiě)二維梳狀函數(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
新蟲(chóng) (初入文壇)
- 應(yīng)助: 0 (幼兒園)
- 金幣: 1.8
- 帖子: 33
- 在線: 10小時(shí)
- 蟲(chóng)號(hào): 2059571
- 注冊(cè): 2012-10-14
- 性別: GG
- 專(zhuān)業(yè): 光學(xué)
3樓2013-04-17 15:45:38
4樓2013-04-17 21:20:42
5樓2013-04-18 17:03:44
jyd3611
新蟲(chóng) (初入文壇)
- 應(yīng)助: 0 (幼兒園)
- 金幣: 1.8
- 帖子: 33
- 在線: 10小時(shí)
- 蟲(chóng)號(hào): 2059571
- 注冊(cè): 2012-10-14
- 性別: GG
- 專(zhuān)業(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
新蟲(chóng) (初入文壇)
- 應(yīng)助: 0 (幼兒園)
- 金幣: 1.8
- 帖子: 33
- 在線: 10小時(shí)
- 蟲(chóng)號(hào): 2059571
- 注冊(cè): 2012-10-14
- 性別: GG
- 專(zhuān)業(yè): 光學(xué)
8樓2013-04-20 19:52:04
9樓2013-04-20 20:08:03
jyd3611
新蟲(chóng) (初入文壇)
- 應(yīng)助: 0 (幼兒園)
- 金幣: 1.8
- 帖子: 33
- 在線: 10小時(shí)
- 蟲(chóng)號(hào): 2059571
- 注冊(cè): 2012-10-14
- 性別: GG
- 專(zhuān)業(yè): 光學(xué)
10樓2013-04-21 09:00:13
相關(guān)版塊跳轉(zhuǎn)
我要訂閱樓主 jyd3611 的主題更新
| 10 | 1/1 | 返回列表 |
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 石河子大學(xué)（211、雙一流）碩博研究生長(zhǎng)期招生公告 +3 | 李子目 2026-03-22 | 3/150 |
|
|---|---|---|---|---|
|
[考研] 310求調(diào)劑 +4 | baibai1314 2026-03-16 | 4/200 |
|
|
|
[考研] 招08考數(shù)學(xué) +4 | laoshidan 2026-03-20 | 8/400 |
|
|
|
[考研] 08工科 320總分 求調(diào)劑 +11 | 梨花珞晚風(fēng) 2026-03-17 | 11/550 |
|
|
|
[考研] 289求調(diào)劑 +7 | 懷瑾握瑜l 2026-03-20 | 7/350 |
|
|
|
[考研] 一志愿華中科技大學(xué)071000，求調(diào)劑 +4 | 沿岸有貝殼6 2026-03-21 | 4/200 |
|
|
|
[考研] 286求調(diào)劑 +10 | Faune 2026-03-21 | 10/500 |
|
|
|
[考研] 材料與化工（0856）304求B區(qū)調(diào)劑 +3 | 邱gl 2026-03-20 | 7/350 |
|
|
|
[考研] 311求調(diào)劑 +3 | 勇敢的小吳 2026-03-20 | 3/150 |
|
|
|
[考研] 299求調(diào)劑 +5 | shxchem 2026-03-20 | 7/350 |
|
|
|
[考研] 材料工程（專(zhuān)）一志愿985 初試335求調(diào)劑 +3 | hiloiy 2026-03-17 | 4/200 |
|
|
|
[考研] 一志愿武理材料305分求調(diào)劑 +6 | 想上岸的鯉魚(yú) 2026-03-18 | 7/350 |
|
|
|
[考研] 一志愿華南師大 070300（化學(xué)）304分求調(diào)劑 +3 | 0703武芊慧雪304 2026-03-18 | 3/150 |
|
|
|
[考研] 材料專(zhuān)業(yè)求調(diào)劑 +6 | hanamiko 2026-03-18 | 6/300 |
|
|
|
[考研] 一志愿南昌大學(xué)，327分，材料與化工085600 +9 | Ncdx123456 2026-03-19 | 9/450 |
|
|
|
[考研] 一志愿武漢理工材料工程專(zhuān)碩調(diào)劑 +9 | Doleres 2026-03-19 | 9/450 |
|
|
|
[考研] 材料學(xué)求調(diào)劑 +4 | Stella_Yao 2026-03-20 | 4/200 |
|
|
|
[論文投稿]
申請(qǐng)回稿延期一個(gè)月，編輯同意了。但系統(tǒng)上的時(shí)間沒(méi)變，給編輯又寫(xiě)郵件了，沒(méi)回復(fù)
 10+3
|
wangf9518 2026-03-17 | 4/200 |
|
|
|
[考研] 本科鄭州大學(xué)物理學(xué)院，一志愿華科070200學(xué)碩，346求調(diào)劑 +4 | 我不是一根蔥 2026-03-18 | 4/200 |
|
|
|
[考研] 275求調(diào)劑 +4 | 太陽(yáng)花天天開(kāi)心 2026-03-16 | 4/200 |
|