( 9 ) 下面的程序执行时 , 可以从键盘输入一个正整数 , 然后把该数的每位数字按逆序输出 。 例如 : 输入 7685 ,则输出 5867 ,输入 1000 ,则输出 0001 。请填空。Private Sub Command1_Click()Dim x As Integerx=InputBox( “ 请输入一个正整数 ” )While x>_ _[11] ___Print x Mod 10;x=x\10WendPrint__ [12] __End Sub

题目

( 9 ) 下面的程序执行时 , 可以从键盘输入一个正整数 , 然后把该数的每位数字按逆序输出 。 例如 : 输入 7685 ,则输出 5867 ,输入 1000 ,则输出 0001 。请填空。

Private Sub Command1_Click()

Dim x As Integer

x=InputBox( “ 请输入一个正整数 ” )

While x>_ _[11] ___

Print x Mod 10;

x=x\10

Wend

Print__ [12] __

End Sub


相似考题
更多“( 9 ) 下面的程序执行时 , 可以从键盘输入一个正整数 , 然后把该数的每位数字按逆序输出 。 例如 ”相关问题
  • 第1题:

    从键盘输入一个4位整数,按如下规则加密后输出。加密规则:每位数字都加上7,然后用和除以10的余数取代该数字;再把第一位与第三位交换,第二位与第四位交换。


    ARnd生成的随机数为0—1的小数,乘以l00后取整后范围为0-99,选A.。

  • 第2题:

    从键盘输入一个3位数的正整数,将其反向输出(如输入123,输出321)。 提交要求: (1)把程序代码和运行结果并排显示,进行截图直接提交到“答案区”。 (2)把程序代码保存到一个文本文件中(如: 1.txt),并上传附件。


    Practice1.java

  • 第3题:

    编写一个程序,从键盘输入一个四位整数n,输出它的各位数字之和,并逆序输出。 例如:n=1203,则输出6,3021 n=3024,则输出9,4203


    #include void main() { int a,b,c,max; printf(“Please input 3 integers:/n”); scanf(“%d%d%d”,&a,&b,&c); max=a; if(b>a)max=b; if(c>x)max=c; printf(“Max=%d”,max); }

  • 第4题:

    如果一个正整数的所有因子之和等于该正整数,则称这个正整数为完全数,编写程序读入n ,输出不超过n 的全部完全数。 (提示:例如6=1+2+3是一个完数)。


    程序代码如下:CLEARSET TALK OFFgs=0FOR i=5 to 500 yzh=0 FOR j=1 to INT (i/2) IF i&j=0 yzh= yzh+j ENDIF ENDFOR IF yzh=i gs=gs+1 ENDIF ENDPOR? Gs 程序代码如下:CLEARSET TALK OFFgs=0FOR i=5 to 500 yzh=0 FOR j=1 to INT (i/2) IF i&j=0 yzh= yzh+j ENDIF ENDFOR IF yzh=i gs=gs+1 ENDIF ENDPOR? Gs

  • 第5题:

    编写程序,从键盘输入一个5位正整数,然后求出它的个位数、十位数、百位数、千位数和万位数,并按下面的格式,打印出这五位数字的和。 例如, 输入: 12345 打印出: 15(1+2+3+4+5=15)。


    1