【单选题】Private Sub Form_Click() Dim x As Integer, a As Integer Dim y As Integer x = 50 a = 0 For i = 1 To 4 y = Val(InputBox("请输入一个整数")) If y Mod 5 = 0 Then a = a + y x = y Else a = a + x End If Next i Print...
【简答题】以下程序的功能是计算并输出两个整数的最大公约数。Private Sub a1()Dim x As Integer, y As Integer, t As Integerx = InputBox("请输入x的值")y = InputBox("请输入y的值")Do【 】x = yy = tLoop While (t 0)Debug.Print 【 】End Sub有如下语句:1 t = x 2 t ...
【单选题】下列佛教造像组合中,属于东方三圣的是 ( )
【单选题】P65.以下程序的功能是计算并输出两个整数的最大公约数。 Private Sub al() Dim x As Integer, y As Integer, t As Integer X = InputBox("请输入 x 的值") y = InputBox("请输入 y 的值") Do [] x=y y=t Loop While (t0) Debug.Print [] End Sub 有如下语句:...
【简答题】下面事件过程的功能是:输入三个整数 x 、 y 和 z ,按从大到小顺序输出这三个数,在横线上填上适当内容。 Private Sub Command1_Click() Dim x!, y!, z! x = InputBox("x=") y = InputBox("y=") z = InputBox("z=") If Then t = x: x = y: y = t If Then t = x: x...
【单选题】下列佛教造像组合中,属于东方三圣的是()
【简答题】执行下面程序段,如果运行时输入6,则在窗体上输出结果是______。 Dim x As Integer x = InputBox("input x") If x > 1 Then y = x + 2 ElseIf x < 10 Then y=x + 3 ElseIf x=6 Then y=x End If Print y
【单选题】假设 int 型变量占两个字节的存储单元,若有定义 int x[10]={0 , 2 , 4 , 8} ;,则数组 x 在内存中所占字节数为