| 2 | 1/1 | 返回列表 |
| 查看: 431 | 回復: 1 | |||
kaokaokao789鐵桿木蟲 (正式寫手)
|
[求助]
fortran從txt文件中讀入數(shù)據(jù)的問題 已有1人參與
|
| 求助,我現(xiàn)在有一個txt文件,里面放著我編程要用的數(shù)據(jù),怎么樣讀取數(shù)據(jù) 并對第三列的數(shù)據(jù)求和!感激不盡! |

鐵桿木蟲 (著名寫手)
工程和科學數(shù)值計算咨詢
|
結果是 i= 1048576 xx= 780331059.926095 程序如下 ! flag subroutine TestRead3 implicit none real*8 :: x1,x2,x3,xx integer :: i open(20,file='o50.dat',status='old') xx=0d0 i=0 do read(20,*,end=8341) x1,x2,x3 i=i+1 xx=xx+x3 end do 8341 continue close(20) print*,' i=',i,' xx=',xx stop end subroutine TestRead3 |
| 2 | 1/1 | 返回列表 |
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研]
|
.6lL 2026-03-18 | 6/300 |
|
|---|---|---|---|---|
|
[考研] 085600材料與化工調劑 324分 +10 | llllkkkhh 2026-03-18 | 12/600 |
|
|
[考研] 286求調劑 +6 | lemonzzn 2026-03-16 | 10/500 |
|
|
[考研] 一志愿天大材料與化工(085600)總分338 +5 | 蔡大美女 2026-03-13 | 5/250 |
|
|
[考研] 一志愿985,本科211,0817化學工程與技術319求調劑 +10 | Liwangman 2026-03-15 | 10/500 |
|
|
[考研] 材料專碩英一數(shù)二306 +5 | z1z2z3879 2026-03-18 | 5/250 |
|
|
[考研] 311求調劑 +4 | 冬十三 2026-03-18 | 4/200 |
|
|
[考研] 26調劑/材料/英一數(shù)二/總分289/已過A區(qū)線 +7 | 步川酷紫123 2026-03-13 | 7/350 |
|
|
[考研] 生物學071000 329分求調劑 +3 | 我愛生物生物愛?/a> 2026-03-17 | 3/150 |
|
|
[考研] 278求調劑 +5 | 煙火先于春 2026-03-17 | 5/250 |
|
|
[考研] 293求調劑 +11 | zjl的號 2026-03-16 | 16/800 |
|
|
[考研] 考研求調劑 +3 | 橘頌. 2026-03-17 | 4/200 |
|
|
[考研] 301求調劑 +4 | A_JiXing 2026-03-16 | 4/200 |
|
|
[考研] 326求調劑 +5 | 上岸的小葡 2026-03-15 | 6/300 |
|
|
[考研] 一志愿,福州大學材料專碩339分求調劑 +3 | 木子momo青爭 2026-03-15 | 3/150 |
|
|
[考研] 0854控制工程 359求調劑 可跨專業(yè) +3 | 626776879 2026-03-14 | 9/450 |
|
|
[考研] 一志愿211 0703方向310分求調劑 +3 | 努力奮斗112 2026-03-15 | 3/150 |
|
|
[考研] 318求調劑 +3 | Yanyali 2026-03-15 | 3/150 |
|
|
[考研] 0703 物理化學調劑 +3 | 我可以上岸的對?/a> 2026-03-13 | 5/250 |
|
|
[考研] 294求調劑 +3 | Zys010410@ 2026-03-13 | 4/200 |
|