[求助]：FORTRAN 语言试题

甜思思 · 发表于 2004-7-13 15:57:39

您需要登录才可以下载或查看，没有账号？立即注册

×

K=1
DO 10 I=1,2
DO 10 J=1,2
10 K=K*I/J
WRITE (*,*) K
END
请高手帮我分析分析怎么得出k的取值

zhujia2159 · 发表于 2004-7-13 16:45:36

1*1/1*1/2*2/1*2/2

甜思思 · 发表于 2004-7-14 09:55:22

如果按你的算法，那么当K=K+I/J 时，又如何算呢？

qiuyi · 发表于 2004-7-14 23:32:42

I=1, J=1, K=1*1/1=1； I=1, J=2, K=1*1/2=0（取整，不瞒你说我考试常错，现在那是稍清醒）；

I=2, J=1, K=0*2/1=0；......K=0

甜思思 · 发表于 2004-7-15 08:24:15

谢谢你的指点！

账号		自动登录	找回密码
密码			立即注册