Byte, Integer, Word, Longint Câu 14: Trường hợp nào dưới đây không phải là tên biến trong Pascal?. Với giá trị nào của n sau đây, biểu thức có giá trị đúngA[r]
(1)Mã 485 Gv:ĐỖ THỊ LINH TRƯỜNG THPT PHẠM VĂN NGHỊ HUYỆN Ý YÊN –NAM ĐỊNH KIỂM TRA TIẾT LẦN A.TRẮC NGHIỆM (6 điểm) Câu 1: Xác định kết sau thực câu lệnh: A := sqr(3)/sqrt(9); A A gán giá trị là B A gán giá trị là C A gán giá trị là D A gán giá trị là Câu 2: Biểu thức: 25 div 3+5/2*3 cho kết nào đây: A 15.0 B 9.5 C 15.5 D 8.0 Câu 3: Các biểu diễn phép toán số học với số nguyên Pascal là: A + , - , * , / , div , mod B +, - , x , : C +, -, * , / D +, - , * , div , mod; Câu 4: Kiểu liệu nào sau đây chiếm byte nhớ? A Word B Integer C Longint D Real Câu 5: Biểu thức (x > y) and (y >= 3) thuộc loại biểu thức nào Pascal? A Biểu thức quan hệ B Biểu thức logic C Biểu thức toán học D Biểu thức số học Câu 6: Đại lượng có giá trị không đổi quá trình thực chương trình là: A Biến B Hằng C Từ khóa D Tên chuẩn Câu 7: Trong Pascal, biểu thức (20 div 3+18 mod 4) cho kết là? A B C 10 D Câu 8: Để tính diện tích S hình vuông có cạnh A với giá trị nguyên nằm phạm vi từ đến 10, cách khai báo s nào đây là đúng và tốn ít nhớ nhất? A Var a : byte; s : integer; B Var a,s : byte; C Var a : byte; s : real; D Var a,s : integer; Câu 9: Biểu thức: sqrt(x+y)/x-sqr(x-y)/y viết toán học là biểu thức nào đây? A x y x y y x B ( x y) x x y y C x y ( x y) x y D x y x y x y Câu 10: Biểu diễn Pascal nào sau đây tương ứng với biểu diễn toán học A (x/y+2+sqrt(x+y)*(x/y+2+sqrt(x+y) B Sqr(x/(y+2)+sqrt(x+y)) C (x/(y+2)+sqrt(x+y)*(x/y+2+sqrt(x+y) D Sqr(x/y+2+sqrt(x+y)) Câu 11: Chương trình Pascal cấp phát bao nhiêu byte nhớ cho các khai báo biến sau: Var x, y : real; a : byte; b, c : integer; t : boolean; z : word; A 21 B 19 C 23 D 20 Câu 12: Cho khai báo biến sau, hãy câu lệnh gán sai? Var m, n:integer; x,y: real; A x:=6; B m:=-4; C y:=10.5; D n:=3.5; Câu 13: Kiểu số nguyên gồm: A Byte, Integer, Word, Longint, Real B Byte, Integer, Word, Real C Real, Integer, Word, Longint D Byte, Integer, Word, Longint Câu 14: Trường hợp nào đây không phải là tên biến Pascal? A Giai_Ptrinh_Bac_2; B Noi sinh; C Vidu_2; D Ngaysinh; Câu 15: Xét biểu thức logic: (n mod 100 > 10) and (n div 100 < 10) Với giá trị nào n sau đây, biểu thức có giá trị đúng? A 1200 B 2001 C 21 D 201 Lop11.com (2) Câu 16: Khai báo nào đúng các khai báo sau: A Var a, b, c : Real; B Var a, b, c : Interger; C Var a b c : Real; D Var a; b; c : Real; Câu 17: Với X có giá trị bao nhiêu thì biểu thức (5 <= X) and (X <= 11) and (X <> 8) có giá trị True? A X = 10 15 B X = C X = 12 D X = Câu 18: Chọn phát biểu sai các phát biểu sau : A Phần khai báo thiết phải có; B Phần thân chương trình có thể không chứa lệnh nào; C Nói chung, chương trình thường gồm hai phần : phần khai báo và phần thân; D Phần thân chương trình thiết phải có; Câu 19: Cho x và y là các biến đã khai báo kiểu thực, câu lệnh nào sau đây là đúng ? A Readln(x,y); B Readln(x:5:2); C Readln(x,5); D Readln( ‘ x= ’ ) Câu 20: Cho x là biến thực đã gán giá trị 12.41235 Để thực lên màn hình nội dung “x=12.41” cần chọn câu lệnh nào sau đây ? A Writeln(x); B Writeln(x:5); C Writeln(x:5:2); D Writeln(‘x=’ ,x:5:2); B TỰ LUẬN ( ĐIỂM ) Câu 1B ( điểm ) Sửa lỗi sai đoạn chương trình sau: (1) Program Cau1; (2) Var a, b = interger; (3) Begin (4) a:=3.0 (5) b:=5; (6) writeln (‘a=’,a,’ b= ‘,b:6:2); (7) End Câu 2B ( điểm ) Chạy chương trình và cho biết kết các biến a, b, c: Var a, b: byte; c: real; BEGIN {1} a := 4; b := 12, c := 5; {2} a := a + b; {3} c := a/2 + b; {4} Writeln (‘Gia tri a, b, c:’, a, ‘_’, b, ‘_’, c:6:2); END Câu 3B ( điểm ) Viết chương trình nhập vào vận tốc và thời gian người Tính quãng đường người đó đưa kết màn hình? ĐÁP ÁN ……………………………………………………………………………………………………………… ……………………………………………………………………………………………………………… ……………………………………………………………………………………………………………… ……………………………………………………………………………………………………………… ……………………………………………………………………………………………………………… ……………………………………………………………………………………………………………… ……………………………………………………………………………………………………………… ……………………………………………………………………………………………………………… ……………………………………………………………………………………………………………… ……………………………………………………………………………………………………………… ……………………………………………………………………………………………………………… ………………………………………………………………………………………………………… Lop11.com (3) C.ĐÁP ÁN Câu Đáp án A C D C B B D B Câu 16 17 18 19 20 Đáp án A B A A D Câu 1B ( điểm ) Sửa lỗi sai đoạn chương trình sau: (1) Program Cau1; ……………………………………………………… (2) Var a, b : integer; ……………………………………………………… (3) Begin ……………………………………………………… (4) a:=3.0 ; ……………………………………………………… (5) b:=5; ……………………………………………………… (6) writeln (‘a=’,a,’ b= ‘,b); ……………………………………………………… (7) Readln ……………………………………………………… (8) End Câu 2B ( điểm) Gia tri a, b, c:16_12_ 20.00 Câu 3B ( điểm ) Program cau3; Var v,t,s:real; Begin Write(‘ nhap v,t =’); Readln(v,t); S:=v*t; Write(‘ quang duong =’,s:10:2); Readln; End Lop11.com C 10 B 11 D 12 D 13 D 14 B 15 C (4) TRƯỜNG THPT PHẠM VĂN NGHỊ TỔ: TOÁN-TIN ĐỀ KIỂM TRA TIẾT Môn: Tin học 11 Thời gian làm bài: 45 phút Họ và tên:……………………………… Lớp:………………Đề: 1…………… Điểm:……… Phần I: Trắc nghiệm khách quan (8đ) : Câu 1: Cú pháp biểu diễn cấu trúc rẽ nhánh dạng thiếu là: A If <điều kiện> then <câu lệnh>; B If <điều kiện> ; then <câu lệnh>; C If <điều kiện> then <câu lệnh1>; else <câu lệnh2>; D If <điều kiện> then <câu lệnh1> else <câu lệnh2>; Câu 2: Để khai báo biến A là kiểu logic, ta chọn cách khai báo: A var A : char; B var : A boolean; C var : A char; D var A : boolean; Câu 3: Câu lệnh nào sau đây là đúng? A if a = then a := d + else a := d + 2; B if a = then a = d + else a = d + 2; C if a: = then a := d + else a := d + 2; D if a = then a := d + 1; else a := d + 2; Câu 4: Cho đoạn chương trình sau, hãy cho biết sau thực hiện, t có giá trị? T := ; For i := 10 to 20 If i mod 10 = then t := t + i ; Writeln(t) ; A 30 B 12 C 11 D 45 Câu 5: Cho biết màn hình xuất nào với đoạn chương trình sau: For a:=1 to If a mod = then write(a,’ ‘); A B a a a C D Câu 6: Lệnh nào sau đây in màn hình số lớn hai số a, b? A If a <= b then write(a) else write (b); B If a > b then write(b) else write (a); C If a > b then write(a) else write (b); D If a > b then write(a); else write(b); Câu 7: Trong ngôn ngữ lập trình Pascal, cho biết kết in màn hình đoạn chương trình sau: Var a,b :byte ; Begin a :=5 ; b :=3; a :=b ; b :=a ; writeln(b,a) ; End A 33 B 35 C 53 D 55 Câu 8: Caâu leänh: write(‘1 + + + ‘ , 2*n -1, ‘ = ‘, sqr(n)) Seõ in maøn hình noäi dung gì neáu cho n = A + + = 25 B + + = 25 C + + + = 25 Câu 1: Cho biểu thức Pascal: abs(x+1) - Biểu thức tương ứng Toán học là: A x B x C x D x Câu 9: Trong ngôn ngữ lập trình Pascal, muốn kiểm tra đồng thời ba giá trị A, B, C lớn không ta viết câu lệnh If then nào cho đúng? A if A > and B > and C > then B if A, B, C > then C if (A > 0) or (B > 0) or (C > 0) then D if (A > 0) and (B > 0) and (C > 0) then Câu 10: Trong ngôn ngữ lập trình Pascal, từ khoá CONST dùng để Lop11.com (5) A khai báo tên chương trình C khai báo biến B khai báo D khai báo thư viện Câu 11: Cho đoạn chương trình sau: If(a<>1) then x:=9 div a Else x:= -2013; Write(‘ x= ‘, x + 1); Khi cho a = thị đoạn chương trình trên in màn hình giá trị x bao nhiêu? A x = -2012 B x = -2013; C x = 9; D x = 10; Câu 12: Xét chương trình sau? Var a, b: integer; Begin a:=102; write(‘b=’); readln(b); if a<b then write(‘Xin chao cac ban!’); end Nhập giá trị cho b bao nhiêu để chạy chương trình nhận kết ‘Xin chao cac ban!’? A 99 B 101 C 103 D 100 Câu 13: Trong ngôn ngữ lập trình Pascal, hãy cho biết giá trị M sau thực đoạn chương trình sau với a=9 và b=20? M := a; If a < b then M := b; A M = 9; C M không nhận giá trị nào; Câu 14: Xác định giá trị biểu thức: A S = 9; B S = 6; Câu 15: Xét chương trình sau: Var a, b: integer; Begin a:=575; b:=678; if a<b then write(1); if a=b then write(0); if a>b then write(2); end A B M nhận hai giá trị trên; D M = 20; S = (250 div 100) + (150 mod 100) div 10 C S = 7; D S = Kết chương trình trên là: B 102 C D Câu 16: Trong ngôn ngữ lập trình Pascal, câu lệnh ghép sử dụng A Cần lệnh đơn thực công việc; B Ghép nhiều câu lệnh thành câu lệnh; C Cả ba trường hợp trên D Cần nhiều câu lệnh thực công việc; Câu 17 :Trong NN lập trình Pascal, đoạn chương trình sau dùng để làm gì? Var x, y, t: integer; Begin x: = t; t:= y; y:= x; End A Hoán đổi giá trị y và t B Hoán đổi giá trị x và y C Hoán đổi giá trị x và t D Một công việc khác Câu 18 : Xét biểu thức lôgic: (n >0) and (n mod = 0) Khẳng định nào sau đây là đúng? A Kiểm tra n có chia hết cho không B Kiểm tra xem n có là số dương không C Kiểm tra xem n có là số dương chẵn không D Kiểm tra n là số nguyên chẵn không Lop11.com (6) Câu 19: Biến X nhận giá trị là 0.7 Khai báo nào sau đây là đúng A var X: integer; B var X: real; C var X: char; Câu 20: Trong NN lập trình Pascal, câu lệnh nào sau đây là khai báo ? A Const max = 50; B Const max := 50; C Const integer max = 50; D a và b đúng D Const max 50; Phần II: Phần tự luận(2đ) Câu 21: Viết chương trình tìm max ba số a,b,c ĐÁP ÁN Câu Đáp án Câu Đáp án A 16 B B 17 B A 18 C A 19 B C 20 A C 21 A 22 C 23 Câu 21: Viết chương trình tìm max ba số a,b,c Program Tim-max; Uses crt; Var a, b, c,max : real; Begin Clrscr; Write(‘nhap a, b, c: ‘); Readln(a, b, c); Max:=a; if (max<b) then if (b<c) then max:=c else max:=b; writeln('gia tri lon nhat la :’,max); readln End Lop11.com D 24 10 B 25 11 A 26 12 C 27 13 D 28 14 C 29 15 A 30 (7)