有程序:DO10I=1,5,3DO10J=I,310K=I+JWRITE(*,*)KEND此程序的运行结果是:()
下列程序中,第一个Do语句共执行了()次循环。
Dim i As Integer, j As Integer
i = 1 Do
j = 1
Do
Sum = Sum + j
j = j + 2
Print j;
Loop Until j > 3
i = i + 2
Loop Until i > 10
Print Sum
当输入1.5,2.5,3.5,4.0下列程序执行后的输出结果为()。
DIMENSIONA(2,2)
READ(*,*)A
SUM=0
DO10I=1,2
DO20J=I,2
K=A(I,J)*I*J
10A(1,2)=K
WRITE(*,*)A(2,1)
END
免费的网站请分享给朋友吧