sunbit

鐵蟲 (小有名氣)

應助: 0 (幼兒園)
金幣: 147.7
帖子: 67
在線: 27.5小時
蟲號: 1062678
注冊: 2010-07-23
專業(yè): 凝聚態(tài)物性I:結(jié)構(gòu)、力學和

[求助] 郁悶了啊，最簡單的讀寫，但是總報錯，compaq visual fortran6.5

郁悶了啊，最簡單的讀寫，但是總報錯，compaq visual fortran6.5

報錯內(nèi)容
forrtl: severe (59): list-directed I/O syntax error, unit 10, file E:\matlab\lun
wen\fortran\dat1.txt
Image             PC       Routine          Line       Source
test.exe          00407B49  Unknown             Unknown  Unknown
test.exe          0040797B  Unknown             Unknown  Unknown
test.exe          00406B84  Unknown             Unknown  Unknown
test.exe          00406FB9  Unknown             Unknown  Unknown
test.exe          0040460B  Unknown             Unknown  Unknown
test.exe          00404023  Unknown             Unknown  Unknown
test.exe          0040110B  Unknown             Unknown  Unknown
test.exe          0042E5D9  Unknown             Unknown  Unknown
test.exe          00423DB4  Unknown             Unknown  Unknown
kernel32.dll    7C817077  Unknown             Unknown  Unknown

Incrementally linked image--PC correlation disabled.
Press any key to continue

主程序

CODE:

           program main

                REAL:: A(100)

                INTEGER::I,N

                N=9   

                OPEN(10,FILE='dat1.txt')

                DO I=1,N

                        READ(10,*) A(I)

                ENDDO

                CLOSE(10)

                END

dat1.txt文件

CODE:

回復此樓

» 猜你喜歡

0703化學調(diào)劑，求導師收已經(jīng)有3人回復
生物學學碩求調(diào)劑已經(jīng)有6人回復
305分求調(diào)劑（食品工程）已經(jīng)有7人回復
材料與化工考研調(diào)劑已經(jīng)有5人回復
299求調(diào)劑已經(jīng)有6人回復
材料292調(diào)劑已經(jīng)有5人回復
085404電子信息284分求調(diào)劑已經(jīng)有4人回復
收08調(diào)劑生已經(jīng)有3人回復
081700 調(diào)劑 267分已經(jīng)有9人回復
293求調(diào)劑已經(jīng)有5人回復

» 本主題相關(guān)價值貼推薦，對您同樣有幫助:

被拒！郁悶！來這里請教一下已經(jīng)有54人回復
雅思過6.5，散60金幣慶祝已經(jīng)有87人回復
郁悶! 文章接收，三天后又被取消，重新變成under review 已經(jīng)有9人回復
【資源】經(jīng)典XRD分析軟件，綠色版jade6.5 已經(jīng)有1367人回復
【求助】Intel Visual Fortran與Compaq Visual Fortran的區(qū)別？已經(jīng)有18人回復
郁悶：省教育廳項目申報需要強制交評審費與查新費已經(jīng)有13人回復
【求助】visual fortran6.5 的使用已經(jīng)有5人回復
郁悶了，國家基金的工作時間已經(jīng)累計夠12個月了。已經(jīng)有20人回復

1樓 2011-04-22 22:07:38

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

sunbit

鐵蟲 (小有名氣)

應助: 0 (幼兒園)
金幣: 147.7
帖子: 67
在線: 27.5小時
蟲號: 1062678
注冊: 2010-07-23
專業(yè): 凝聚態(tài)物性I:結(jié)構(gòu)、力學和

主程序由 READ(10,*) A(I)
改為 READ(10,“(A)”) A(I)
之后，程序通過

由此，產(chǎn)生兩個疑問，
1. txt格式的數(shù)據(jù)，只能作為字符型讀入？讀入后怎么轉(zhuǎn)變?yōu)閷崝?shù)型的？用real()函數(shù)？編譯通不過

2.如何才能直接讀入txt中實數(shù)型的數(shù)據(jù)？txt中輸入的數(shù)據(jù)有格式要求？

贊一下

回復此樓

2樓2011-04-22 23:16:36

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

snoopyzhao

至尊木蟲 (職業(yè)作家)

程序強帖: 16
應助: 157 (高中生)
貴賓: 0.02
金幣: 18844.7
紅花: 29
帖子: 3803
在線: 1422.4小時
蟲號: 183750
注冊: 2006-02-13
專業(yè): 污染生態(tài)化學

【答案】應助回帖

★ ★
微塵、夢想(金幣+2): 謝謝…… 2011-04-23 17:28:16
sunbit(金幣+1): 只能給一分��！謝謝～ 2011-04-25 10:07:18

