24小时热门版块排行榜

返回列表

当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖

836449366

金虫 (小有名气)

应助: 1 (幼儿园)
金币: 3039.8
散金: 62
红花: 4
帖子: 270
在线: 356.3小时
虫号: 1478273
注册: 2011-11-05
专业: 理论和计算化学

[求助] Fortran出现语法错误

我自己编了一段程序，就是将aaa.txt中的数据的前一行减去后一行，然后返回差值
这是程序
   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
运行后总是出现错误
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)
求大神解答，本人不胜感激！

回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐，对您同样有帮助:

动网格的UDF问题已经有21人回复
fluent中UDF编辑热源的问题！已经有4人回复
fluent 加载udf出现这样错误怎么办已经有14人回复
单机编译安装vasp求指导已经有10人回复
UDF编译时出现语法错误已经有13人回复
急求fortran运行错误原因，在线等已经有7人回复
请教 fortran 运行错误的原因已经有13人回复
microsoft developer studio 已经有38人回复
Linux中安装gaussian时，install出现语法错误，求解答已经有17人回复
SCI文章投完稿发现有几个语法错误怎么办？已经有13人回复
FORTRAN属性声明出错已经有8人回复
如何回复审稿人提出的意见（语法错误）？已经有4人回复
GAUSSIAN计算语法错误已经有7人回复
在写英文文章时，好多单词下面会出现红线或绿线，会对论文语言质量有影响吗已经有7人回复
如何减少英文投稿中的语法错误，提高文章质量？大家有什么好办法？已经有14人回复
请教MS4.4 Linux下安装提示 msiinstall语法错误已经有14人回复
标题有语法错误会不会影响文章的审阅啊已经有21人回复
写了一个fortran90的小程序，编译通不过，请大侠帮忙已经有59人回复
【求助】读文本数据出现段错误[fortran] 已经有14人回复
【求助】fortran计算时出现NaN 已经有11人回复

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

已阅回复此楼关注TA 给TA发消息送TA红花 TA的回帖

836449366

金虫 (小有名气)

应助: 1 (幼儿园)
金币: 3039.8
散金: 62
红花: 4
帖子: 270
在线: 356.3小时
虫号: 1478273
注册: 2011-11-05
专业: 理论和计算化学

引用回帖:

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)

改了后，还是出现了错误
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)