声振论坛

 找回密码
 我要加入

QQ登录

只需一步,快速开始

查看: 1338|回复: 1

[编程技巧] 如何实现多重循环?请教

[复制链接]
发表于 2007-4-2 12:03 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?我要加入

x
以下是个FORTRAN程序,实现多重循环,目的是在A(5,11)中实现各种求和,如:A(1,1)~A(1,11)求和后大于一个给定的数,则返回重新求和A(1,1)~A(1,10),直到小于这个数为止,不知如何实现matlab转换?

     DO 10 I1=1,MK
      DO 10 I2=1,MK
      DO 10 I3=1,MK
      DO 10 I4=1,MK
      DO 10 I5=1,MK
      DO 10 I6=1,MK
      DO 10 I7=1,MK
      DO 500 I8=1,M
      IF ((I8.EQ.MP).OR.(I8.EQ.MQ)) GOTO 500
      DO 900 I9=1,MQ
      IF (I9.EQ.MP) GOTO 500
      DO 800 I10=1,MK
      DO 700 IN=2,MP
      Z(K)=0.0
      DO 600 IX=5,105,5
    .........

    ......
500   continue
10    continue
回复
分享到:

使用道具 举报

发表于 2007-4-3 09:32 | 显示全部楼层
由于程序没有给全,只能大概说一下:
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
碰到GOTO很多的情况,建议直接用FORTRAN.
一般Matlab可以用while,for实现多重循环,但效率不高.
除非可以"向量化"表达式,一般多重循环还是用FORTRAN较好.
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

评分

1

查看全部评分

您需要登录后才可以回帖 登录 | 我要加入

本版积分规则

QQ|小黑屋|Archiver|手机版|联系我们|声振论坛

GMT+8, 2024-11-30 01:42 , Processed in 0.069172 second(s), 18 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

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