Hãy cho biết chương trình sau thực hiện cho kết quả như thế nào

Hãy cho biết chương trình sau thực hiện cho kết quả như thế nào

A.TRẮC NGHIỆM (6 điểm)

Câu 1: Xác định kết quả sau khi thực hiện câu lệnh: A := sqr(3)/sqrt(9);

A. A được gán giá trị là 3 B. A được gán giá trị là 6

C. A được gán giá trị là 9 D. A được gán giá trị là 1

Câu 2: Biểu thức: 25 div 3+5/2*3 cho kết quả nào dưới đây:

A. 15.0 B. 9.5 C. 15.5 D. 8.0

Câu 3: Các biểu diễn của phép toán số học với số nguyên trong Pascal là:

A. + , - , * , / , div , mod B. +, - , x , :

C. +, -, * , / D. +, - , * , div , mod;

Câu 4: Kiểu dữ liệu nào sau đây chiếm 4 byte bộ 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 trong 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 trong quá trình thực hiện 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 quả là?

A. 7 B. 6 C. 10 D. 8

Câu 8: Để tính diện tích S của hình vuông có cạnh A với giá trị nguyên nằm trong phạm vi từ 5 đến 10, cách khai báo s nào dưới đây là đúng và tốn ít bộ 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;

Bạn đang xem tài liệu "Kiểm tra 1 tiết lần 1 môn Tin học 11", để tải tài liệu gốc về máy bạn click vào nút DOWNLOAD ở trên