你的程序沒有問題，我這里用 gfortran 測試通過，呵呵……

贊一下(1人)

回復此樓

3樓2011-04-23 00:12:40

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

whl2dxl

木蟲 (小有名氣)

應助: 2 (幼兒園)
金幣: 2115.6
紅花: 3
帖子: 151
在線: 115小時
蟲號: 1267846
注冊: 2011-04-17
性別: GG
專業(yè): 理論和計算化學

【答案】應助回帖

★ ★
微塵、夢想(金幣+2): 謝謝參與…… 2011-04-24 17:57:14

你的那個程序的第7到第9行，是點還是逗號？如果是逗號的話肯定會出現(xiàn)數(shù)據(jù)類型定義的錯誤，正如你說的改成字符型就可以讀取，可能就是這個原因，最后三行不是real型。如果想讀這種混合的類型最好做兩次do循環(huán)比較穩(wěn)妥一點。即
real :: A(6),B(3)
do i=1,6
read(10,*) A(i)
end do
do i=7,9
read(10,*) A(i),B(i)
end do

贊一下(1人)

回復此樓

4樓2011-04-24 00:45:42

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

snoopyzhao

至尊木蟲 (職業(yè)作家)

程序強帖: 16
應助: 157 (高中生)
貴賓: 0.02
金幣: 18844.7
紅花: 29
帖子: 3803
在線: 1422.4小時
蟲號: 183750
注冊: 2006-02-13
專業(yè): 污染生態(tài)化學

★ ★
微塵、夢想(金幣+2): 謝謝！ 2011-04-24 17:57:29

引用回帖:

Originally posted by whl2dxl at 2011-04-24 00:45:42:
你的那個程序的第7到第9行，是點還是逗號？如果是逗號的話肯定會出現(xiàn)數(shù)據(jù)類型定義的錯誤，正如你說的改成字符型就可以讀取，可能就是這個原因，最后三行不是real型。如果想讀這種混合的類型最好做兩次do循環(huán)比較穩(wěn) ...

他那種讀法，只管讀數(shù)的個數(shù)，與多少行沒有關(guān)系……

贊一下(1人)

回復此樓

5樓2011-04-24 15:06:07

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

whl2dxl

木蟲 (小有名氣)

應助: 2 (幼兒園)
金幣: 2115.6
紅花: 3
帖子: 151
在線: 115小時
蟲號: 1267846
注冊: 2011-04-17
性別: GG
專業(yè): 理論和計算化學

【答案】應助回帖

引用回帖:

Originally posted by snoopyzhao at 2011-04-24 15:06:07:
他那種讀法，只管讀數(shù)的個數(shù)，與多少行沒有關(guān)系……

第七行到第九行是一個數(shù)嗎？那是個逗號，還是個點？

贊一下

回復此樓

6樓2011-04-24 18:14:44

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

snoopyzhao

至尊木蟲 (職業(yè)作家)

程序強帖: 16
應助: 157 (高中生)
貴賓: 0.02
金幣: 18844.7
紅花: 29
帖子: 3803
在線: 1422.4小時
蟲號: 183750
注冊: 2006-02-13
專業(yè): 污染生態(tài)化學

引用回帖:

Originally posted by whl2dxl at 2011-04-24 18:14:44:
第七行到第九行是一個數(shù)嗎？那是個逗號，還是個點？

逗號就表示是兩個數(shù)，點的話就表示一個數(shù)。他的程序一行只讀一個數(shù)，呵呵……

我前面的說法錯了，不好意思……

其實它寫成這樣可能更高效，也更合理一些……

CODE:

read(10, *) (a(i), i=1,9)

這樣，就是所有的數(shù)據(jù)寫在一行也沒有關(guān)系了……

贊一下

回復此樓

7樓2011-04-24 19:59:20

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

sunbit

鐵蟲 (小有名氣)

應助: 0 (幼兒園)
金幣: 147.7
帖子: 67
在線: 27.5小時
蟲號: 1062678
注冊: 2010-07-23
專業(yè): 凝聚態(tài)物性I:結(jié)構(gòu)、力學和

引用回帖:

Originally posted by whl2dxl at 2011-04-24 18:14:44:
第七行到第九行是一個數(shù)嗎？那是個逗號，還是個點？

那個是逗號，本來是不同行不同語句的

我調(diào)試為了簡單就用了循環(huán)

贊一下

回復此樓

8樓2011-04-25 10:08:47

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

sunbit

鐵蟲 (小有名氣)

