2004年上半年程序员考试题及答案二

【 本站原创作者：ITlearner整理 更新时间：2004-10-12 | 字体：大 中 小】

[导读]　　试题三 　　以下是与Visual Basic对应栏内。 开发应用有关的5个问题．对每 一个问题，请将解答填入答题纸的 　　(1)在Visual Basic中 ，工程文件、窗体文件和标准模 块文件的扩展名是什么? 　　请从下列选项中选...

试题三

以下是与Visual Basic 对应栏内。

开发应用有关的5个问题．对每

一个问题，请将解答填入答题纸的

(1)在Visual Basic中

，工程文件、窗体文件和标准模

块文件的扩展名是什么?

请从下列选项中选择：

prg、prj、exe、vbp、

rom、frm、win、fra，std、bas

、vbs、Vbm

(2)设某窗体上有一个命令按钮，其 ”字样的信息。为使热键 ALT+S 与该命 性设置什么样的属性值?

名称为 CmdSave，运行时该按钮上显示有“保存(S) 令按钮相关联，应该对按钮 CmdSave 的 Caption属

(3)设某窗口内有一个图像框 Image1 大”按钮就会使该图像框的长和宽都放大 缩小10%（该图像框的左上角不动）。请 码。

，以及两个命令按钮“放大”和“缩小”。单击“放 10%；单击“缩小”按钮就会使该图像框的长和宽都 分别写出这两个命令按钮的单击事件过程中的程序代

(4)为使某个单选按钮初始时默认被选中，在开发时应怎样做?

(5)若有语句 Tmpval=M 描述程序运行时弹出的消息

sgBox（非法操作!，ybOKCancel 框的主要特征。

+vbCritical，"提示"），请简要

从下列的2道试题(试题四至试题五) 小的1道解咎有效。

中任选1道解答，如果解答的试题数超过1道，则题号

试题四

阅读以下说明和C代码，将应填入__(n)__处的字句写在答题纸的对应栏内。

[说明]

函数 MultibaseOutput B（2≤B≤16）进制数并输 B 进制数从栈中输出。有 及栈的类型定义如下：

(long n，int B)的功能是：将 出。该函数先将转换过程中得到 关栈操作的诸函数功能见相应函

一个无符号十进制整数 n 转换成 的各位数字入栈，转换结束后再把 数中的注释。C代码中的符号常量

#define KAXSIZE 32

typedef struct{

int *elem；　　/* 栈的存储区 */

int max；　　　/* 栈的容量，即找中最多能存放的元素个数 */

int top；　　　/* 栈顶指针 */

}Stack；

[C代码]

int lnitStack(Stack

*S，int n)　　/* 创建容量为n

的空栈 */

{ S->elem = (int *)matloc(n * sizeof(int))；

if (S->elem == NULL) return -1；

S->max = n；__(1)__= 0；return 0；

}

int Push(Stack*S，in

t item)　　　/* 将整数item压

入栈顶 */

{ if(S->top == S->max){ printf("Stack is full! ")；return -1；}

__(2)__；item；return 0；

}

int StackEmpty(Stack S){ return(

!S.top) ? 1；0；)　/* 判断栈是否为空 */

int Pop(Stack*S)　　　　　　　　/* 栈顶元素出栈 */

{ if (!S->top){ printf("Pop an empty stack! ")；return -1；)

return __(3)__；

}

void MultibaseOutput(long n，int B)

