Trường THPT Nam Kỳ Khởi Nghĩa Học và tên HS: .................................................. Lớp 11
ĐỀ KIỂM TRA HK1 TIN HỌC 11
Năm học 2010 – 2011
A. Trắc nghiệm (6đ) (Khoanh tròn vào câu trả lời đúng)
1. Khi thực hiện câu lệnh while …do , sẽ thoát khỏi vòng lặp khi:
a. Điều kiện sai b. Câu lệnh sai c. Câu lệnh đúng d. Điều kiện đúng
2. Trong NNLT Pascal, chương trình sau có kết quả gì?
If (5 mod 2=0) then write (‘Sai’)
Else write (‘Dung’);
a. Sai b. Dung c. ‘Sai’ d. ‘Dung’
3. Kiểu Byte có phạm vi giá trị từ:
a. 0 đến 2
16
-1 b. -2
15
đến 2
15
-1 c. -2
31
đến 2
31
-1. d. 0 đến 255
4. Hàm mod dùng để:
a. Tính căn bậc 2 b. Làm tròn 1 số c. Chia lấy phần dư d. Chia lấy phần nguyên
5. Để lưu giữ 1 biến kiểu Byte máy tính cần dành bộ nhớ ra:
a. 1 byte b. 2 byte c. 4 byte d. 8 byte
6. Kết quả của biểu thức ABS(25-50) div 5 là?
a. 3 b. 5 c. 2 d. 4
7. Để lưu chương trình ta sẽ nhấn những phím nào
a. Ctrl + F9 b. F7 c. F2 d. F9
8. Cho biết kết quả của chương trình sau?

19. Biểu thức (x>y) and (y>3) thuộc loại biểu thức nào trong Pascal?
a. Biểu thức toán học b. Biểu thức quan hệ c. Biểu thức số học d. Biểu thức logic
20. Cho dãy các câu lệnh gán z:=3; y:=sqr(z)-3*z+abs(z); Sau khi thực hiện dãy các câu lệnh trên thì y có giá trị là bao
nhiêu?
a. 1 b. 2 c. 3 d. 4
21. Câu lệnh Write(Cho biet gia tri Cuoi:); có kết quả là
a. Cho biet gia tri Cuoi b.Lỗi cú pháp c. Cho biet ket qua Cuoi: d. (Cho biet gia tri cuoi:)
22. Chỉ ra kiểu dữ liệu viết sai trong Turbo Pascal
a. Interger b. Byte c. Word d. Longint
23. Để thoát ra khỏi chương trình Pascal ta nhấn:
a. Alt+F3 b. Alt+F9 c. Ctrl+F9 d. Alt+X
24. Hàm nào tương ứng với phép tính giá trị tuyệt đối trong Pascal
a. sqr b. sqrt c. abs d. mod
B. Tự luận (4đ)
Câu 1(1đ )Viết lại các biểu thức dạng toán học sau sang dạng biểu diễn tương ứng trong pascal :
a)
xy
xy
−
−
2

xxxb 432)
++
Câu 2(1đ )Viết lại các biểu thức trong pascal sang dạng toán học tương ứng:
a) sqrt(sin(x*x+3*x+5)+ abs(y*y-2*y-3)) b) (1/5)*sqrt(sqr(x)+sqr(y));
Câu 3:(1,25đ) Viết chương trình tính S=1+2+3+4+5+6+7+8+9+10
Câu 4: (1 đ) Dùng câu lệnh If để giải phương trình a*x+b=0
Bài làm
.................................................................................................................................................................

a/ b/
Câu 3:
Program tinhtong;
Uses crt;
Var i, S: integer; (0, 25đ)
BEGIN
Clrscrt;
S:=0; (0, 25đ)
For i:=1 to 10 do S:=S+i; (0, 25đ)
Write (‘ Tong da cho la:’, S:8:4); (0, 25đ)
Readln;
END.
Viết đúng cấu trúc chương trình (0, 25đ)
Câu 4:
If a=0 then
If b=0 then write (‘phuong trinh vo so nghiem’) (0, 25đ)
Else write (‘phuong trinh vo nghiem’) (0, 25đ)
Else write(‘phuong trinh co nghiem la:’, -b/a:8:4); (0, 25đ)