江苏省高校计算机等级考试二级VB上机改错题题型与总结

  1. 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。

江苏省高校计算机等级考试二级上机改错题题型与总结

应该用、而错用成、

应该用、而错用成、

类型一

类型二

类型三

\

n<0等→0(用于一个数中数字提取或者进制转换)

(*特殊情况:被改成)

n<0等→1(用于关于一个数的质因子分析)

/”与整除号“\”

结束条件(非n<0等→0)

题目:本程序的功能是:查找四位整数,它的9倍正好等于n的反序数。程序界面参见下图。

1()

n , k

1 = "结果是:" &

n = 1000 2400

k = 9 * n

(n) = k

= n & "" & k

1 = 1 & &

n

(n )

i ,

k

i = 1 此处原题有错,不应该有这句话

k = n 10

= & (k)

n = n /10

n > 0

=

题目:本程序的功能是:随机生成一个有n个元素的数组(n由函数输入),找出其中的最大元素并将它删除,再输出删除后的数组。

1

a() , n

1()

i

n = ("请输入数组个数", , 10)

a(n)

i = 1 n

a(i) = ( * 100) + 1

1 = 1 & (a(i))

i

(a)

i = 1 n

2 = 2 & (a(i))

i

(a() )

, , i

= a(1): = 1

i = 2 n

a(i) >

= a(i): = i

i

(a, )

(a() , k )

i

i = k + 1 (a)

a(i) = a(i + 1)

i

a((a) - 1)

题目:本程序的功能是查找80~150范围内的特殊十进制数据,其特点是该十进制数对应的8进制数为回文数(指从左向右读与从右向左读是一样的数)。例如十进制数据105对应八进制数为151,151属于回文数,所以105就是符合要求的数。

1()

i , ,

i = 80 150

=

8(i, , )

= (i) & ">" & & ""

1

i

8( n , , f )

k , () * 1, i

= ""

k = k + 1

(k)

(k) = n 8

= (k) &

n = n \ 8

n < 0

i = 1 () / 2

(i) <> (() - i + 1)

i

f =

题目:本程序的功能是将密文解密。密文中被非数字字符分隔的连续的数字是五进制数,每个五进制数对应一个明文字符的代码。例如五进制数242对应的代码值是72,也就是字母“H”,密文末尾以非数字字符结束。

1

1()

, , i

p , t() , k

= 1

= ""

i = 1 ()

p = (, i, 1)

p >= "0" p <= "4"

= & p

() <> 0

k = k + 1

t(k)

t(k) =

i

i = 1 (t)

k = (t(i))

= & (k)

i

2 =

(p )

i , k , n

i = (p) 1

n = n + ((p, i, 1)) * 5 ^ k

k = k + 1

i

= n

题目:本程序的功能是:查找800~1200范围内的所有具有两个相同数字的素数。例如811、877等都是符合要求的数。

1()

i

i = 800 1200

(i) (i)

1 i

i

(n )

() , k

i , j

k = k + 1

(k)

(k) = n 10

n = n \ 10

n <= 0

k = 0

i = 1 () - 1

j = i + 1 ()

(i) = (j) k = k + 1

j

i

k = 1 =

(n )

i

i = 2 (n)

n i = 0

I

=

题目:本程序的功能是:找出100以内的含有三个不同质因子的所有整数。程序界面参见下图。

1

1()

i , j , a() , s

i = 2 100

(i, a)

(a) = 3

s = i & "的质因子:"

j = 1 (a)

s = s & (a(j))

j

1 s

i

(x , a() )

i , j

j = 2

x j = 0

i = i + 1

a(i)

a(i) = j

x = x \ j

x j = 0

x = x \ j

Loop

j = j + 1

x = 0

相关文档
最新文档