版塊導航: 正在加載中...

登錄注冊

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

24小時熱門版塊排行榜

返回列表

當前只顯示滿足指定條件的回帖，點擊這里查看本話題的所有回帖

836449366

金蟲 (小有名氣)

應助: 1 (幼兒園)
金幣: 3039.8
散金: 62
紅花: 4
帖子: 270
在線: 356.3小時
蟲號: 1478273
注冊: 2011-11-05
專業(yè): 理論和計算化學

[求助] Fortran出現(xiàn)語法錯誤

我自己編了一段程序，就是將aaa.txt中的數(shù)據(jù)的前一行減去后一行，然后返回差值
這是程序
   program main
   implicit none
   integer :: i,j
   real*8 r1,r2,a,m(200,2),n(200)
   open(10,file='bbb')
   do i=1,200
      read(10,*) a,(m(i,j),j=1,2)
      r1=m(i,2)
      r2=m(i+1,2)
      n=r1-r2
      write(*,"(a4,200F30.15)" i,n(i)
   enddo
   end
下面是aaa.txt文件
         1 11.5927413790973
         2 11.8587968919448
      ……       …………
   200 11.7952433041584
運行后總是出現(xiàn)錯誤
fortcom: Error: xxx.f90, line 11: Syntax error, found IDENTIFIER 'I' when expecting one of: .EQV. .NEQV. .XOR. .OR. .AND. .LT. < .LE. <= .EQ. == .NE. /= .GT. > ...
      write(*,"(a4,200F30.15)" i,n(i)
---------------------------------^
compilation aborted for xxx.f90 (code 1)
求大神解答，本人不勝感激！

回復此樓

» 猜你喜歡

0703 調(diào)劑已經(jīng)有5人回復
上海華東理工大學機械與動力工程學院先進材料與制造研究組招聘公告已經(jīng)有0人回復
物理化學論文潤色/翻譯怎么收費? 已經(jīng)有193人回復
304求調(diào)劑已經(jīng)有6人回復
西南某211招27屆博士已經(jīng)有30人回復
大連工業(yè)杰青/長江團隊-生物質(zhì)材料-儲能電池方向招收2026級博士生已經(jīng)有0人回復
304求調(diào)劑已經(jīng)有1人回復
中藥學306，求調(diào)劑已經(jīng)有0人回復
河南一本高�；瘜W，材料，化工專業(yè)招收研究生已經(jīng)有0人回復
大連海事大學船舶潔凈能源研究中心2026年博士研究生招生啟事已經(jīng)有3人回復

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

動網(wǎng)格的UDF問題已經(jīng)有21人回復
fluent中UDF編輯熱源的問題！已經(jīng)有4人回復
fluent 加載udf出現(xiàn)這樣錯誤怎么辦已經(jīng)有14人回復
單機編譯安裝vasp求指導已經(jīng)有10人回復
UDF編譯時出現(xiàn)語法錯誤已經(jīng)有13人回復
急求fortran運行錯誤原因，在線等已經(jīng)有7人回復
請教 fortran 運行錯誤的原因已經(jīng)有13人回復
microsoft developer studio 已經(jīng)有38人回復
Linux中安裝gaussian時，install出現(xiàn)語法錯誤，求解答已經(jīng)有17人回復
SCI文章投完稿發(fā)現(xiàn)有幾個語法錯誤怎么辦？已經(jīng)有13人回復
FORTRAN屬性聲明出錯已經(jīng)有8人回復
如何回復審稿人提出的意見（語法錯誤）？已經(jīng)有4人回復
GAUSSIAN計算語法錯誤已經(jīng)有7人回復
在寫英文文章時，好多單詞下面會出現(xiàn)紅線或綠線，會對論文語言質(zhì)量有影響嗎已經(jīng)有7人回復
如何減少英文投稿中的語法錯誤，提高文章質(zhì)量？大家有什么好辦法？已經(jīng)有14人回復
請教MS4.4 Linux下安裝提示 msiinstall語法錯誤已經(jīng)有14人回復
標題有語法錯誤會不會影響文章的審閱啊已經(jīng)有21人回復
寫了一個fortran90的小程序，編譯通不過，請大俠幫忙已經(jīng)有59人回復
【求助】讀文本數(shù)據(jù)出現(xiàn)段錯誤[fortran] 已經(jīng)有14人回復
【求助】fortran計算時出現(xiàn)NaN 已經(jīng)有11人回復

1樓 2013-09-29 20:12:47

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

jerkwin

專家顧問 (正式寫手)

專家經(jīng)驗: +14
應助: 454 (碩士)
金幣: 20699.1
散金: 148
紅花: 81
帖子: 813
在線: 2648.3小時
蟲號: 1023452
注冊: 2010-05-19
專業(yè): 理論和計算化學
管轄: 分子模擬

【答案】應助回帖

★ ★
gkf高: 金幣+2 2013-10-03 23:25:12

最簡單的, 就是先讀進來, 再寫個循環(huán)做差
或者
只讀一遍, 根據(jù)條件寫差

贊一下

回復此樓

9樓2013-10-03 21:43:02

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

查看全部 9 個回答

jerkwin

專家顧問 (正式寫手)

專家經(jīng)驗: +14
應助: 454 (碩士)
金幣: 20699.1
散金: 148
紅花: 81
帖子: 813
在線: 2648.3小時
蟲號: 1023452
注冊: 2010-05-19
專業(yè): 理論和計算化學
管轄: 分子模擬

【答案】應助回帖

★ ★
感謝參與，應助指數(shù) +1
gkf高: 金幣+2 2013-09-29 23:19:22

write(*,"(a4,200F30.15)" i,n(i)
有誤, 應為
write(*,'(I4,200F30.15)') i,n(i)

贊一下

回復此樓

2樓2013-09-29 22:22:23

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

yongma2008

木蟲 (著名寫手)

論文？苦！主。

應助: 34 (小學生)
金幣: 2089.6
散金: 1670
紅花: 15
帖子: 1610
在線: 398.5小時
蟲號: 1091013
注冊: 2010-09-06
性別: GG
專業(yè): 理論和計算化學

write(*,"(a4,200F30.15)" i,n(i)
---------------------------------^
這句話已經(jīng)告訴你在哪有問題了。要習慣看錯誤提示

贊一下

回復此樓

3樓2013-09-30 10:46:22

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

836449366

金蟲 (小有名氣)

應助: 1 (幼兒園)
金幣: 3039.8
散金: 62
紅花: 4
帖子: 270
在線: 356.3小時
蟲號: 1478273
注冊: 2011-11-05
專業(yè): 理論和計算化學

引用回帖:

2樓: Originally posted by jerkwin at 2013-09-29 22:22:23
write(*,"(a4,200F30.15)" i,n(i)
有誤, 應為
write(*,'(I4,200F30.15)') i,n(i)

改了后，還是出現(xiàn)了錯誤
fortcom: Error: xxx.f90, line 13: Syntax error, found IDENTIFIER 'I' when expecting one of: .EQV. .NEQV. .XOR. .OR. .AND. .LT. < .LE. <= .EQ. == .NE. /= .GT. > ...
write(*,"(I4,200F30.15)" i,n(i)
---------------------————-----------^
compilation aborted for xxx.f90 (code 1)

贊一下

回復此樓

4樓2013-09-30 14:06:51

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

查看全部 9 個回答

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

[考研] 284求調(diào)劑 +5	Zhao anqi 2026-03-22	5/250	2026-03-22 17:38 by barlinike
[考研] 生物學071000 329分求調(diào)劑 +5	我愛生物生物愛?/a> 2026-03-17	5/250	2026-03-22 16:42 by tcx007
[考研] 能源材料化學課題組招收碩士研究生8-10名 +5	脫穎而出 2026-03-16	17/850	2026-03-22 15:18 by 脫穎而出
[考研] 303求調(diào)劑 +5	安憶靈 2026-03-22	6/300	2026-03-22 12:46 by 素顏傾城1988
[考研] 廣西大學材料導師推薦 +3	夏夏夏小正 2026-03-17	5/250	2026-03-21 22:20 by 金昊ML
[考研] 0805 316求調(diào)劑 +3	大雪深藏 2026-03-18	3/150	2026-03-21 18:55 by 學員8dgXkO
[考研] 0703化學調(diào)劑 +4	妮妮ninicgb 2026-03-21	4/200	2026-03-21 18:39 by 學員8dgXkO
[考研] 工科0856求調(diào)劑 +3	沐析汀汀 2026-03-21	3/150	2026-03-21 18:30 by 學員8dgXkO
[考研] 求助 +5	夢里的無言 2026-03-21	6/300	2026-03-21 17:51 by 學員8dgXkO
[考研] 299求調(diào)劑 +5	shxchem 2026-03-20	7/350	2026-03-21 17:09 by ColorlessPI
[考研] 材料與化工（0856）304求 B區(qū) 調(diào)劑 +3	邱gl 2026-03-21	3/150	2026-03-21 13:47 by lature00
[考研] 301求調(diào)劑 +10	yy要上岸呀 2026-03-17	10/500	2026-03-21 03:14 by JourneyLucky
[考研] 303求調(diào)劑 +5	睿08 2026-03-17	7/350	2026-03-21 03:11 by JourneyLucky
[考研] 304求調(diào)劑 +6	曼殊2266 2026-03-18	6/300	2026-03-21 00:32 by JourneyLucky
[考研] 317求調(diào)劑 +5	申子申申 2026-03-19	9/450	2026-03-20 22:26 by JourneyLucky
[考研] 一志愿西北大學，070300化學學碩，總分287，雙非一本，求調(diào)劑。 +4	晨昏線與星海 2026-03-19	4/200	2026-03-20 22:15 by JourneyLucky
[考研] 一志愿西安交通大學學碩 354求調(diào)劑211或者雙一流 +3	我想要讀研究生 2026-03-20	3/150	2026-03-20 20:13 by JourneyLucky
[考博] 26博士申請 +3	1042136743 2026-03-17	3/150	2026-03-17 23:30 by 輕松不少隨
[論文投稿] 有沒有大佬發(fā)小論文能帶我個二作 +3	增銳漏人 2026-03-17	4/200	2026-03-17 09:26 by xs74101122
[考研] 070300化學學碩求調(diào)劑 +6	太想進步了0608 2026-03-16	6/300	2026-03-16 16:13 by kykm678

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

24小時熱門版塊排行榜

836449366

[求助] Fortran出現(xiàn)語法錯誤

» 猜你喜歡

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

jerkwin

【答案】應助回帖

jerkwin

【答案】應助回帖

yongma2008

836449366

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