- 基础理论
- 数据及数据库技术
- 人工智能
- 算法理论
- 算法实例
- + 面向对象程序设计 VB开发工具
- 程序设计语言
- 循环结构
- 分支结构
- 顺序结构
- 类、对象、属性、方法、事件和事件处理的概念
- VB应用程序的界面设计与调试
- 基本数据类型
- 常量、变量、数组
- 常用的标准函数
- 基本运算及表达式
- 赋值语句
- 选择语句
- 循环语句
- 算法实例的程序实现
- 算法及算法的表示方法
- 多媒体理论
- 基础软件操作
- 算法软件操作
- 多媒体软件操作
- 网络技术应用
以下流程图的功能是( )


A.输入三个数,输出其中的第一个数 |
B.输入三个数,输出其中的中间数 |
C.输入三个数,输出其中的最小数 |
D.输入三个数,输出其中的最大数 |
如果a=”135”,b=”246”, c=135,d=246,则下列赋值语中运行时肯定会出错的有( )
① x=a+b ② x=b+c ③ x=c+d
④ x=d+a ⑤ x=val(a)-val(b) ⑥ x=a-b
① x=a+b ② x=b+c ③ x=c+d
④ x=d+a ⑤ x=val(a)-val(b) ⑥ x=a-b
A.零个 | B.一个 | C.两个 | D.三个 |
为了实现两个变量A和B的值交换,我们可以借助第三变量C。正确步骤为_________。
①A←B ②A←C ③B←A ④B←C ⑤C←A ⑥C←B
①A←B ②A←C ③B←A ④B←C ⑤C←A ⑥C←B
若有一个三位数满足:x=a3+b3+c3(其中a、b、c分别是该三位数的个位、十位和百位数字),则称该三位数为水仙花数。完成程序填空实现输入数的水仙数判断。
Dim a As Double, b As Double, c As Double, x As Double
x = Val(InputBox("输入一个数据x"))
If ①______________________ Then
a = x mod 10
b = ②_________________________
c = x \ 100
If ③__________________________ Then
Print "是水仙花数!"
Else
Print "不是水仙花数!"
④_____________________________________
⑤_____________________________________
Print "请输入三位数!"
End If
Dim a As Double, b As Double, c As Double, x As Double
x = Val(InputBox("输入一个数据x"))
If ①______________________ Then
a = x mod 10
b = ②_________________________
c = x \ 100
If ③__________________________ Then
Print "是水仙花数!"
Else
Print "不是水仙花数!"
④_____________________________________
⑤_____________________________________
Print "请输入三位数!"
End If