24小时热门版块排行榜    

查看: 1597  |  回复: 7
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

kathy2008

木虫 (正式写手)

[求助] 如何读入以下的矩阵

如题,请指点。不像一般的下三角矩阵。请指点。谢谢
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

kathy2008

木虫 (正式写手)

引用回帖:
Originally posted by snoopyzhao at 2011-05-02 15:42:17:
刚才那个里面关于 lfm 的赋值有点儿问题,尽管不影响使用,呵呵……下面这个是改正后的。

[code]
program overlap

real, dimension(88,88) :: ol
character(len=80) :: line,lfm
integer :: i, j, k, l, ...

继续请教: idat = 12,是怎么样
确定把12付给idat这个变量的呢?也就是说为什么要选择12,而不是其他数字,谢谢。
7楼2011-05-02 15:57:54
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 8 个回答

kathy2008

木虫 (正式写手)

仔细一看,是一个下三角矩阵,只是按5个一组来输出,请高手指点。
2楼2011-05-02 10:58:51
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

snoopyzhao

至尊木虫 (职业作家)

下载不下来,呵呵……

如果你知道矩阵的行数或列数,自己计算一下其中的数据个数,然后把它们全部读到一个一维数组中,或者直接到二维数组也可以……

类似于这样……

read(*,*) (a(i), i = 1, 100)

或者

(read(*,*) ((a(i,j), i = 1,10), j=i,10)

仅供参考……
3楼2011-05-02 11:13:46
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

kathy2008

木虫 (正式写手)

引用回帖:
Originally posted by snoopyzhao at 2011-05-02 11:13:46:
下载不下来,呵呵……

如果你知道矩阵的行数或列数,自己计算一下其中的数据个数,然后把它们全部读到一个一维数组中,或者直接到二维数组也可以……

类似于这样……

read(*,*) (a(i), i = 1, 100)

...

有88行,有88列,是一个88*88的下三角矩阵。
4楼2011-05-02 15:29:00
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
信息提示
请填处理意见