1、任意输入五个两位整数,输出其中可以被3整除的整数,如果不存在,则输出“没有满足条件的整数”
1、任意输入五个两位整数,输出其中可以被3整除的整数,如果不存在,则输出“没有满足条件的整数”
参考答案和解析
见课堂讲解
相关考题:
下列程序执行时,从键盘上依次输入123和234,则程序的输出结果是【 】。Dim a,b As Integera=InputBox("请输入第一个整数")b=InputBox("请输入第二整数")Print a+b
( 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
设从键盘输入一整数的序列:a1, a2, a3,…,an,试编写算法实现:用栈结构存储输入的整数,当ai≠-1时,将ai进栈;当ai=-1时,输出栈顶整数并出栈。算法应对异常情况(入栈满等)给出相应的信息。
有以下程序 程序运行时,输入的值在哪个范围才会有输出结果( )。A.大于3且不等于l0的整数 有以下程序程序运行时,输入的值在哪个范围才会有输出结果( )。A.大于3且不等于l0的整数B.不等于10的整数C.大于3或等于l0的整数D.小于3的整数
下面的程序执行时,可以从键盘输入一个正整数,然后把该数的每位数字按逆序输出。例如:输入7685,则输出5 8 6 7;输人1000,则输出0 0 0 1。请填空。 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
现有以下程序: Private Sub Command1 Click( ) c1=0 c2=0 For i=1 To 100 If i Mod 3=0 Then c1=c1+1 Else If i Mod 7=0 Then c2=c2+1 End If Next i Print c1+c2 End Sub 此程序运行后输出的是在1~100范围内( )。A.同时能被3和7整除的整数个数B.能被3或7整除的整数个数(同时被3和7整除的数只记一次)C.能被3整除,而不能被7整除的整数个数D.能被7整除,而不能被3整除的整数个数
下列过程的功能是:从键盘输入一个大于2的整数,输出小于该整数的最大质数。( )。例如,输入20,则输出l9,输入10,则输出7。为实现指定功能,程序【】处应填写的语句是( )。A.k—k+1B.X=X一1C.X—X/kD.k—k一1
如果用一个圆来表示词语所指称的对象的集合,那么以下哪项中三个词语之间的关系符合下图?A.①能被23整除的正整数,②6的因子,③10以内的正整数B.①20的因子,②40以内的正整数,③能被43整除的正整数C.①50以内的正整数,②能被41整除的正整数,③49的因子D.①100以内的正整数,②87的因子,③能被73整除的正整数
单选题与命题“能被6整除的整数,一定能被3整除“等价的命题是( ).A能被3整除的整数,一定能被6整除B不能被3整除的整数,一定不能被6整除C不能被6整除的整数,一定不能被3整除D不能被6整除的整数,不一定能被3整除
单选题何谓“双数”?双数就是()。A能被2整除的整数B个位上是0、2、4、6、8的整数C正偶数,即能被2整除的正整数