填空(每空 1.5 分,共 15 分) 读程序填空( 共 填空
1. 下列程序运行后 C 的值 Var A:string; B,C:integer; Begin A:=’I’’m a student’; B:=12; C:=A+’A+B’; End; 2. 下面程序中循环执行次数为 I:=1; Repeat
。
。
5
n:=I*I; I:=I+1; Until n>I 3. 设有自定义过程声明如下: Procedure p(x:integer;var y:integer); Begin X:=x-y; Y:=y+z; End; 执行下列程序段后 a,b 的值分别为 , 。 A:=10;b:=4; P(a,b); P(a mod b,a); 4. 下列程序是小学生做加减法的算术练习程序,
计算机连续随机地给出两位数的加 减法算术题,显示在 edit1 中,学生回答输入在 edit2 中,对的打“√”,错的打“×”,将 所有做过的题目存放在
列表框中被查,并随时给出答题正确率, 显示在 label 中, 程序运行界面如下图 1,请回答下列
问题。 Edit1.tag,form1.tag,listbox1.tag的作用分别是 , , 。 变量 p 的作用是 。 在Edit2KeyPress事件过程中语句Form1.FormActivate(sender) 的作用 是 。 说明变量 a,b 的数量关系 。 unit Unit1; ...