Question

fortran语言：同一个continue的问题、 K=0; DO 10 I=1,2 DO 10 J=1,2 10 K=K+I/J 执行完后为什么K=2

有没有可能是答案错了

Answer 1

K=0;
DO 10 I=1,2
DO 10 J=1,2
10 K=K+I/J

执行完后为什么K=2？

如果前面有声明为i,j,k为实数，答案应该为4.5

如果没有时式声明，则三者为整数，答案为4
（注：1/2会略掉）
k＝2不可能的。

仅供参考。

追问

我也觉得不可能，但是不确定，所以郁闷了很久。再帮我看个，马上给分，拜托了。
DO 10 I=1,6,2
DO 10 I=1,6,3
IF(K.LT.I*J)K=I*J
10 CONTINUE

求K值

追答

老兄，你追问的这个不太好答啊。

首先我必须得假设你追问的第二句写错了，要把I改成J，
即DO 10 I=1,6,3，改成DO 10 J=1,6,3，ok？

其次，k的初值不知道啊。
如果假设k初值为10，那循环就没有意义，ok？

好吧，就假设I,J,k为整数,k初值为0。
那么，循环变量i会取值1，3和5一共三个值，而J会取值到1和4两个值，下面应该简单了吧。
因为K=I*J不是累加，而是直接赋值，所最后的值是5*4＝20。ok？

Answer 2

结果应该是4，因为当I=1，J=2时，结果是1/2,因为是整型，所以结果是1

Answer 3

人走路