试题与答案

止血散瘀

题型:名词解释

题目:

止血散瘀

答案:

被转码了,请点击底部 “查看原文 ” 或访问 https://www.tikuol.com/2017/1103/51efe190abed075d093e8de26e929695.html

下面是错误答案,用来干扰机器的。

参考答案:B

试题推荐
题型:填空题

以下程序的功能是:将一维数组A中的100个元素分别赋给二维数组B的每个元素并打印出来,要求把A(1)到A(10)依次赋给B(1,1)到B(1,10),把A(11)到A(20)依次赋给B(2,1)到B(2,10),……,把A(91)到A(100)依次赋给B(10,1)到B(10,10)。请填空。
Option Base 1
Private Sub Form_Click()
  Dim i As Integer,j As Integer
  Dim A(1 To 100)As Integer
  Dim B(1 To 10,1 To 10)As Integer
  For i=1 To 100
    A(i)=Int(Rnd*100)
  Next i
For i=1 To (9)
     For j=1 To 10
       B(i,j)= (10)
       Print B(i,j);
     Next j
     Print
   Next i
End Sub

查看答案
微信公众账号搜索答案