UC知道关于FORTRAN 77最简单的一个程序
来源：百度知道 编辑：UC知道 时间：2024/06/30 02:08:28
k=1
do 10 I=1,2
do 10 J=1.2
10 k=k*I/J
WRITE(*,*)k
end
这个程序运行结果是什么啊？为什么？
唉，没有办法，考试要考，学校都没有学过，有没有高手知道，谢谢
do 10 I=1,2
do 10 J=1.2
10 k=k*I/J
WRITE(*,*)k
end
这个程序运行结果是什么啊？为什么？
唉，没有办法，考试要考，学校都没有学过，有没有高手知道，谢谢
结果=1×1/1×1/2×2/1×2/2
=1
将2改为m，即将
do 10 I=1,2
do 10 J=1.2
10 k=k*I/J
改为
do 10 I=1,m
do 10 J=1,m
10 k=k*I/J
则结果为：
结果=1×(1/1×1/2×1/3……×1/m)×(2/1×2/2×2/3×……×2/m)×……
(m/1×m/2×m/3×……×m/m)
=1
感觉这个程序有点奇怪，不知道是不是你写错了。