有程序:DATAI,M,N/2,1,4/10M=M*II=I+1IF(I.GT.N)GOT020GOTO1020WRITE(*,*)MEND执行此程序后,输出结果为:()
执行下面程序段后 https://assets.asklib.com/images/image2/2018080114091879332.jpg 结果K=() X =()
执行以下程序段后,输出结果和a的值是()。int a=10;printf("%d",a++);
有如下程序: Const n = -5 Const m = 6 Dim a(n To m) As Integer For i = LBound(a, 1) To UBound(a, 1) a(i) = i Next i Print a(LBound(a, 1)); a(UBound(a, 1)) 运行后输出的结果为( )。
执行以下程序段后,输出结果和a的值是( )int a=10; printf(%d,a++);
执行以下程序段后,输出结果是2000+8=2008int a,b;a=8;b=2000;printf(%d+%d=%d\n,a,b,a+b);
执行下面 程序段后,变量 s 的值是 ( ) 。 s=0 For m = 1 To 3 n = 1 Do While n<= m s = s + n n = n + 1 Loop Next m
下列程序段的执行结果为 ________ 。 Dim M(10), N(10) i= 4 For j = 1 To 7 M(j) = j N(i) = 2 * i + j Next j Print N(i); M(i)
下列程序段的执行结果为________。Dim M(10), N(10)i= 4For j = 1 To 7M(j) = jN(i) = 2 * i + jNext jPrint N(i); M(i)
执行下面程序段的输出结果为______。int x=13,y=5;printf('%d',x%=(y/=2));
有如下程序:Dim a(3,3)As IntegerFor m = 1 To 3For n = 1 To 3a(m,n)=(m-1)*3+nNext nNext mFor m = 2 To 3For n = 1 To 2Print a(n,m);Next nNext m运行后,输出结果是( )。
下列程序段的执行结果为______。Dim M(10), N(10)I=3For T = 1 To 5M(T) = TN(I) = 2 * I + TNext
下列程序段的执行结果为______。Dim A(3,3)For M=1 To 3For N=1 To 3If N=M 0r N=3-M+1 Then A(M,
下列程序的执行结果为Private Sub Command1_Click() Dim p As Integer, q As Integer p=12: q=20 Call Value(p, q) Print p; qEnd SubPrivate Sub Value(ByVal m As Integer, ByVal n As Integer) m=m * 2: n=n -
下列程序段的执行结果为()。Dim A(3,3)For M=1 To 3For N=1 To 3If N=M Or N=3-M+1 Then A(M, N)=
运行以下程序段后,输出结果为【】。 a=4: b=2 Print a*(a-B)
执行下面的程序段后,结果是()。Private Sub Form_Click()Dim mIf m Then Print m Else Print m+1End Sub
执行下面程序段后,关于变量x中存放的数值,下面说法正确的是_________。 Dim x% Do x = Int(Rnd() * 50 + 1) Loop While x Mod 2 <> 0
下面程序段的执行结果是()。 Dim M(10) For i=1 To 10 M(i)=11-i Next i X=6 Print M(2+M(X))
执行下面程序的输出结果为()。includevoid main() {int x=36,y=48,z;do {z=x%y; x
11、下面程序段执行后的输出结果是()。 int m=0256,n=256; printf("%o└┘%o",m,n);
执行下面程序,第一行输出结果是 (11) ,第二行输出结果是 (12) 。 Option Explicit Private Sub Form_Click() Dim A As Integer A=2 Call Subl(A) End Sub Private Subl(x As Integer) x=x*2+1 If x<10 Then Call Subl(x) End If x=x*2+1 Pri
下面程序段的执行结果是()。 Dim A(5) As Interger For i=1 To 5 A(i)=i*i Next i Print A(i-1)
在窗体上面画一个命令按钮,然后编写如下程序: Function M(x As Integer,y As Integer)As IntegerM=IIf(x>y,x,y) End Function Private Sub Command1_Click()Dim a As Integer,b As Integera=1b=2Print M(a,B) End Sub 程序运行后,单击命令按钮,输出结果为