上机习题 含答案

发布 2022-09-05 11:02:28 阅读 3947

上机练习一(第一轮复习)

1. 在文本框text1中输入一串字符,统计其中字母(不区分大小写),数字和其他字符的个数。

2. 输入一个整数,判断该数是否是素数。

3. 随机产生20个200~400之间随机整数,按每行4个输出到picture中,并求出其中的最大值。

4. 随机产生10个数存入数组中,用选择排序法对其从小到大的顺序排序。

5.输入一个整数,判断该数是否是回文数。

6. 输入一个整数,判断该数是否是水仙花数(所谓水仙花数是指一个三位数,它的个位、十位、百位数字的立方和恰巧等于这个数本身。例如:153=13+53+33)

7. 分别输入年份以及月份,输出该月所对应的天数(注意闰年问题)。

8.建立一个登录窗口,要求输入密码。设密码“abcdefg”;若密码正确,显示“祝贺你,成功登录!

”;密码不正确,显示“对不起,密码错误,无法登录!”,并统计次数,当输入超过3次时,则退出系统。

9.求任意正整数 n 的阶乘。(n!=1*2*3*……n)

10.编写程序,输出输出n=7“杨辉三角”,如下图所示(两种显示方法)。

提示】分析上面的形式,可以找出其规律:对角线和每行的第一列均为1,其余各项是它的上一行中前一个元素和上一行的同一列元素之和。例如第四行第三列的值为3,它是第三行第二列与第三列元素值之和,可以一般地表示为:

a(i,j)=a(i-1,j-1)+a(i-1,j)

dim i as integer

dim j as integer

dim a() as integer

dim n as integer

private sub command1_click()

n = inputbox("输入n值") 1

redim a(n, n)

a(1, 1) =1

tab(2); a(1, 1)

for i = 2 to n

for j = 1 to i

a(i, j) =a(i - 1, j - 1) +a(i - 1, j)

tab((j - 1) *5 + 2); a(i, j);

next j

next i

end sub

11.斐波那契数列又因数学家列昂纳多·斐波那契以兔子繁殖为例子而引入,故又称为“兔子数列”。一般而言,兔子在出生两个月后,就有繁殖能力,一对兔子每个月能生出一对小兔子来。

如果所有兔都不死,那么一年以后可以繁殖多少对兔子?

提示】我们不妨拿新出生的一对小兔子分析一下: 第一个月小兔子没有繁殖能力,所以还是一对; 两个月后,生下一对小兔民数共有两对; 三个月以后,老兔子又生下一对,因为小兔子还没有繁殖能力,所以一共是三对; 依次类推可以列出下表:

经过月数:0 1 2 3 4 5 6 7 8 9 10 11 12

子对数: 1 1 2 3 5 8 13 21 34 55 89 144 233

表中数字1,1,2,3,5,8---构成了一个数列。这个数列有关十分明显的特点,那是:前面相邻两项之和,构成了后一项。即 :a(n)=a(n-1)+a(n-2)

12.分类统计输入一串字符,统计各字母出现的次数,不区分字母大小写。

5. private sub command1_click()

dim s$, n%, i%

s = inputbox("请输入一个整数:")

n = len(s)

for i = 1 to int(len(s) /2)

if mid(s, i, 1)

nextif i > int(len(s) /2) then

print s; "是一个回文数!"

elseprint s; "不是一个回文数!"

end if

end sub

8. private sub command1_click()

static n%

if = abcdefg" then

msgbox "祝贺你,成功登录!"

elsemsgbox ("对不起,口令错误,无法登录!")

n = n + 1

if n >=3 then unload me

end if

end sub

21、窗体中有一个文本框text1和一个列表框list1。程序运行时在文本框中输入字符串并回车,如果该字符串内容在列表框中不存在,就把它添加到列表框中;如果该字符串内容在列表框中已存在就给出如右图的提示信息。填空完成下面的程序。

private sub text1_ keypress___keyascii as integer)

if keyascii = 13 then

for i = 0 to – 1

if = then

msgbox__ 输入项已在列表框中"

exit sub

_end if___

next i

list1. additem__

end if

end sub

WindowsXP上机习题答案

注意 在windows中为了完成某个目的,方法不是唯一的。下述提示中只是列出了完成某个要求的一种或几种操作方法,可能还有其他方法也是正确的。另外,下面主要列出了完成某种操作的提示,有些题目的提示并不是具体的操作步骤,同学们在答题时需要再稍微进行细化。一 上机习题操作提示 仅供参考 1 在桌面上新建一...

习题二 含答案

1 传感器的基本用途可归结为 1 生产工程的测量与控制 2 环境监测与保护 3 交通运输与资源探测 4 医疗卫生和家用电器。2 在过程工业中,需要经常检测的 四大参数 为湿度 压力 流量和液面。此外还包括密度 粘度等参数。与 四大参数 相比,这些参数的检测和控制更困难。3 压力传感器中按原理主要有如...

SQL习题 含答案

一 基本查询。1.查询所有买家信息。select from买家表。2.查询所有商品的商品名称 品牌 型号。select商品名称,品牌,型号from商品表3.输出销售表中不同的商品编号 剔除重复行 select distinct商品编号from销售表4.输出销售表中前20 的记录信息。select t...