fortran Do循环
CDO40K1=1,NDIDO30K2=1,NDIDDSDDE(K2,K1)=ELAM30CONTINUEDDSDDE(K1,K1)=EG2+ELAM40CONTINUE...
C
DO 40 K1=1,NDI
DO 30 K2=1,NDI
DDSDDE(K2,K1)=ELAM
30 CONTINUE
DDSDDE(K1,K1)=EG2+ELAM
40 CONTINUE
DO 50 K1=NDI+1,NTENS
DDSDDE(K1,K1)=EG
50 CONTINUE
C
刚学fortran的菜鸟，请问这样的嵌套循环空格有什么要求吗？一直提示错误。。。求高手指点 展开
DO 40 K1=1,NDI
DO 30 K2=1,NDI
DDSDDE(K2,K1)=ELAM
30 CONTINUE
DDSDDE(K1,K1)=EG2+ELAM
40 CONTINUE
DO 50 K1=NDI+1,NTENS
DDSDDE(K1,K1)=EG
50 CONTINUE
C
刚学fortran的菜鸟，请问这样的嵌套循环空格有什么要求吗？一直提示错误。。。求高手指点 展开
展开全部
continue语句前的标号30、40、50必须顶格。
DO 40 K1=1,NDI
DO 30 K2=1,NDI
DDSDDE(K2,K1)=ELAM
30 CONTINUE
DDSDDE(K1,K1)=EG2+ELAM
40 CONTINUE
DO 50 K1=NDI+1,NTENS
DDSDDE(K1,K1)=EG
50 CONTINUE
DO 40 K1=1,NDI
DO 30 K2=1,NDI
DDSDDE(K2,K1)=ELAM
30 CONTINUE
DDSDDE(K1,K1)=EG2+ELAM
40 CONTINUE
DO 50 K1=NDI+1,NTENS
DDSDDE(K1,K1)=EG
50 CONTINUE
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
Sigma-Aldrich
2018-06-11 广告
Duolink PLA技术可通过同一个实验即可完成对蛋白质互作及其修饰的检测、定量以及确定细胞定位等。Duolink基于原位PLA技术（即邻位连接分析技术），可以帮助您在内源蛋白质表达过程中进行该分析。...
点击进入详情页
本回答由Sigma-Aldrich提供
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
