2. 计算机
  3. 下面的程序执行时，可以从键盘输入一个正整数，然后把该数的每位数字按逆序输出。 例如：输入7685，则输出5 8 6 7；输入1000，则输出0 0 0 1。请填空。 Private Sub Commandl_Click()

下面的程序执行时，可以从键盘输入一个正整数，然后把该数的每位数字按逆序输出。 例如：输入7685，则输出5 8 6 7；输入1000，则输出0 0 0 1。请填空。 Private Sub Commandl_Click()

admin2012-09-07  47
问题 下面的程序执行时，可以从键盘输入一个正整数，然后把该数的每位数字按逆序输出。
      例如：输入7685，则输出5 8 6 7；输入1000，则输出0 0 0 1。请填空。
    Private Sub Commandl_Click()
        Dim x As Integer
        x=InputBox(“请输入一个正整数”)
        While x>__________
            Print x Mod 10；
             x__________
        wend
    End Sub
选项
答案O x＼10
解析 本题考查数据逆序的算法。数据逆序的基本思路就足不断地输出和10整除后的余数，题中输出x Mod 10，这样可以输出x的个位数。接下来取得此数除以10得到的商，本题就是x=x＼10，一直到x变为0结束循环，这样从数据的各位开始，逐个输出x的每一位数据。
转载请注明原文地址:https://kaotiyun.com/show/PJhp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)