Mã 485 Gv:ĐỖ THỊ LINH TRƯỜNG THPT PHẠM VĂN NGHỊ HUYỆN Ý YÊN –NAM ĐỊNH KIỂM TRA 1 TIẾT LẦN 1 A.TRẮC NGHIỆM (6 điểm) Câu 1: Xác định kết quả sau khi thực hiện câu lệnh: A := sqr(3)/sqrt(9); A. A được gán giá trị là 3 B. A được gán giá trị là 6 C. A được gán giá trị là 9 D. A được gán giá trị là 1 Câu 2: Biểu thức: 25 div 3+5/2*3 cho kết quả nào dưới đây: A. 15.0 B. 9.5 C. 15.5 D. 8.0 Câu 3: Các biểu diễn của phép toán số học với số nguyên trong Pascal là: A. + , - , * , / , div , mod B. +, - , x , : C. +, -, * , / D. +, - , * , div , mod; Câu 4: Kiểu dữ liệu nào sau đây chiếm 4 byte bộ 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 trong 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 trong quá trình thực hiện 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 quả là? A. 7 B. 6 C. 10 D. 8 Câu 8: Để tính diện tích S của hình vuông có cạnh A với giá trị nguyên nằm trong phạm vi từ 5 đến 10, cách khai báo s nào dưới đây là đúng và tốn ít bộ 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 trong toán học sẽ là biểu thức nào dưới đây? A. B. C. D. Câu 10: Biểu diễn trong 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 sẽ cấp phát bao nhiêu byte bộ 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 chỉ ra 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 dưới đây không phải là tên biến trong 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 của n sau đây, biểu thức có giá trị đúng? A. 1200 B. 2001 C. 21 D. 201 Câu 16: Khai báo nào đúng trong 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ị bằng bao nhiêu thì biểu thức (5 8) có giá trị True? A. X = 10 hoặc 15 B. X = 7 C. X = 12 D. X = 8 Câu 18: Chọn phát biểu sai trong các phát biểu sau : A. Phần khai báo nhất thiết phải có; B. Phần thân chương trình có thể không chứa một 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 nhất 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 đã được gán giá trị 12.41235. Để thực hiện 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 ( 4 ĐIỂM ) Câu 1B ( 1 điểm ) Sửa lỗi sai trong đ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 ( 1 điểm ) Chạy chương trình và cho biết kết quả của 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 ( 2 điểm ) Viết chương trình nhập vào vận tốc và thời gian của một người. Tính quãng đường đi của người đó rồi đưa kết quả ra màn hình? ĐÁP ÁN .. C.ĐÁP ÁN Câu 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 Đáp án A C D C B B D B C B D D D B C Câu 16 17 18 19 20 Đáp án A B A A D Câu 1B ( 1 điểm ) Sửa lỗi sai trong đ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 ( 1 điểm) Gia tri a, b, c:16_12_ 20.00 Câu 3B ( 2 đ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. TRƯỜNG THPT PHẠM VĂN NGHỊ TỔ: TOÁN-TIN ĐỀ KIỂM TRA 1 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 then ; B. If ; then ; C. If then ; else ; D. If then else ; 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 = 5 then a := d + 1 else a := d + 2; B. if a = 5 then a = d + 1 else a = d + 2; C. if a: = 5 then a := d + 1 else a := d + 2; D. if a = 5 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 khi thực hiện, t có giá trị? T := 0 ; For i := 10 to 20 do If i mod 10 = 0 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 hiện như thế nào với đoạn chương trình sau: For a:=1 to 9 do If a mod 3 = 0 then write(a,’ ‘); A. 1 2 3 4 5 6 7 8 9 B. a a a C. 3 6 9 D. 1 2 3 4 5 Câu 6: Lệnh nào sau đây in ra màn hình số lớn nhất trong hai số a, b? A. 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 quả in ra màn hình của đ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 + 3 + . . . + ‘ , 2*n -1, ‘ = ‘, sqr(n)). Seõ in ra maøn hình noäi dung gì neáu cho n = 5 A. 1 + 3 + . . . 9 = 25 B. 1 + 3 . . . + 9 = 25 C. 1 + 3 + . . . + 9 = 25 Câu 1: Cho biểu thức trong Pascal: abs(x+1) - 3. Biểu thức tương ứng trong Toán học là: A. B. C. D. Câu 9: Trong ngôn ngữ lập trình Pascal, muốn kiểm tra đồng thời cả ba giá trị của A, B, C đều lớn hơn không ta viết câu lệnh If...then... thế nào cho đúng? A. if A > 0 and B > 0 and C > 0 then.... B. if A, B, C > 0 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 để A. khai báo tên chương trình. B. khai báo hằng. C. khai báo biến. D. khai báo thư viện. Câu 11: Cho đoạn chương trình sau: If(a1) then x:=9 div a Else x:= -2013; Write(‘ x= ‘, x + 1); Khi cho a = 1 thị đoạn chương trình trên sẽ in ra màn hình giá trị x bằng 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 để khi chạy chương trình nhận được kết quả ‘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ị của M sau khi thực hiện đ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; B. M nhận cả hai giá trị trên; C. M không nhận giá trị nào; D. M = 20; Câu 14: Xác định giá trị của biểu thức: S = (250 div 100) + (150 mod 100) div 10 A. S = 9; B. S = 6; C. S = 7; D. S = 8. 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. Kết quả của chương trình trên là: A. 1 B. 102 C. 0 D. 2 Câu 16: Trong ngôn ngữ lập trình Pascal, câu lệnh ghép được sử dụng khi A. Cần một lệnh đơn thực hiện một công việc; B. Ghép nhiều câu lệnh thành một câu lệnh; C. Cả ba trường hợp trên. D. Cần nhiều câu lệnh thực hiện một 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 2 = 0). Khẳng định nào sau đây là đúng? A. Kiểm tra n có chia hết cho 2 không B. Kiểm tra xem n có là một 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à một số nguyên chẵn không 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; D. a và b đúng Câu 20: Trong NN lập trình Pascal, câu lệnh nào sau đây là khai báo hằng ? A. Const max = 50; B. Const max := 50; C. Const integer max = 50; 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 của ba số a,b,c ĐÁP ÁN Câu 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 Đáp án A B A A C C A C D B A C D C A Câu 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 Đáp án B B C B A Câu 21: Viết chương trình tìm max của 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.