下面的程序执行时，可以从键盘输入一个正整数，然后把该数的每位数字按逆序输出。例如：输入7685，则输出5867，输入1000，则输出0001。请将程序补充完整。PrivateSubCommand1_Click()DimxAsIntegerx=InputBox(“请输入一个正整数”)Whilex>______PrintxMod10;x=x10WendPrint______EndSub
举一反三
- 下面的程序执行时，可以从键盘输入一个正整数，然后把该数的每位数字按逆序输出。例如：输入 7685 ，则输出 5867 ，输入 1000 ，则输出 0001 。请将程序补充完整。 Private Sub Command1_Click() Dim x As Integer x=InputBox(“ 请输入一个正整数 ”) While x>_ _____ Print x Mod 10; x=x\10 Wend Print ____ __ End Sub
- 编写一个程序,从键盘输入一个三位整数,将其逆序输出。例如:输入123,输出321。
- 请从键盘输入一个整数，如果数字大于0，则输出“您输入的是正整数”，如果数字等于0，则输出“您输入的是0”，如果数字小于0，则输出“您输入的是负整数”。
- 编写一个程序，输入一个3位正整数，要求逆序输出对应的数，如输入123，则输出321。
- 编写程序:要求从键盘输入一个5位正整数,逆序输出该正整数的各位数字。【运行示例】请输入一个正整数:1234554321