| 查看: 2897 | 回复: 8 | ||||
springer_木虫 (著名写手)
|
[交流]
Fortran怎么从一个dat文件中读取不同类型数据赋值给不同的变量？ 已有1人参与
|
| Fortran怎么从一个dat文件中读取不同类型数据赋值给不同的变量？ |
回复此楼» 收录本帖的淘帖专辑推荐
 程序 |
» 猜你喜欢
生命口C13面上会评时间
已经有11人回复
-
内心匮乏
已经有16人回复
-
生命口面上会评结束了吗大家有知道结果吗？现在还没有结果正常不？
已经有9人回复
-
有机物中金属离子降到1ppm以下，有什么好的方法吗？用过有机溶剂重结晶还是降不下来
已经有4人回复
-
投英文期刊如何查重
已经有6人回复
-
不要再数国自然申请书的 filecode 的分隔符个数了
已经有21人回复
-
伯胺上甲基求助
已经有7人回复
-
跨出版社商投稿
已经有5人回复
-
5个%2F，非固定段22个字母
已经有7人回复
-
生生命学部会评
已经有4人回复
» 本主题相关价值贴推荐，对您同样有帮助:
- Fortran读取文件的问题！
已经有6人回复
- Fortran如何读取不确定行数的数据
已经有3人回复
- fortran中的数组越界问题，
已经有3人回复
- 编一个fortran程序
已经有17人回复
- FORTRAN中如何实现重复读取一行？
已经有24人回复
- fortran，带字符的数据读取与存储！
已经有11人回复
- fortran输出求助
已经有6人回复
- FORTRAN 读取文件数据出错
已经有6人回复
- fortran中如何处理字符和数据混合的文件
已经有6人回复
- Fortran如何读取数据避开空行？
已经有7人回复
- 请教一个fortran小程序编译出错的问题，谢谢
已经有9人回复
- Fortran的格式化输入输出问题
已经有14人回复
- 用fortran遇到了一个问题，来求助了，谢谢先
已经有3人回复
- 【求助】FORTRAN读取文本文件
已经有9人回复
- 【求助】matlab读取fortran输出的txt文件【已解决】
已经有3人回复
2楼2014-07-16 10:32:30
springer_
木虫 (著名写手)
- 应助: 2 (幼儿园)
- 金币: 3761.5
- 散金: 138
- 红花: 51
- 帖子: 1163
- 在线: 164.9小时
- 虫号: 2748954
- 注册: 2013-10-24
- 性别: GG
- 专业: 结构工程
3楼2014-07-16 16:06:17
4楼2014-07-17 10:09:00
springer_
木虫 (著名写手)
- 应助: 2 (幼儿园)
- 金币: 3761.5
- 散金: 138
- 红花: 51
- 帖子: 1163
- 在线: 164.9小时
- 虫号: 2748954
- 注册: 2013-10-24
- 性别: GG
- 专业: 结构工程
5楼2014-07-17 10:59:26
★
小木虫: 金币+0.5, 给个红包，谢谢回帖
小木虫: 金币+0.5, 给个红包，谢谢回帖
|
写了个大概 integer i ! 节点个数、单元数 integer np, ne ! 面积、模量 real area, b integer, allocatable, dimension(:,  :: linereal, allocatable, dimension(:, :: coorn! 打开文件 open( 10, file = filename, status = 'old', form = 'formatted' ) ! 读取数据 read(10,*) read(10,*) np read(10,*) read(10,*) ne read(10,*) read(10,*) b read(10,*) read(10,*) area read(10,*) ! 分配内存 allocate( line( 2,ne ) ) allocate( coorn(2,np) ) ! 读取节点信息 do i = 1, np read(10,*) coorn(1:2, i) end do ! 读取单元信息 do i = 1, ne read(10,*) line(1:2, i) end do |
6楼2014-07-17 13:24:28
7楼2014-07-17 13:25:49
8楼2014-07-17 13:27:05
springer_
木虫 (著名写手)
- 应助: 2 (幼儿园)
- 金币: 3761.5
- 散金: 138
- 红花: 51
- 帖子: 1163
- 在线: 164.9小时
- 虫号: 2748954
- 注册: 2013-10-24
- 性别: GG
- 专业: 结构工程
9楼2014-07-18 10:56:21