{ int m；Stack S；

if (init Stack(&S，MAXSIZE)) { p

rintf("Failure! ")；return；}

do {

if (Push(&s，__(4)__

)) { printf("Failure! ")；r

eturn；}

n = __(5)__：

} while (n != 0)；

while (!StackEmpty(S

))　{　　　　　/* 输出B进制

的数 */

m = Pop(&S)；

if (m < 10) printf("Kd"，m)；　　/* 小于10，输出数字 */

else printf("%c，m + 55)；

/* 大于或等于10，输出相应的字符 */

}

printf(" ")；

}

试题五

阅读以下应用说明及Vi 应栏内。

sual Basic程序代码，将应填入

__(n)__处的字句写在答题纸的对

[应用说明5.1]

本应用程序的窗体中有 Txtl和Txt2）。运行时，用 号（从0开始）分别在文本

一个下拉式列表框（名称为Comb 户从Combol的列表中进行选择， 框 Txt1 和 Txt2 中显示出来。

ol）和两个文本框（名称分别为 程序就会将选中条目的内容以及编

[程序代码5.1]

Private Sub Combol_C1ick()

Txtl.Text = Combol.__(1)__

Txt2.Text = Combol.__(2)__

End Sub

（注：可供(2)处选择的选项：List

，Index，Listlndex，ListCount，Number）

[应用说明5.2]

本应用程序的运行窗口如下图所示：

当用户在输入框（名为 择所需的运算后，输出框（ 为CmdClear）后，输入框和

Txtln）中输入数值数据，并从 名为TxtOut）中就会显示运算的 输出框都清空。

下拉式列表框（名为CmbOp）中选 结果。用户单击“清除”按钮（名

开发该应用的部分程序代码如下：

[程序代码5.2]

Private Sub CmbOp_Click()

Dim DataIn As Double，DataOut as Double

DataIn = __(3)__

Select Case __(4)__

Case "取整数部分"

DataOut = Int(Dataln)

Case "求平方根"

If Dataln < O Then

MsgBox$("负数不能开平方!")

Else

DataOut = Sqr(Dataln)

End If

Case "取绝对值"

DataOut = Abs(Dataln)

(TxtOut.Text = str$(DataOut)

__5)__

End Sub

从下列的2道试题(试题六至试题七) 小的1道解答有效。

中任选1道解答。如果解答的试题数超过1道，则题号

试题六

阅读下列函数说明和 C

函数，将应填入__(n)__处的字

句写在答题纸的对应栏内。

[函数6说明]

函数DelAInsB(LinkedL 是，将线性表A中关键码为k key2的结点之前，若移动成 表，La为表A的头指针，Lb

ist La，LinkedList lb，int k eyl的结点开始的len个结点，按 功，则返回0；否则返回-1。线 为表B的头指针。单链表结点的

ey1，int key2，int len)的功能 原顺序移至线性表B中关键码为 性表的存储结构为带头结点的单链 类型定义为：

typedef struct node{

int key；

struct node*next；

}*Linkedhist；

[函数6]

int DelllnsB(LinkedLiSt La，Link

edList Lb，int keyl，int key2，int len)

{ LinkedList p，q，S，prep，pres；

int k；

if (!La->next || !Lb->next || len<=0)　return-1；

p = La->next； prep = La；

while (p && p->key != keyl){　　　/* 查找表A中键值为key1的结点 */

prep = p； p = p->next；

}

if (!p) return -1；

/* 表A中不存

在键值为key1的结点 */

q = p； k = 1；

while (q && __(1)__){

/* 在表A中找出待删除的len个结点 */

__(2)__： k++；

}

if (!q) return -1；　　　　　　 •

/* 表A中不存在要被删除的len个结点 */

S = Lb->next；__ (3)__；

while (s && s->key != key2){　　　/* 查找表B中键值为key2的结点 */

pres = s； s = s->next；

}

if (!s)return -1；

/* 表B中不存在

键值为key2的结点 */

__(4)__q->next；　　　　　　　　　/* 将表A中的len个结点删除 */

q->next：__(5)__

pres->next = p；　　　　　　　　　/* 将len个结点移至表B */

return 0；

}

试题七

阅读以下应用说明、属 答题纸的对应栏内。

性设置及VisualBasic程序代码

，将应填入__(n)__处的字句写在

[应用说明7]

本应用程序的运行窗口如下图所示：

只要用户单击“闪烁”按钮，文字“ 烁；单击“停止”按钮时，闪烁停止，恢

欢迎光临”就会以0.3秒消失、0.3秒显示反复进行闪 复图示的初态。

在开发过程中，需要设置的属性如下：

[属性设置7]

在开发过程中，需要编写的程序代码如下；

[程序代码7]

Private Sub CmdF Click()

Timerl.__(3)__ = True

Label.Visible = False

End Sub

Private Sub Timerl_ Timer()

__(4)__ = not Label.Visible

End Sub

Private Sub CmdT Click()

Timerl.Enabled = __(5)__

Label.Visible = true

End Sub

从下列的2道试题（试题八至试题九 号小的1道解答有效。

）中任选1道解答，如果解答的试题数超过1道，则题

试题八

阅读下列程序说明和C程序，将应填入__(n)__处的字句写在答题纸的对应栏内。

[程序8说明]

程序8用于计算某公司 。职工的当月收入（工资或 。由于该公司的工资或薪金 ，整个输入以工号小于等于

每个职工应缴纳的个人所得税额 薪金）通过键盘输入，每次输入 是不定时发放的，所以输入过程 0结束。

和全体职工缴纳的个人所得税总额 一个职工的工号和工资（或薪金） 中每个职工的收入会出现多次输入

假设个人所得税法规定 后的余额作为该月的月应纳

；个人收入所得，按月计税，以 税所得额，适用税率如下表所示

每月收入总额减除免税金额800元 。

上表表明，个人收入所得税是按照超额累进的税率来征收的。

设一个人的月应纳税所

得额为K(元)，用下面的公式计

算其应缴纳的个人所得税额S(元):

若0

若500

若2000

若5000

例如，某人某月工资总 个人所得税额为500*5％+15

额为4100元，减去800元后，应 00*10％+1300*15％=370元。

纳税所得额为3300元，其应缴纳的

[程序8]

#include

#define MaxNum 50

#define BASE 800　　　　　/*免税金额基数*/

int paylevel[]={0，5 ¨：

00，2000，5000，20000，40000

，60000，80000，100000，100000

int taxPrate[]={5，10，15，20，2

5，30，35，40，45)： /*税率表*/

typedef struct{

int ld；　　　　/*职工的工号*/ ．

long Salary；　　/*职工的工资*/

}Info；

/* 查找工号为Id的职

工在数组employee中的下标，返

回值为0表示没有 */

int find(int ld，Info employee[]，int m){

int j；

employee[0].Id=Id；

for(j＝m；__(1)__；j--)；

return j；

}

void main(void)

{ Info employeeCHaxNum+1]；

long Wage；

double sum s 0，K，S：

int i，j，N＝0，Code；

scanf("M％ld"，&Code

，&Wage)；　　 /*读入职工号

、工资或薪金*/

while(Code>0)　{

i＝find(Code，employee，N)；

if (i>0)employee[i].Salary += Wage：

else{　__ (2)__；

employee[N].Id＝Code；employee[N

].Salary＝Wage；

}

scanf("％d％ld"，&Code，&Wage)：

}

for　(i＝1；i<＝N；i++){

K = __(3)__；　　　　　　　　　/*计算月应纳税所得额*/

S＝0；　　　　　　　　　　　　 /*月应纳税额赋初值*/

if (K > 0) {

for (j＝1；j<＝9；j++)

if(__(4)__)　　　　　　　　/*月应纳税所得额超过第j级*/

S＝S+(paylevel[j]-pa

ylevel[j-1])*taxPrate[j-1]/1

00；

else{　S＝S+(__ (5)__)*taxPrate[

j-1]/100；break；}

}

printf("职工％d应缴

纳的个人所得税额：％10.21f

"，employee[i].Id，S)；

sum += S；

}

printf("全体职工个人所得税总额：％10，21f "，sum)；

}

试题九

阅读以下应用说明及Vi 栏内．

sualBasic程序代码，将应填入_

_(n)__处的字句写在答题纸的对应

[应用说明9]

本应用程序的运行窗口如下图所示：

窗口中的三个文本框和两个按钮名称 compute和Cmd_quit．运行时，文本框Txt ）。当用户在文本框ht_salary中输入月 后，Txt_tax框中就显示计算所得的应纳 户输入，Txt_base的内容以灰色显示。

分别为Txt_salary、Txt_base、ht_tax、Cmd _base中存放的是免税金额基数（应扣除的基本费用 收入(工资或薪金)并单击“计算”按钮Crud_compute 税额。文本框Txt_base和Txt_tax在运行时不接受用

个人工资(或薪金)所得 免税金额基数后的余额作为 税率进行累进计算．目前的

税是按照超额累进的税率来征收 该月的月应纳税所得额，再将应 免税金额基数为800元，税率如

的，方法是：以每月收入总额减去 纳税所得额按相应级数采用相应的 下表所示：

个人工资(或薪金)所得税是按照超额 免税金额基数后的余额作为该月的月应纳 税率进行累进计算．目前的免税金额基数

累进的税率来征收的，方法是：以每月收入总额减去 税所得额，再将应纳税所得额按相应级数采用相应的 为800元，税率如下表所示：

设一个人的月应纳税所得额为K(元) ：

，用下面的公式计算其应缴纳的个人所得税额S(元)

若0

若500

若2000

若5000

例如，某人某月工资总 个人所得税额为500*5％+15

额为4100元，减去800元后，应 00*10％+1300*15％=370元。

纳税所得额为3300元，其应缴纳的

在开发过程中，需要编写的程序代码如下：

[程序代码]

Option Base 0

Private Sub Cmd compute-C1ick()

Dim paylevel，taxPrate

paylevel＝Array(0，500，2000，50 1000001)

00，20000，40000，60000，80000，100000，

taxPrate＝Array(5，10，15，20，2

5，30，35，40，45)

K＝__(1)__

S ＝ 0

If　(K>0)　Then

For j＝1 To 9

If　__(2)__　Then

S＝S+(paylevel(j)-paylevel(j-1))

*taxPrate(j-1)/100

Else

S＝S+(__(3)__)*taxPrate(j-1)/100

Exit For

End lf

Next j

End lf

__(4)__＝Str$(S)

End Sub

Private Sub Cmd_quit_C1ick()

End

End Sub

Private Sub Form_Load()

Txt_tax.Text = " "

Txt_salary.Text = " "

Txt_base.Text = 800

Txt_tax.Locked = True

Txt_base.Enabled =__(5)__

End Sub

2004年上半年程序员级答案

上午答案

下午答案

试题一

(1)j ← j-1

(2)I ← i+1

(3)A[i]←povot 或 [j]←povot

(4)A，L，k-I 或A，L，k

(5)A，k+I，H 或A，k，H

试题二

(1)*pi == *pi

(2)pi

(3)str[i] == del

(4)str[j]

(5) i = j+1

试题三

(1)工程文件的扩展名是 vbp，窗体 。

文件的扩展名是 frm，标准模块文件的扩展名是 bas

(2)保存(&S)

(3)解答：“放大”按钮单击事件过程中的程序代码：

Image1.Width＝Image1.Width*1.1

1mage1.Height＝Image1.Height*1.1

“缩小”按钮单击事件过程中的程序代码：

Image1.Width＝Image1.Width*0.9

1mage1.Height＝Image1.Height*0.9

(4)将该单选按钮的Value属性值设置成True

(5)消息框的标题栏显示“提示”： 示“确定”和“取消”；消息框中显示的

消息框中有一个出错标记以及两个命令按钮，分别显 信息为“非法操作!”。

试题四

(1)S->top

(2)S->elem[S->top++]•

(3)S->elem[-S->top]

(4)n % B

(5)n / B

试题五

(1)Text

(2)listlndex

(3)Val(Txtln.Text) 或Txtln.Text

(4)CmbOp.Text

(5)EndSelect

试题六

(1)k<1en

(2)q=q->next 或 q=(*q).next

(3)pres = Lb

(4)prep->next或(*prep).next

(5)s 或 pres->next 或 (*pres).next

试题七

(1)false

(2)300

(3)enabled

(4)Label.Visible

(5)false

试题八

(1)employee[j].Id!=Id

(2)++N 或 N++ 或 N=N+1

(3)employee[i].Salary-BASE

(4)k>payleve[j]

(5)k>payleve[j-1]

试题九

(1)Val(Txt_salary.Te

xt)-Val(Txt_base.Text)

(2)k>paylevel(j)

(3)k-paylevel(j-1)

(4)Txt_tax.Text

(5)False

• 转载请注明来源：IT学习网 网址：http://www.t086.com/ 向您的朋友推荐此文章
• 特别声明： 本站除部分特别声明禁止转载的专稿外的其他文章可以自由转载，但请务必注明出处和原始作者。文章版权归文章原始作者所有。对于被本站转载文章的个人和网站，我们表示深深的谢意。如果本站转载的文章有版权问题请联系我们，我们会尽快予以更正。

• 上一篇：2004年上半年程序员考试题及答案一
• 下一篇：微软再出新招打击盗版 盗版WinXP有新限制
• 查看2004年10月的文章归档