Kiểm tra 1 tiết học kì 1 môn Tin học 11 - Năm học 2016-2017 - Trường PTDT NT - Đăkrlấp (Có đáp án và hướng dẫn chấm)

I. PHẦN TRẮC NGHIỆM (4.0 điểm) Khoanh tròn phương án trả lời đúng nhất. 
Câu 1. Trong Pascal để thực hiện chương trình ta nhấn: 
A. F9 B. Ctrl + F9 C. Alt + F9 D. Alt + F3 
Câu 2. Trong Pascal, khai báo hằng nào sau đây sai? 
A. CONST Ten = “Lan”; B. CONST Ten = „Lan‟; 
C. CONST Max = 100; D. CONST pi = 3.1416; 
Câu 3. Trong khai báo dưới đây bộ nhớ sẽ cấp phát cho các biến tổng cộng là bao nhiêu byte? 
Var x,y,z : Integer; a,b,c: Byte; gtinh: Boolean; 
A. 12 B. 10 C. 11 D. 9 
Câu 4. Xét biểu thức sau: (x2 +2x >100). Biểu thức cho kết quả True khi x bằng: 
A. 6 B. 7 C. 10 D. Kết quả khác 
Câu 5. Kết quả của biểu thức SQR((ABS(26-30) div 2)) là: 
A. 2 B. 4 C. 8 D. 1 
Câu 6. Kiểu nào sau đây có miền giá trị lớn nhất: 
A. Integer B. Word C. Byte D. Longint 
Câu 7: Biểu thức ((27 mod 10) div 2) có kết quả là mấy? 
A. 1 B. 2 C. 3 D. 4 
Câu 8. Trong ngôn ngữ lập trình Pascal, về mặt cú pháp câu lệnh nào sau đây là sai ? 
A. x := 1 + 2; B. x:= (1<5) and (7<8); 
C. x:= 30,5; D. x := 30.5; 
II. PHẦN TỰ LUẬN (6.0 điểm)
pdf 5 trang Hữu Vượng 28/03/2023 6120
Bạn đang xem tài liệu "Kiểm tra 1 tiết học kì 1 môn Tin học 11 - Năm học 2016-2017 - Trường PTDT NT - Đăkrlấp (Có đáp án và hướng dẫn chấm)", để tải tài liệu gốc về máy hãy click vào nút Download ở trên.

File đính kèm:

  • pdfkiem_tra_1_tiet_hoc_ki_1_mon_tin_hoc_11_nam_hoc_2016_2017_tr.pdf

Nội dung text: Kiểm tra 1 tiết học kì 1 môn Tin học 11 - Năm học 2016-2017 - Trường PTDT NT - Đăkrlấp (Có đáp án và hướng dẫn chấm)

  1. ĐÁP ÁN VÀ HƯỚNG DẪN CHẤM I. Trắc nghiệm (4.0 điểm) Mã đề: 01 Câu 1 2 3 4 5 6 7 8 Đáp án B A B C C C C C Mã đề: 02 Câu 1 2 3 4 5 6 7 8 Đáp án C A D C A D A A (Mỗi đáp án đúng được 0.5 điểm) II. Tự luận Câu Hướng dẫn chấm Điểm Câu 1 If (x>=0) and (y>=0) then z:= sqrt (y) + sqrt (y) 0.5 điểm 1.0 điểm Else abs (x) – abs (y) ; 0.5 điểm a. Tìm lỗi sai PROGRAM Baitap; VAR x,T: Interger ; (Sửa: Integer) BEGIN 2.0 điểm Real(x); (Sửa: Read(x)) Câu 2 If x mod 2 ≠ 0 then T:=x*x ; (Sửa: If x mod 2 <> 0 then T:= x*x) 3.0 điểm Else T:= x*x*x (thiếu dấu ;) Write(„T=‟, T:5); (Sửa: Write(„T=‟,T:5) ; ) Readln End. b. Khi x=2 thì sau khi kết thúc chương trinh T = 8 1.0 điểm Khi x=3 thì sau khi kết thúc chương trinh T = 9 * Chương trình đề nghị Program hcn; Uses crt; 1.0 điểm Var x,y : Byte; Dt,cv: Byte; Begin Câu 3 Writeln(„nhap chieu dai, chieu rong HCN‟); 2.0 điểm Readln(x,y); Dt:=x*y; Cv:=(x+y)*2; 1.0 điểm Writeln („dien tich cua HCN la: ‟, dt); Writeln („chu vi cua HCN la: ‟, cv); Readln End.