[单项选择]下列自定义函数ABC的功能是计算一个整数的各位数字之和: FUNCTION abc Parameter x s=0 DO WHILE x>0 s=s+MOD(x,10) ___________ ENDDo RETURN S ENDFUNC在上述函数定义中,下划线处应填写的语句是（） .
A. x=INT(x/10)
B. x=x-INT(x/10)
C. x=INT(x%10)
D. x=x-INT(x%10)

查看答案

[简答题]编写程序打印出所有的“水仙花数”，所谓“水仙花数”是指一个三位数，其各位数字立方和等于该数本身。

查看答案

[单项选择]一个两位数的中间加上一个0，那么所得的这个数是原数的9倍，原来这个两位数是多少（　）。
A. 15
B. 25
C. 35
D. 45

查看答案

[填空题]

本程序的功能是:找出所有满足各位数字之和正好是其所有质因子之和的三位数。例如378,其各位数字之和为18,而其质因子2,3,3,3,7之和也是18,所以378是满足条件的数。
Option Explicit
Private Sub CmdFind_Click（　）
Dim i As Integer,p As String,st As String,st1 As String
For i=100 To 999
（）
If csum(i)=zyz(i,st) Then
p=CStr(i)
st1=Left(p,1) & "+" & Mid(p,2,1) & "+" & Right(p,1)
List1.AddItem i & ": " & st1 & "=" & Left(st,Len(st)-1)
End If
Next i
If List1.ListCount=0 Then
List1.AddItem "无满足要求的数!"
End If
End Sub
Private Function csum(m As Integer)As Integer ’求各位数字之和
Dim i As Integer,p As String
p=CStr(m)
For i=1 To Len(p)
（）
Next i
End Function
Private Function zyz(ByVal m As Integer,st As String)As Integer ’求所有质因子之和
Dim i As Integer
i=2
Do
If m Mod i=0 Then
zyz=zyz+i
st=st & i & "+"<

查看答案

[简答题]改错题【题目】如果将一个二进制数的各位数字的顺序颠倒后所得到的新二进制数与原数相等,则称该二进制数为回文数,以下程序的功能是:在由两个正整数确定的范围内,查找对应的二进制数为回文数的整数,采用的算法是:将待判断的整数转换为二进制数形式,并按正序和反序方式分别存入两个字符串中,比较两个字符串,若两个字符串相等则该数为符合要求的数正确程序的输入/输出结果如下(下划线部分为键盘输入): 请输入查找范围:100 200 对应的二进制数为回文数的个数为:8 107à1101011 119à1110111 127à1111111 129à10000001 153à10011001 165à10100101 189à10111101 195à11000011 含有错误的源程序如下 #include #include char *fun(int t) { char s1[33]={0},s2[33]={0},c,*p1,*p2; p1=s1;p2=s2+31; while(t){ c=t%2; t/=2; *p1++=c; *p2++=c; } p2++; if(!strcmp(s1,p2)){ char *p=new char[33]; strcpy(p,s1); return *p; } else return 0; } void main（　） { int a[200]={0},low,up; char *bin[200]={0},*p; cout<<"请输入查找范围:"; cin>>low>>up; for(int i=0,j=low;j<=up;j++) if(p==fun(j)){ a[i]=j; bin[i++]=p; } cout

查看答案

我来回答:

提交

[单项选择]一个三位数能分别被10、12、18除尽，那么这个三位数的各位数字之和为多少A. 14B. 15C. 12D. 9

更多"一个三位数能分别被10、12、18除尽，那么这个三位数的各位数字之和为"的相关试题:

[单项选择]一个三位数能分别被10、12、18除尽，那么这个三位数的各位数字之和为多少
A. 14
B. 15
C. 12
D. 9