[程序设计(初级程序员级)]2001年度初级程序员级下午试题

【shitiku.jxxyjl.com--计算机技术】

试题一..joxue.
阅读以下 C 代码，将应填入 __(n)__ 处的字句写在答题纸的对应栏内。..joxue.
[程序1.Il]..joxue.
#include ..joxue.
main ( )..joxue.
{ int x， p， i ， s = 0 ;..joxue.
for (x = 1 ; x < 5 ; x++) {..joxue.
for (p= i = 1 ; i <= x ; i++) p *= x ;..joxue.
s += p ;..joxue.
}..joxue.
printf( P%d\n" ，s) ;..joxue.
}..joxue.
程序1.1的输出结果是 __(1)__ 。..joxue.

[程序1.2]..joxue.
#include ..joxue.
void s( int b[ ] ，int n )..joxue.
{ int i ，j ，t ，flg ;..joxue.
for ( i = 0 ; i < n-1 ; i++ ) {..joxue.
for ( flg = O，j = 0 ; j < n-i-1 ; i++ )..joxue.
if (b[j] > b[j+l] ) {..joxue.
t = b[j] ; b[j] = b[j+1] ; b[j+l] = t ;..joxue.
flg = 1..joxue.
}..joxue.
if ( !flg ) break..joxue.
}..joxue.
}..joxue.
main( )..joxue.
{int i ， a[] = { 11，9，2，5，3，7 } ;..joxue.
s( a,6 ) ;..joxue.
for ( i = O ; i < 6 ; i++ ) printf( "%4d", a[i] ) ;..joxue.
printf( "\n" ) ;..joxue.
}..joxue.
程序1.2的输出结果是 __(2)__ ;函数 s(int b[],int n) 的功能是 __(3)__ ..joxue.

[程序1.3]..joxue.
#include ..joxue.
int m( unsigned k )..joxue.
{ int s = 1 ;..joxue.
do { s *= k % 10 ;..joxue.
k /== 10 ;..joxue.
} while (k) ;..joxue.
return s ;..joxue.
}..joxue.

main()..joxue.
{ printf( " %d，%d\n " ， m(1234)， m(43209)) ; }..joxue.
程序 1.3 的输出结果是 __(4)__ ; 函数 m(unsigned k) 的功能是 __(5)__ 。..joxue.

试题二..joxue.
以下是用 Visual Basic 开发应用有关的 5 个问题。对每一个问题，请将解答填入答题纸..joxue.
的对应栏内。..joxue.
(1)为使用户单击某窗口 ( 窗体名为 frm1 )时，会显示一行信息：“欢迎光临!”， 应在..joxue.
该窗体的哪个事件过程中，编写什么样的程序代码? 请写出相应的事件过程名以及该过程内的..joxue.
程序代码。..joxue.
(2)若某窗口内的命令按钮“加倍”具有如下的功能： 将文本框 txt1 中输入的数值加倍..joxue.
后，在文本框 txt2 中显示其结果，请写出该命令按钮的单击事件过程内的程序代码?..joxue.
(3)若某窗口 ( 窗体名为 frm1 ) 中，有一个文本框和一个命令按钮，只要在文本框中输..joxue.
入一个图像文件名(包括路径)，单击该命令按钮后，该图像就会成为此窗口的背景图像。请写..joxue.
出该命令按钮单击事件过程内的程序代码。..joxue.
(4)为使某窗口中的命令按钮“取消[C]”，具有如下的功能：按键 Alt+C 或按键“ESC”，..joxue.
都相当于单击该按钮，应怎样实现?..joxue.
(5)请说明如下语句的功能：..joxue.
MsgBox "请检查修改输入数据!"，vbOKOnly+vbCritcal+vbDefaultBUtton1,_..joxue.
"数据错"..joxue.

试题三..joxue.
阅读下列说明和 C 代码，将应填入 __(n)__ 处的字句写在答题纸的对应栏内。..joxue.
[程序3.1说明]..joxue.
本程序输入一字符串，并将其中的大写字母改变成小写字母。..joxue.
[程序3.1]..joxue.
#include ..joxue.
void main( )..joxue.
{ int i = 0 ;..joxue.
char s[120] ;..joxue.
printf ( "Enter a string.\n") ;..joxue.
scanf( "%s", s );..joxue.
while ( __(1)__ ) {..joxue.
if ( __(2)__ )..joxue.
s[i3 = s[i] - "A" + "a" ;..joxue.
i++ ;..joxue.
}..joxue.
printf( "%s\n", s );..joxue.
}..joxue.

[函数3.2说明]..joxue.
本函数用二分法，在已按字母次序从小到大排序的字符数组 list[len] 中，查找字符 c ，..joxue.
若 c 在数组中，函数返回字符 c 在数组中的下标，否则返回 -1。..joxue.
所谓二分法查找是：初始查找区间的下界为 0，上界为 len-1，查找区间的中后 ..joxue.
k = (下界+上界)/2 ; 若 list[k] 等于 c ，查找成功;若 list[k] > c，..joxue.
则新的查找区间的下界不变，上界改为 k-1; 否则新的查找区间的下界改为 k+1，..joxue.
上界不变。在新区间内继续用二分法查找。..joxue.
[函数3.2]..joxue.
int search( char list[ ] , char c ," int len )..joxue.
{int low = 0 , high = len-1 , k ;..joxue.
while ( __(3)__ ) {..joxue.
k = ( low + high) / 2 ;..joxue.
if ( __(4)__ ) return k ;..joxue.
else if ( __(5)__ ) high = k-1 ;..joxue.
else low = k+l ;..joxue.
}..joxue.
return -1 ;..joxue.
}..joxue.

试题四..joxue.
阅读下列 Visual Basic 程序，将应填入 __(n)__ 内的字句写在答题纸的对应栏内。..joxue.
[程序代码4.1]..joxue.
设应用程序窗体中有一个文本框 txt ，还有一个复选框 ck1 。这个复选框单击事件的..joxue.
程序代码如下：..joxue.
Private Sub ckl_Click( )..joxue.
If ckl.Value= vbChecked..joxue.
Txt.FontBold = True..joxue.
Else..joxue.
Txt.FontBold = False..joxue.
End if..joxue.
End Sub..joxue.
该应用程序中，复选框ck1的功能是： __(1)__ ..joxue.

[程序代码4.2]..joxue.
Function gcd ( ByVal x As Integer, ByVal y As Integer ) As Integer ..joxue.
Do while y <> 0..joxue.
Reminder = x mod y..joxue.
y = reminder..joxue.
Loop..joxue.
Gcd = x..joxue.
End Function..joxue.
该函数过程的功能是 __(2)__ ; gcd(16，24)的值是 __(3)__ 。..joxue.
[程序代码4.3]..joxue.
Dim location As Integer ，n As Integer，source As String，target As String..joxue.
Source = "East and west ，home is best! " : target = "st"..joxue.
Location = 1 : n = 0..joxue.
Location = InStr( location，Source，target ) + l..joxue.
Do While location > 1..joxue.
n=n+l..joxue.
Location = InStr( location，Source，target ) + l..joxue.
Loop..joxue.
Print n..joxue.
其中函数 InStr 的功能是在给定的字符串( 第 2 个参数给出 )中，从指定的序号位置..joxue.
( 第 1 个参数给出 )开始，查找目标字符串( 第 3 个参数给出)。若找到，则返回找到之..joxue.
处的序号位置;若未找到，则返回 0 。..joxue.
上述程序代码的功能是： __(4)__ ;上述程序代码运行的结果是： __(5)__ 。..joxue.

试题五..joxue.
阅读下列程序说明和 C 代码，将应填入 __(n)__ 处的字句写在答题纸的对应栏内4..joxue.
[程序 5 说明]..joxue.
本程序找出正文文件 "st.dat" 中的各个不同整数。该正文文件中各整数间以空格字符、的..joxue.
TAB 符 (制表符)、的回车符分隔。程序中用数组 b[] 存储不同的整数，变量 k 为已存入数..joxue.
组 b 中的不同整数的个数，并假定文件中的不同整数个数不超过 1000 个。..joxue.
[程序 5]..joxue.
#include ..joxue.
#define N 1000..joxue.
main( )..joxue.
{ FILE __(1)__ ;..joxue.
int b[N] ， d， i， k ;..joxue.
if ( ( fpt = __(2)__ ) == NULL) { /*以读方式打开文件*/..joxue.
printf( "Cannot open file.\nm ) ;..joxue.
return ;..joxue.
}..joxue.
k=O;..joxue.
while ( fscanf( __(3)__ ) == 1 ) { /*从文件中读一个整数*/..joxue.
b[k] = d ;..joxue.
for ( i = 0 ;b[i] != d ; i*+ ) ;..joxue.
if ( __(4)__ ) k++ ;..joxue.
(5) ;..joxue.
for ( i = 0 ; i < k ; i++) printf( "%d"，b[i] ) ;..joxue.
printf( "\n" ) ;..joxue.

试题六..joxue.
阅读以下应用说明以及用VisualBasic开发过程中进行的属性设置和所编写的程序代..joxue.
码，将应填入 __(n)__ 处的字句写在答题纸的对应栏内。..joxue.
[应用说明]..joxue.
本应用程序的运行窗口如下图所示：..joxue.

..joxue.

%20%20%20%20用户只要在文本框中输入一个自然数%20(%20例如%2016%20)，再用鼠标单击“倒计数”按钮或..joxue.
直接按%20Enter%20键，都能使文本框中的数字每隔%200.3%20秒逐次减%201%20(%20倒计数%20)。当减到%200%20..joxue.
时，倒计数停止，文本框清空，鼠标定位在文本框中，以便于反复试验上述操作过程。..joxue.
%20%20%20在开发过程中，需要设置有关的属性如下：..joxue.
[属性设置]%20..joxue.
对象%20..joxue.
%20%20%20%20%20对象名%20..joxue.
%20%20%20%20%20属性名%20..joxue.
%20%20%20%20%20属性值设置%20..joxue.
%20..joxue.
窗体%20..joxue.
%20Frm%201%20..joxue.
%20Caption%20..joxue.
%20倒计数试验%20..joxue.
%20..joxue.
标签%20..joxue.
%20Lalel%201%20..joxue.
%20Caption%20..joxue.
%20请输入自然数%20..joxue.
%20..joxue.
文本框%20..joxue.
%20Text%201%20..joxue.
%20Text%20..joxue.
%20%20%20(空白)%20..joxue.
%20..joxue.
命令按钮%20..joxue.
%20Commandl%20..joxue.
%20Caption%20..joxue.
%20倒计数%20..joxue.
%20..joxue.

%20%20%20..joxue.
%20__(1)__%20..joxue.
%20True%20..joxue.
%20..joxue.
定时器%20..joxue.
%20Timer%201%20..joxue.
%20enabled%20..joxue.
%20False%20..joxue.
%20..joxue.
%20%20..joxue.
%20%20%20..joxue.
%20interval%20..joxue.
%20__(2)__%20..joxue.
%20..joxue.

[程序代码]..joxue.
%20%20%20%20Private%20Sub%20Commandl_Click%20(%20)..joxue.
%20%20%20%20%20%20%20__(3)__%20..joxue.
%20%20%20%20End%20Sub..joxue.

%20%20%20%20Private%20Sub%20Timerl_Timer%20(%20)..joxue.
%20%20%20%20%20%20%20%20If%20Val(%20Textl.Text)%20=%200# Then..joxue.
Textl.text =" color="white" ?..joxue.
scanf( "%s"，s) ;..joxue.
len = strlen(s) ;..joxue.
for ( i = maxc = 0 ; i < len ; i++ ) { /*尝试不同的剪开方式*/..joxue.
c = count(s，0，len-1) ;..joxue.
if ( c < len ) c += count( __(n)__ );..joxue.
if ( c > maxc) { cut = i ; maxc = c; }..joxue.
/*数组s的元素循环向左移动一个位置*/..joxue.
t = s[0] ;..joxue.
for ( j = 1; j < len ; j++ ) __(4)__ ;..joxue.
__(5)__ ;..joxue.
}..joxue.
printf( "在第 %d 号珠子前面剪开，可以取走制个珠子.\n" , cut，maxc ) ;..joxue.
}..joxue.
..joxue.
试题八..joxue.
阅读以下应用说明以及用 Visual Basic 开发过程中所编写的程序代码，将应填人..joxue.
__(n)__ 处的字句写在答题纸的对应栏内。..joxue.
[应用说明]..joxue.
本应用程序的运行窗口如下图所示：..joxue.
[img]http://bjyjg./tj/netvan/images/cc01x2.jpg" border=0> ..joxue.

只要用户在字体列表框、的字号列表框中选择所需的字体、的字号，在预览框中就能看到示..joxue.
例文字按所需的字体、的字号显示。..joxue.
设字体列表框、的字号列表框的名称分别为 Listl 和 List2，示例文字为标签 Labell，..joxue.
其 BorderStyle 属性设置为 1 (有单边线)。..joxue.
字体列表框中的字体与字号列表框中的字号都需要在该窗口加载时装入。..joxue.
已知屏幕对象 Screen 的属性 Fonts 中存放着系统所具有的一系列字体名，可从 ..joxue.
Fonts(0)，Fonts(1)，Fonts(2)，...，中获得各个字体名。Screen 对象的属性 FontCount ..joxue.
存放着这些字体名的总数。..joxue.
字号列表框中，列出的字号依次是：8，9，10，11，12，以及14，16，18，...，72。..joxue.
Addltem 是在列表框中增项的方法，列表框的属性 Text 表明了该列表框当前所选中..joxue.
的数据项。标签的字体显示取决于属性 FontName 的值( 字符串 )，标签的字号显示取决..joxue.
于属性 FontSize 的值( 数值 ) 。..joxue.
[程序代码] ..joxue.
Private Sub FormLoad ( )..joxue.
Dim i As Integer..joxue.
For i = 0 To = __(1)__..joxue.
Listl. AddItem __(2)__..joxue.
Next i..joxue.
For i = 8 To 12..joxue.
List2. AddItem Trim ( Str (i) )..joxue.
Next i..joxue.
For i = __(3)__..joxue.
List2. AddItem Trim ( Str (i) )..joxue.
Next i..joxue.
End Sub..joxue.

Private Sub Listl_Click ( )..joxue.
Labell.FontName = __(4)__..joxue.
End Sub..joxue.

Private Sub List2Click ( )..joxue.
Labell.FontSize = __(5)__..joxue.
End Sub..joxue.

本文来源：https://shitiku.jxxyjl.com/jisuanjijishu/271.html