参考答案
一、选择题：
(1) C (2) B (3) C (4) D (5) A
(6) C (7) B (8) C (9) D (10) A
(11) B (12) B (13) A (14) C (15) D
(16) B (17) A (18) D (19) D (20) C
(21) A (22) C (23) A (24) D (25) C
(26) A (27) B (28) B (29) A (30) C
(31) A (32) B (33) C (34) B (35) D
(36) D (37) C (38) A (39) D (40) B
(41) D (42) C (43) D (44) C (45) B
(46) A (47) A (48) D (49) B (50) A
(51) A (52) A (53) B (54) D (55) C
(56) C (57) A (58) C (59) B (60) A
(61) D (62) C (63) C (64) C (65) A
(66) B (67) C (68) D (69) C (70) B
二、多项选择题目
（１）ＢＤ　　（２）ＡＢＣ　　　（３）ＡＢ　　（４）ＢＣＤ　（５）ＡＢＣ
（６）ＡＢＣＤ　（７）ＡＢＣＤ　（８）ＣＤ　　（９）ＡＢＣ　（１０）ＡＢＤ
三、填空题答案（每空2分，共20分，英文字母大小写均可）
(1) 【1】ROM 或只读存储器
(2) 【2】汇编程序 (英文也可，"汇编"也可)
(3) 【3】地址总线
(4) 【4】字节 或Byte
(5) 【5】Ctrl
(6) 【6】控制面板
(7) 【7】Del 或Delete（删除）
(8) 【8】视图
(9) 指令　操作数。
(10) 【10】路由器 或交换机

四、程序设计题
１、Program ex(input,output);
Var year,month,day:integer;
Begin
read(year,month);
case month of
1,3,5,7,8,10,12: day:=31;
2,4,6,9,11: day:=30;
2 : if (year mod 400=0) or (year mod 4=0) and (year mod 100<>0)
then day:=29 else day:=28;
end;
writeln(day);
End.

2、Program ex(input,output);
var I,a,b,c:integer;
Begin
for I:=100 to 999 do
begin
a:=I div 100; 　　　　{这是求I的百位数}
　　　　　　b:=(I mod 100) div 10; {求I的十位数}
　　　　　　c:=I mod 10; 　　　　{求个位数}
　　　　　　if I=a*a*a+b*b*b+c*c*c then write(I)；
　　　　　end;
end.