應助: 0 (幼兒園)
金幣: 147.7
帖子: 67
在線: 27.5小時
蟲號: 1062678
注冊: 2010-07-23
專業(yè): 凝聚態(tài)物性I:結(jié)構(gòu)、力學和

引用回帖:

Originally posted by snoopyzhao at 2011-04-24 19:59:20:
逗號就表示是兩個數(shù)，點的話就表示一個數(shù)。他的程序一行只讀一個數(shù)，呵呵……

我前面的說法錯了，不好意思……

其實它寫成這樣可能更高效，也更合理一些……

[code]
read(10, *) (a(i), i=1,9)
[/c ...

謝謝啊，這樣確實高效

可惜只能給一人評分，我還以為都可以呢，再次感謝

同時疑問：只能按字符型讀入嗎？怎么轉(zhuǎn)換為實數(shù)型�。�

我如果想直接讀入實實數(shù)型的應該怎么辦？

贊一下

回復此樓

9樓2011-04-25 10:10:52

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

sunbit

鐵蟲 (小有名氣)

應助: 0 (幼兒園)
金幣: 147.7
帖子: 67
在線: 27.5小時
蟲號: 1062678
注冊: 2010-07-23
專業(yè): 凝聚態(tài)物性I:結(jié)構(gòu)、力學和

引用回帖:

我如果全都是實數(shù)型的，

怎么能直接讀入后就是實數(shù)型的數(shù)據(jù)呢？如果無法做到，讀入字符型的，怎么轉(zhuǎn)換為實數(shù)型的呢？謝謝啊

贊一下

回復此樓

10樓2011-04-25 10:12:43

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

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

[考研] 086003食品工程求調(diào)劑 +4	淼淼111 2026-03-24	4/200	2026-03-24 11:53 by 544594351
[考研] 求調(diào)劑 +5	研研，接電話 2026-03-24	6/300	2026-03-24 11:39 by 星空星月
[考研] 306求0703調(diào)劑一志愿華中師范 +9	紙魚ly 2026-03-21	10/500	2026-03-24 11:36 by 544594351
[考研] 一志愿哈工大，085400，320，求調(diào)劑 +3	gdlf9999 2026-03-24	3/150	2026-03-24 10:08 by 搏擊518
[考研] 284求調(diào)劑 +10	Zhao anqi 2026-03-22	10/500	2026-03-24 00:08 by Equinoxhua
[考研] 求調(diào)劑 +7	十三加油 2026-03-21	7/350	2026-03-23 23:48 by 熱情沙漠
[考研] 一志愿211 初試270分求調(diào)劑 +4	谷雨上岸 2026-03-23	5/250	2026-03-23 21:18 by 不惑可樂
[考研] 336化工調(diào)劑 +4	王大坦1 2026-03-23	5/250	2026-03-23 18:32 by allen-yin
[考研] 280分求調(diào)劑一志愿085802 +4	PUMPT 2026-03-22	7/350	2026-03-22 22:13 by 星空星月
[考研] 考研調(diào)劑 +4	來好運來來來 2026-03-21	4/200	2026-03-22 12:15 by 星空星月
[考研] 求調(diào)劑 +3	.m.. 2026-03-21	4/200	2026-03-21 16:25 by barlinike
[考研] 材料學學碩080502 337求調(diào)劑-一志愿華中科技大學 +4	順順順mr 2026-03-18	5/250	2026-03-21 10:22 by luoyongfeng
[考研] 299求調(diào)劑 +6	△小透明* 2026-03-17	6/300	2026-03-21 02:42 by JourneyLucky
[考研] 化學求調(diào)劑 +4	臨澤境llllll 2026-03-17	5/250	2026-03-21 02:23 by JourneyLucky
[考研] 南京大學化學376求調(diào)劑 +3	hisfailed 2026-03-19	6/300	2026-03-20 23:43 by hisfailed
[考研] 308求調(diào)劑 +3	阿姐阿姐家啊 2026-03-18	3/150	2026-03-20 23:24 by JourneyLucky
[考研] 0817 化學工程 299分求調(diào)劑有科研經(jīng)歷有二區(qū)文章 +22	rare12345 2026-03-18	22/1100	2026-03-20 20:39 by zhukairuo
[考研] 085410人工智能專碩317求調(diào)劑（0854都可以） +4	xbxudjdn 2026-03-18	4/200	2026-03-20 09:07 by 不168
[考研] 085600材料與化工調(diào)劑 324分 +10	llllkkkhh 2026-03-18	12/600	2026-03-19 14:33 by llllkkkhh
[考研] 【同濟軟件】軟件（085405）考研求調(diào)劑 +3	2026eternal 2026-03-18	3/150	2026-03-18 19:09 by 搏擊518