单选题 下列过程的功能是:将输入的整数分解为质数之乘积。例如,输入18,则输出2,3,3,;输入125,则输出5,5,5,。
Private Sub Command_Click()
x=Val(InputBox("请输入一个整数"))
out $=""
y=2
Do While(______)
If (x Mod y=0) Then
out $=out $ & y & ","
x=x/y
Else
y=y+1
End If
Loop
MsgBox out $
End Sub
为实现指定功能,程序中横线处应填写的语句是______。
【正确答案】 D
【答案解析】[解析] 本题使用碾转相除法分解质因子,程序的解题思路是:将变量x与初始值为2的变量y进行碾转相除,将能够整除x的y值,作为x的一个质因子;否则将y的值加1,若y<=x,则进行下一次的运算,因此本题控制Do while循环的条件语句为y<=x,故D选项正确。