fortran中定义了一个实型数组，来读取一组包含实数与整数的数据

筱筱筱筱筱雅痴

例如这样一串数据：-50,0.02442,0,0,0
real string(1:5)
read(20,'(5f)') string(1),string(2),string(3),string(4),string(5)
结果读取出来的数据如下：-4.9999999E-06  2.4420001E-02  0.0000000E+00  0.0000000E+00  0.0000000E+00
非0的整数就会读错，而数据又比较多，无法逐个定义读取类型，这要怎么改？

风之精灵

把real string(1:5)修改成real string(5), 把read(20,'(5f)') string(1),string(2),string(3),string(4),string(5)修改成read(20,'(5f8.5)') string(1),string(2),string(3),string(4),string(5)再试试，至于为什么这么改，请好好阅读Fortran输入输出格式控制

筱筱筱筱筱雅痴

风之精灵 发表于 2017-9-17 08:27
把real string(1:5)修改成real string(5), 把read(20,'(5f)') string(1),string(2),string(3),string(4),st ...

非0整数读出来还是有误

风之精灵

筱筱筱筱筱雅痴 发表于 2017-9-17 10:24
非0整数读出来还是有误

具体情况截个图上来

゛绍〤z、

程序没啥大问题，real string(1:5)这么写也没问题，这样写是指定数组元素标号为1~5，但是Fortran默认就是从1开始的，所以没必要，例如如果要从零开始可以写成real string(0:4)
read(20,'(5f)') 在语法上是没问题的。那么问题在哪呢？
计算机里的数据是二进制保存的，整型和浮点数的保存规则不一样，像-50是整型，但是read(20,'(5f)') 这样计算机就会按浮点型来读取数据，因此整型的数按浮点型来读取就会出现错误了，如果是-50.0就不会出现错误。
比较直接的方法就是 read(20,*) string(1),string(2),string(3),string(4),string(5)
这样计算机会自己判断数据类型然后读取，因为这里string为浮点型，读取数据后会转化为浮点型，然后赋值给string

筱筱筱筱筱雅痴

゛绍〤z、 发表于 2017-9-17 14:30
程序没啥大问题，real string(1:5)这么写也没问题，这样写是指定数组元素标号为1~5，但是Fortran默认就是从 ...

谢谢你的帮助呀{:eb511:}

筱筱筱筱筱雅痴

风之精灵 发表于 2017-9-17 13:25
具体情况截个图上来

问题已经解决啦，万分感谢

lgz

Fortran默认就是从1开始的

寻路人

谢谢楼主分享