Fortran Coder

查看: 2639|回复: 2
打印 上一主题 下一主题

[文件读写] 文件读取,想把文件的每一行读成一个数组

[复制链接]

3

帖子

2

主题

0

精华

新人

F 币
23 元
贡献
8 点
跳转到指定楼层
楼主
发表于 2022-10-7 22:15:02 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
如附件所示,比如第一行,想读成polygon(1,1)=4,  polygon(1,2)=5,  polygon(1,3)=13,  polygon(1,4)=15,第二行想读成 polygon(2,1)=10, polygon(2,2)=3等等
请问论坛里各位大佬有什么好的实现方法吗

periodic_polygons.txt

256 Bytes, 下载次数: 6

分享到:  微信微信
收藏收藏 点赞点赞 点踩点踩

250

帖子

2

主题

0

精华

宗师

F 币
1731 元
贡献
872 点

规矩勋章

沙发
发表于 2022-10-8 08:17:09 | 只看该作者
本帖最后由 necrohan 于 2022-10-8 08:19 编辑

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

3

帖子

2

主题

0

精华

新人

F 币
23 元
贡献
8 点
板凳
 楼主| 发表于 2022-10-8 15:20:42 | 只看该作者
necrohan 发表于 2022-10-8 08:17
大概这样
open(11,file="periodic_polygons.txt")
do i=1,10

谢谢大佬回复,该问题已经被群里的大佬解决了
方法是把每行读成字符串,再根据字符串的长度来进行分割,生成每个polygon
您需要登录后才可以回帖 登录 | 极速注册

本版积分规则

捐赠本站|Archiver|关于我们 About Us|小黑屋|Fcode ( 京ICP备18005632-2号 )

GMT+8, 2024-12-24 07:27

Powered by Tencent X3.4

© 2013-2024 Tencent

快速回复 返回顶部 返回列表