Fortran Coder

查看: 6041|回复: 8
打印 上一主题 下一主题

[求助] 出错01abc(续)

[复制链接]

1963

帖子

12

主题

5

精华

论坛跑堂

臭石头雪球

F 币
1357 元
贡献
574 点

美女勋章热心勋章星光勋章新人勋章贡献勋章管理勋章帅哥勋章爱心勋章规矩勋章元老勋章水王勋章

楼主
发表于 2021-11-18 12:18:24 | 显示全部楼层
read(*,*) (  ( a(i,j) , j = 1 , n )   ,   i=1 , n )

1963

帖子

12

主题

5

精华

论坛跑堂

臭石头雪球

F 币
1357 元
贡献
574 点

美女勋章热心勋章星光勋章新人勋章贡献勋章管理勋章帅哥勋章爱心勋章规矩勋章元老勋章水王勋章

沙发
发表于 2021-11-19 10:19:39 | 显示全部楼层
先输入 jr
然后输入 n, zz, bass

1963

帖子

12

主题

5

精华

论坛跑堂

臭石头雪球

F 币
1357 元
贡献
574 点

美女勋章热心勋章星光勋章新人勋章贡献勋章管理勋章帅哥勋章爱心勋章规矩勋章元老勋章水王勋章

板凳
发表于 2021-11-19 11:55:22 | 显示全部楼层
DO (DABS(X1-X2)/2.GT.XTOL)
是否为
DO while (DABS(X1-X2)/2.GT.XTOL)
您需要登录后才可以回帖 登录 | 极速注册

本版积分规则

捐赠本站|Archiver|关于我们 About Us|小黑屋|Fcode ( 京ICP备18005632-2号 )

GMT+8, 2024-5-3 02:52

Powered by Tencent X3.4

© 2013-2024 Tencent

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