文件读取，想把文件的每一行读成一个数组

NAN00

如附件所示，比如第一行，想读成polygon(1,1)=4,  polygon(1,2)=5,  polygon(1,3)=13,  polygon(1,4)=15,第二行想读成 polygon(2,1)=10, polygon(2,2)=3等等
请问论坛里各位大佬有什么好的实现方法吗

NAN00

necrohan 发表于 2022-10-8 08:17
大概这样
open(11,file="periodic_polygons.txt")
do i=1,10

谢谢大佬回复，该问题已经被群里的大佬解决了
方法是把每行读成字符串，再根据字符串的长度来进行分割，生成每个polygon

necrohan

大概这样
open(11,file="periodic_polygons.txt")
do i=1,10
  read(11,*)polygon(1,:)
enddo
close(11)
但是这个不能解决每行数据个数不一样的问题