24小时热门版块排行榜    

北京石油化工学院2026年研究生招生接收调剂公告
查看: 541  |  回复: 4

springer_

木虫 (著名写手)

[求助] 读取矩阵数据出现问题了 已有2人参与

读取4X3矩阵,出现下面的错误,求大神指点
program ex01
    implicit none
    integer :: i,j
    real :: a(4,3)
    open(11,file='data.txt')
    read(11,*)
    read(11,*) ( (a(i,j),j=1,3),i=1,4 )
    write(*,*)a  
    close(11)
end program ex01

读取矩阵数据出现问题了
QQ Photo20150115205420.jpg
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐,对您同样有帮助:

坐在墙头等红杏
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

pippi6

铁杆木虫 (著名写手)

工程和科学数值计算咨询

【答案】应助回帖

感谢参与,应助指数 +1
似乎数据不够,把 data.txt 帖上来看看
2楼2015-01-15 23:44:32
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

springer_

木虫 (著名写手)

引用回帖:
2楼: Originally posted by pippi6 at 2015-01-15 23:44:32
似乎数据不够,把 data.txt 帖上来看看

1 2 3
2 3 4
3 4 5
4 5 6
就是像这样
坐在墙头等红杏
3楼2015-01-16 08:13:09
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

向海洋进军

木虫 (正式写手)

【答案】应助回帖

★ ★ ★ ★ ★
感谢参与,应助指数 +1
springer_: 金币+5, ★★★★★最佳答案, 按你的方法,解决了 2015-01-16 10:46:46
删除第一个read试试。

[ 发自小木虫客户端 ]
4楼2015-01-16 08:15:36
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

pippi6

铁杆木虫 (著名写手)

工程和科学数值计算咨询

【答案】应助回帖

4楼说得对, 第一个read 是问题
5楼2015-01-16 08:43:47
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 springer_ 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 292分,材料与化工,申请调剂 +18 程晴之 2026-04-01 20/1000 2026-04-01 23:01 by 来看流星雨10
[考研] 265求调剂 +4 林深温澜 2026-04-01 6/300 2026-04-01 22:30 by 林深温澜
[考研] 273求调剂 +19 李芷新1 2026-03-31 19/950 2026-04-01 21:49 by chyhaha
[考研] 303分 0807学硕求调剂 +3 TYC3632 2026-04-01 3/150 2026-04-01 19:24 by lwk2004
[考研] 一志愿郑大材料工程290求调剂 +18 Youth_ 2026-03-30 18/900 2026-04-01 19:23 by 无际的草原
[考研] 286求调剂 +5 lim0922 2026-03-26 5/250 2026-04-01 19:08 by 客尔美德
[考研] 330分求调剂 +11 qzenlc 2026-03-29 11/550 2026-04-01 14:32 by chenqifeng666
[考研] 一志愿 南京航空航天大学 ,080500材料科学与工程学硕 +7 @taotao 2026-03-30 7/350 2026-04-01 14:30 by chenqifeng666
[考研] 085600,321分求调剂 +13 大馋小子 2026-03-31 13/650 2026-04-01 12:35 by chemdavid
[硕博家园] 博一被送出联培感觉不适应怎么办 +3 全村的狗 2026-03-31 3/150 2026-04-01 10:44 by 328838485
[考研] 一志愿:西北大学,英一数一408-284分求调剂 +7 12.27 2026-03-27 7/350 2026-03-31 21:59 by lbsjt
[考研] 086000调剂 +5 7901117076 2026-03-26 5/250 2026-03-31 17:45 by 544594351
[考研] 286求调剂 +6 Faune 2026-03-30 6/300 2026-03-31 14:37 by jp9609
[考研] 272求调剂,接受跨专业调剂! +3 闲鱼卢 2026-03-31 3/150 2026-03-31 13:00 by 替代品000
[考研] 一志愿食品科学与工程083200求调剂 +4 XQTJZ 2026-03-30 4/200 2026-03-31 04:10 by fmesaito
[考研] 材料化工340求调剂 +3 jhx777 2026-03-30 3/150 2026-03-30 17:54 by JourneyLucky
[考研] 340求调剂 +6 Amber00 2026-03-26 6/300 2026-03-29 12:06 by 无际的草原
[考研] 本科双非材料,跨考一志愿华电085801电气,283求调剂,任何专业都可以 +6 芝士雪baoo 2026-03-28 8/400 2026-03-29 08:16 by 松花缸1201
[考研] 070300化学求调剂 +4 起个名咋这么难 2026-03-27 4/200 2026-03-27 21:39 by 83503孙老师
[考研] 081200-11408-276学硕求调剂 +4 崔wj 2026-03-26 4/200 2026-03-27 08:04 by chemisry
信息提示
请填处理意见