Fortran 程序
do i=1,4,2
print 100,i,ave(i),&
&i,tmin(i),pos(imin(i)/5,imin(i)%5,1),pos(imin(i)/5,imin(i)%5,2),&
&i,tmax(i),pos(imax(i)/5,imax(i)%5,1),pos(imax(i)/5,imax(i)%5,2)
print 200,i+1,ave(i+1),&
&i+1,tmin(i+1),pos(imin(i+1)/5,imin(i+1)%5,1),pos(imin(i+1)/5,imin(i+1)%5,2),&
&i+1,tmax(i+1),pos(imax(i+1)/5,imax(i+1)%5,1),pos(imax(i+1)/5,imax(i+1)%5,2)
end do
100 format(i1,'月850hPa上平均温度',f6.2,',',&
&i1,'月850hPa上最低气温',f6.2,'相应的经纬度位置',a10,a10,',',&
&i1,'月850hPa上最高气温',f6.2,',','相应的经纬度位置',a10,a10)
200 format(i1,'月700hPa上平均温度',f6.2,',',&
&i1,'月700hPa上最低气温',f6.2,'相应的经纬度位置',a10,a10,',',&
&i1,'月700hPa上最高气温',f6.2,',','相应的经纬度位置',a10,a10)
错误 1 error #5082: Syntax error, found INTEGER_CONSTANT '5' when expecting one of: <IDENTIFIER> [ D:\Download\ivf\projects\a5\a5\Source1.f90 55
错误 2 error #5082: Syntax error, found INTEGER_CONSTANT '5' when expecting one of: <IDENTIFIER> [ D:\Download\ivf\projects\a5\a5\Source1.f90 55
错误 3 error #5082: Syntax error, found INTEGER_CONSTANT '5' when expecting one of: <IDENTIFIER> [ D:\Download\ivf\projects\a5\a5\Source1.f90 56
错误 4 error #5082: Syntax error, found INTEGER_CONSTANT '5' when expecting one of: <IDENTIFIER> [ D:\Download\ivf\projects\a5\a5\Source1.f90 56
错误 5 error #5082: Syntax error, found INTEGER_CONSTANT '5' when expecting one of: <IDENTIFIER> [ D:\Download\ivf\projects\a5\a5\Source1.f90 58
错误 6 error #5082: Syntax error, found INTEGER_CONSTANT '5' when expecting one of: <IDENTIFIER> [ D:\Download\ivf\projects\a5\a5\Source1.f90 58
错误 7 error #5082: Syntax error, found INTEGER_CONSTANT '5' when expecting one of: <IDENTIFIER> [ D:\Download\ivf\projects\a5\a5\Source1.f90 59
错误 8 error #5082: Syntax error, found INTEGER_CONSTANT '5' when expecting one of: <IDENTIFIER> [ D:\Download\ivf\projects\a5\a5\Source1.f90 59
错误 9 Compilation Aborted (code 1) D:\Download\ivf\projects\a5\a5\Source1.f90 1
好像是数组下标引用出问题,但是不知道怎么改正
2024.09.
我重新看了一下,应该是下标的问题,括号里的东西写太多了,如果改的话,把括号里的东西取出来单独赋值,逐个检查哪里错误。
不过源代码早没了,只是这个修改思路可以参考一下。