Longint Câu 17: Cách đặt tên nào là đúng theo quy tắc Pascal.. Bảng chữ cái, ngữ pháp, BA[r]
(1)SỞ GD & ĐT TUYÊN QUANG TRƯỜNG THPT XUÂN HUY
KIỂM TRA HỌC KÌ I NĂM HỌC 2010-2011 MÔN : TIN HỌC - LỚP 11
Thời gian: 45 phút Họ tên:
Lớp: 11B
Hãy điền phương án vào bảng đây:
Câu hỏi 10 11 12
Phương án
Câu hỏi 13 14 15 16 17 18 19 20 21 22 23 24
Phương án
ĐỀ BÀI
PHẦN I TRẮC NGHIỆM KHÁCH QUAN (6 điểm)
Câu 1: Biến x nhận giá trị khoảng [-100, 100], khai báo khai báo sau phù hợp nhất?
A word; B Integer; C Byte; D Real;
Câu 2: x2 biểu diễn Pascal là
A sqrt(x) B exp(x) C abs(x) D sqr(x)
Câu 3: Để khai báo biến n thuộc kiểu số nguyên ta viết : A Var n : Integer; B Const n : Integer; C Var : n : Integer; D Var n = Integer;
Câu 4: Trong Pascal, từ khoá Const để:
A Khai báo biến B Khai báo tên chương trình C Khai báo thư viện D Khai báo
Câu 5: Trong Turbo Pascal, để thoát khỏi Turbo Pascal:
A Nhấn tổ hợp phím Alt + X B Nhấn tổ hợp phím Alt + F3 C Nhấn tổ hợp phím Ctrl + F3 D Nhấn tổ hợp phím Ctrl + X Câu 6: Trong câu lệnh sau câu lệnh ?
A While x>5 and x<10 Do x:=x-1; B While (x>5) and (x<10); Do x:=x-1 C While (x>5) and (x<10) Do x:=x-1; D While (x>5) and (x<10) Do x:=x-1phím Alt+F3
Câu 7: Kiểu liệu Pascal có phạm vi giá trị từ đến 255 A Kiểu Byte B Kiểu Integer C Kiểu Real D Kiểu Word Câu 8: Cho biểu thức: (10 div 2)-1 Giá trị biểu thức là:
A B C D
Câu 9: Lệnh sau in hình số lớn số A, B
A If A < B then writeln(A) else writeln(B) B If A > B then write(B) else write(A) C If A > B then Readln(A) else Readln(B) D If A > B then write(A) else write(B) Câu 10: Để nhập giá trị cho biến a; b; c ta sử dụng thủ tục:
A readln(a,b,c); B readln(a;b;c); C readln(‘a,b,c’); D realn(a,b,c);
Câu 11: X nhận giá trị từ ‘A’ đến ‘Z’, khai báo sau Pascal ? A Var x : real; B.Var x: Byte; C Var x: Integer; D Var x : char;
(2)Câu 12: Thân chương trình giới hạn cặp từ khóa
A Begin End; B Begin End C Start Finish; D Start Finish Câu 13: Để gán cho biến x, ta có câu lệnh:
A x := 2; B x = 2; C x =: 2; D x = = 2;
Câu 14: Biểu thức (x>y) and (y>3) thuộc loại biểu thức 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 Câu 15: Cho biểu thức
x y z
Trong ngơn ngữ lập trình Pascal viết : A x/z2+y B x+y/z2 C (x+y)/z2 D (x+y)/sqr(z)
Câu 16: Chỉ kiểu liệu viết sai Turbo Pascal A Integer B Byte C.World D Longint Câu 17: Cách đặt tên theo quy tắc Pascal
A 11B9 B LOP 11B9 C _LOP 11B9 D LOP_11B9 Câu 18: Cho đoạn chương trình sau
If(a<>0) then x:=9 div a Else x:=-1;
Write(‘ x= ‘, x + 1);
Khi cho a=0 thị đoạn chương trình in hình giá trị x=?
A x=1 B x không xác định C x=0; D x= -1
Câu 19: Trong kiểu liệu sau kiểu cần nhớ lớn A Integer B Real C Byte D longint
Câu 20: Các thành phần Ngơn ngữ lập trình gồm:
A Bảng chữ cái, ngữ pháp, B Bảng chữ cái, cú pháp, ngữ nghĩa C Bảng chữ cái, hằng, ngữ nghĩa D Bảng chữ cái, tên, ngữ nghĩa Câu 21: Xác định giá trị biểu thức:
S = (135 div 100) + (135 mod 100) div 10 + (135 mod 10)
A S = B S=9 C S=6 D S=10
Câu 22: Trong Pascal, đoạn thích đặt cặp dấu nào? A { } B [ ] C ( ) D /* */
Câu 23: Đoạn chương trình sau viết hình: For i:=1 to Write(i*2); A B C 10 D Câu 24: Chương trình sau trả giá trị bao nhiêu?
Var y, x, i:byte; Begin
X:=20; i:=1; y = 0; While i < x
Begin
Y:=x+i; i:=i+5; end;
Writeln(‘gia tri cua y:= ‘,y); End.
A Y = 26 B Y = 38 C Y = 46 D Y = 54
(3)PHẦN II THỰC HÀNH TRÊN MÁY TÍNH (4 điểm)
Hãy lập trình giải phương trình bậc ax + b = Với a, b số thực nhập vào từ bàn phím
PHẦN III ĐÁP ÁN VÀ BIỂU ĐIỂM
1 Phần trắc nghiệm khách quan (6 điểm: câu 0.25đ)
Câu hỏi 10 11 12
Phương án B D A D A C A C D A D B
Câu hỏi 13 14 15 16 17 18 19 20 21 22 23 24
Phương án A D D C D D B B B A C D
2 Phần thực hành máy tính (4 điểm) Program Giai_PTB1;
Var a , b : real; 0.25đ
x : real; 0.25đ
BEGIN
Write (‘ Nhap gia tri a va b : ’ ); Readln ( a , b ); 0.5đ
If a < > Then 0.5đ
Writeln( ‘ X = ’, - b / a : 10 : ) 0.5đ
Else 0.5đ
If b <> Then 0.5đ
Writeln(‘ Phuong trinh vo nghiem ’) 0.25đ
Else 0.5đ
Writeln(‘ Phuong trinh vo so nghiem ’); 0.25đ Readln
END.