SỞ GD & ĐT THANH HOÁTRƯỜNG THPT NGUYỄN XUÂN NGUYấN ĐỀ THI HỌC KỲ II K11 THPT NĂM HỌC 2010 MễN: TIN HỌC Thời gian làm bài: 45 phỳt Khụng kể thời gian giao đề I.. Đa ra màn hình: Hãy chọ
Trang 1SỞ GD & ĐT THANH HOÁ
TRƯỜNG THPT
NGUYỄN XUÂN NGUYấN
ĐỀ THI HỌC KỲ II K11 THPT NĂM HỌC 2010 MễN: TIN HỌC
Thời gian làm bài: 45 phỳt
(Khụng kể thời gian giao đề)
I Phần trắc nghiệm (3 điểm)
Cõu 1: Xỏc định giỏ trị đỳng của biểu thức sau:
length(‘ ‘)+ length(’1’) + length(’11’);
Cõu 2: Đọc chơng trình sau và cho biết kết quả in ra màn hình
Program vd;
Uses crt;
Var a, b : interger;
Procedure p( x :Integer ; y:Integer)
Begin
X: = x *x;
Y: = y*10;
End;
BEGIN
Clrscr;
a := 2;
b:= 10;
writeln(a:4,b:4);
p(a,b);
Writeln(a:4,b:4) Readln;
END
Đa ra màn hình:
Hãy chọn phơng án đúng
Cõu 3: Thủ tục nào được bắt đầu bằng từ khúa
a procedure b Function c Program d Unplementation
Cõu 4: : Cho chơng trình con sau:
Procedure HoanVi(Var x,y : interger);
Var tg : integer;
begin
tg := x; x := y ; y := tg;
end;
trong đó biến tg là biến:
a Toàn cục b cục bộ c Cả 2 phơng án trên đều đúng
Cõu 5:Hóy chỉ ra kiểu khai bỏo hợp lệ
a Var arr [10] array of integer;
b Var arr : array [1 10] of integer;
c Var arr [1 10] : integer;
d Var arr: array [1 10] of integer
Cõu 6:Hàm sau dựng để thực hiện việc gỡ?
Function F( A,B:integer):integer;
Begin
While A<>B do
If A>B then A:=A-B Else B:=B-A;
F:=A;
end;
Trang 2a Tìm UCLN của A và B
b Tìm BCNN của A và B
c Tính hiệu của A và B
d So sánh hai số A và B
II Phần tự luận (7 điểm)
Câu 1: Hãy nêu sự giống nhau và khác nhau giữa thủ tục và hàm.
Câu 2: Viết chương trình tìm giá trị lớn nhất của 3 số nhập từ bàn phím.
Chương trình có sử dụng chương trình con