【已解决】读取文件时Fortran未正确识别real类型

crabdudu

————————————————————————————————
报错：
At line 9 of file test.f90 (unit = 12, file = 'test.txt')
Fortran runtime error: Bad real number in item 1 of list input
————————————————————————————————
源码：
program main
implicit none
integer :: i
character*20 :: array_1(5)
real*8 :: array_2(5)
real*8 :: array_3(5)
open(12,file="test.txt")
do i=1,5
  read(12,*) array_1(i),array_2(i),array_3(i)
end do
print*,array_1(1:5)
print*,array_2(1:5)
print*,array_3(1:5)
end
————————————————————————————
如果将array_2和array_3都改为character类型的话是可以正确读入的，但想实现real类型。
尝试无果
望大家解答帮忙，谢谢。

Hesper

全部以同样类型读入，然后使用数组类型转换，将某数组转换成需要的类型，一个函数的事。

crabdudu

Hesper 发表于 2020-10-12 20:12
全部以同样类型读入，然后使用数组类型转换，将某数组转换成需要的类型，一个函数的事。

你好，目前只能以character读入，我搜索以后只发现了整数与实数的转换似乎不太可行，望再指教。

lqouc

crabdudu 发表于 2020-10-12 21:30
你好，目前只能以character读入，我搜索以后只发现了整数与实数的转换似乎不太可行，望再指教。

字符型可以用read转换为整形或实型，下面是个例子
read(cha(1:5),*) x
cha是个字符串，x可以是整形或实型变量

crabdudu

lqouc 发表于 2020-10-13 15:21
字符型可以用read转换为整形或实型，下面是个例子
read(cha(1:5),*) x
cha是个字符串，x可以是整形或实 ...

谢谢 似乎可以解决