1. Trang chủ
  2. » Tất cả

Bo 4 de thi tin hoc lop 11 hoc ki 1 co dap an

40 0 0

Đang tải... (xem toàn văn)

Tài liệu hạn chế xem trước, để xem đầy đủ mời bạn chọn Tải xuống

THÔNG TIN TÀI LIỆU

Thông tin cơ bản

Định dạng
Số trang 40
Dung lượng 513,53 KB

Nội dung

Phòng Giáo dục và Đào tạo Đề thi Học kì 1 Môn Tin Học lớp 11 Thời gian làm bài 45 phút (Đề 1) Phần I Trắc nghiệm Câu 1 Chương trình dịch Pascal sẽ cấp phát bao nhiêu byte bộ nhớ cho các biến trong kha[.]

Trang 1

Phòng Giáo dục và Đào tạo Đề thi Học kì 1

Mơn: Tin Học lớp 11

Thời gian làm bài: 45 phút

(Đề 1)

Phần I Trắc nghiệm

Câu 1: Chương trình dịch Pascal sẽ cấp phát bao nhiêu byte bộ nhớ cho các biến trong khai báo sau:

Var M, N, I: INTEGER; P, A, B: REAL; X: EXTENDED; K: WORD; A 44; B 36; C 38; D 42

Câu 2: Biết rằng a, b, c là độ dài ba cạnh của một tam giác, biểu thức quan hệ nào sau đây cho kết quả true?

A c + a > b; B a - b > c; C c – b ≥ a; D c - a > b

Câu 3: Xét biểu thức logic: (m mod 100 < 10) and (m div 100 > 0) Với giá trị nào của m dưới đây biểu thức trên cho giá trị false?

Trang 2

B 2009 C 166509 D 99

Câu 4: Biểu thức Pascal: (a+cos(x))/sqrt(sqr(a)+sqr(x)+1) khi chuyển sang tốn học có dạng:

Câu 5: Cho đoạn chương trình sau: x:= 10; y:= 30; writeln(‘x+y’); kết quả màn hình sẽ là gì?

A 20 B x+y C 10 D 30

Câu 6: Biến X có thể nhận giá trị: 0.5; 1.5; 2.5; 3.5; 4.5 và biến Y có thể nhận các giá trị 0; 1; 3; 5; 7; 9 Khai báo biến nào sau đây là đúng?

A Var X: Byte; Y: Real; B Var X: Real; Y: Byte; C Var X, Y: Integer; D Var X, Y: Byte;

Câu 7: Biểu thức ((35 mod 9) div 5) có kết quả là mấy? A 1

Trang 3

C 4 D 2

Câu 8: Cho đoạn chương trình: Kq:=1;

For i:=1 to 5 do Kq:=Kq*i;

Kết quả sau khi chạy là : A 0

B 120 C 60 D 20

Câu 9: Cho biết kết quả của đoạn chương trình sau? N:=5; Tong:=0;

For i:=1 to n do

If (i mod 2=0) then Tong:=Tong + i; Write(Tong);

A 3 B 1 C 6 D 2

Câu 10: Trong ngơn ngữ lập trình Pascal, cho đoạn chương trình: i:=1;

Trang 4

if I mod 3 = 0 then Write(‘TIN HOC’); i:=i+1;

End;

Chữ TIN HOC được in ra màn hình mấy lần

A 3 B 2 C 1 D 0

Câu 11: Trong pascal, biểu diễn sqr(x) có nghĩa là: A Bình phương của x

B Căn bậc hai của x C Giá trị tuyệt đối của x D Luỹ thừa cơ số e của x

Câu 12: Cho biết kết quả của biểu thức (2*((45 mod 3) +12)) div 5 là bao nhiêu?

A 2 B 4 C 6 D 8

Câu 13: 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?

Trang 5

Câu 14: Biểu thức nào không phải là biểu thức trong Pascal? A (a+x)*(b+y)/2

B ( m div 5 >=2 ) hoặc ( m <=2) C a*sqr(x) + b*x + c = 0

D Not (a >10)

Câu 15: Phép toán nào đúng khi số nguyên A là số lẻ: A A mod 2 = 0

B A div 2 = 1 C A div 2 = 0 D A mod 2 = 1

Câu 16: Biểu thức 3 div 7 có giá trị là: A 2

B 1 C 0 D 7

Câu 17: Để nhập giá trị cho 2 biến a và b ta dùng lệnh: A Write(a,b);

B Real(a.b); C Read(‘a,b’); D Readln(a,b);

Câu 18: Để đưa ra màn hình giá trị của biến a kiểu nguyên và biến b kiểu thực ta dùng lệnh:

A Write(a:8:3, b:8); B Readln(a,b);

Trang 6

D Writeln(a:8:3, b:8:3);

Câu 19: Để biên dịch chương trình, trong Pascal ta nhấn tổ hợp phím: A Ctrl + F9

B Alt + F9 C Alt + F8 D Shift + F9

Câu 20: Cho biết kết quả sau khi thực hiện lệnh: Begin a := 100; b := 30; x := a div b; Write(x); End A 10 B 33 C 3 D 1 Phần II Tự luận

Bài 1 (1.5 điểm) Cho giá trị a=31, b=16, c=8, d=5 Hãy xác định giá trị của biểu thức D:

D:= sqr(d) + b > c*d + a (Tính cụ thể từng bước)

Bài 2 (1 điểm) Viết câu lệnh rẽ nhánh tính:

Bài 3 (2.5 điểm) Viết chương trình:

Trang 7

- Đếm và tính tổng các số chẵn và là bội của 3 Thông báo kết quả ra màn hình

Đáp án & Thang điểmPhần I Trắc nghiệmPhần II Tự luậnBài 1 sqr(d) + b = 25 + 16 = 41 c*d + a = 40 + 31 = 71 41 >= 71 → D := FALSE Bài 2 Cách 1: if (x >= 0) and (y >= 0)

then A:= sqr(x) + sqr(y) + 1 else A:= sqrt(x*y);

Cách 2:

if ( x < 0) and (y < 0)

then A:= sqrt(x*y) else A:= sqr(x) + sqr(y) + 1;

Trang 8

Program bt_3;

Uses crt;

Var a: array[1 100] of integer; Dem, Tong, n, i: integer;

Begin

Clrscr;

Writeln(‘nhap so phan tu, n=’); Readln (n);

for i := 1 to n do begin

writeln(‘nhap gia trij phan tu thu ’,i,’ =’); readln(a[i]);

end; Dem:=0; Tong:=0;

For i:=1 to n do

Trang 9

End

………………………………………………………

Phòng Giáo dục và Đào tạo Đề thi Học kì 1

Mơn: Tin Học lớp 11

Thời gian làm bài: 45 phút

(Đề 2)

Phần I Trắc nghiệm

Câu 1: Chương trình dịch Pascal sẽ cấp phát bao nhiêu byte bộ nhớ cho các biến trong khai báo sau:

Var M, N, I, J: INTEGER; P, A, B, C: REAL; X: EXTENDED; K: WORD; A 44 B 36 C 38 D 42

Câu 2: Biết rằng a, b, c là độ dài ba cạnh của một tam giác, biểu thức quan hệ nào sau đây cho kết quả true?

A b + c > a B c - a > b C b – a ≥ c D b - c > a

Trang 10

A 65 B 208 C 99 D 113

Câu 4: Câu lệnh y:= (((x - 2)*x - 3)*x - 4)*x - 5; tính giá trị của biểu thức nào? A y = x - 2x - 3x - 4x - 5

B y = (x - 2)(x - 3)(x - 4) - 5 C y = x4 - 2x3 - 3x2 - 4x - 5 D y = x - 2x2 - 3x3 - 4x4 – 5

Câu 5: Với lệnh nào sau đây dùng để in giá trị M là kiểu số thực ra màn hình với độ rộng là 5 và có 2 chữ số phần thập phân?

A Writeln(M:2); B Write(M:5); C Writeln(M:2:5); D Write(M:5:2);

Câu 6: Trong 1 chương trình, biến M có thể nhận các giá trị: 10, 15, 20, 30, 40 và biến N có thể nhận các giá trị: 1.0, 1.5, 2.0, 2.5, 3.0 Khai báo nào trong các khai báo sau là đúng?

A Var M,N :Byte;

B Var M: Real; N: Word; C Var M: Word; N: Real; D Var M, N: Longint;

Câu 7: Biểu thức ((35 mod 9) div 2) có kết quả là mấy? A 1

Trang 11

C 4 D 2

Câu 8: Trong NN lập trình Pascal, biểu thức số học nào sau đây là không hợp lệ:

A 5*a + 7*b + 8*c B 3*a -2*b +8*c C x*y*(x +y) D {a + b}*c

Câu 9: Cho biết kết quả của đoạn chương trình sau? N:=5; Tong:=0;

For i:=1 to n do

If (i mod 3=0) then Tong:=Tong + 1; Write(Tong);

A 3 B 1 C 6 D 2

Câu 10: Trong ngơn ngữ lập trình Pascal, cho đoạn chương trình: i:=1;

While i < 5 do Begin

if I mod 2 = 1 then Write(‘TIN HOC’); i:=i+1;

End;

Trang 12

A 3 B 2 C 1 D 0

Câu 11: Trong pascal, biểu diễn exp(x) có nghĩa là: A Bình phương của x

B Căn bậc hai của x C Giá trị tuyệt đối của x D Luỹ thừa cơ số e của x

Câu 12: Cho biết kết quả của biểu thức (2*(45 div 3) +12) mod 5 là bao nhiêu? A 2

B 4 C 6

Câu 13: Xét biểu thức logic: (n mod 100 > 10) or (n div 100 < 10)

Với giá trị nào của n sau đây, biểu thức có giá trị sai?

A 1013 B 1012 C 1011 D 1010

Câu 14: Biểu thức nào không phải là biểu thức trong Pascal? A (a+x)*(b+y)/2

Trang 13

Câu 15: Phép toán nào đúng khi số nguyên A chia hết cho 5: A 5 mod A = 0

B A mod 5 = 0 C 5 mod A = 1 D A mod 5 = 1

Câu 16: Biểu thức 7 mod 3 có giá trị là: A 2

B 3 C 0 D 1

Câu 17: Để nhập giá trị cho 3 biến a, b và c ta dùng lệnh: A Write(a, b, c);

B Real(a.b.c); C Readln(a, b, c);

D Read(‘a, b, c’);

Câu 18: Để đưa ra màn hình giá trị của biến a và biến b kiểu nguyên ta dùng lệnh:

A Write(a:8, b:8); B Readln(a,b);

C Writeln(a:8, b:8:3); D Writeln(a:8:3, b:8:3);

Câu 19: Để thoát khỏi phần mềm, trong Pascal ta nhấn tổ hợp phím: A Ctrl + F9

Trang 14

D Alt + X

Câu 20: Cho biết kết quả sau khi thực hiện lệnh: Begin a := 100; b := 15; x := a mod b ; Write(x); End A 10 B 33 C 3 D 6 Phần II Tự luận

Bài 1 (1.5 điểm) Cho giá trị a=25, b=10, c=6, k=3 Hãy xác định giá trị của biểu thức A:

A := Sqrt(a) + b div k >= a mod b + c (Tính cụ thể từng bước)

Bài 2 (1 điểm) Viết câu lệnh rẽ nhánh tính:

Bài 3 (2.5 điểm) Viết chương trình:

- Nhập mảng một chiều các số nguyên (không quá 100 phần tử)

- Đếm và tính tổng các số chẵn và là bội của 5 Thơng báo kết quả ra màn hình

Trang 15

Phần II Tự luậnBài 1Sqrt(a) + b div k = 5 + 3 = 8 a mod b + c = 5 + 6 = 11 8 >= 11 → A := FALSE Bài 2 Cách 1: if (x >= 1) or (x <= 0) then D:= -2*x + 1 else D:= sqr(x) + 2*x + 1; Cách 2: if (0 < x) and (x < 1) then D:= sqr(x) + 2*x +1 else D:= -2*x + 1; Bài 3 Program bt_3; Uses crt;

Trang 16

Begin

Clrscr;

Writeln(‘nhap so phan tu, n=’); Readln (n);

for i := 1 to n do begin

writeln(‘nhap gia trij phan tu thu ’,i,’ =’); readln(a[i]);

end; Dem:=0; Tong:=0;

For i:=1 to n do

If (a[i] mod 2 = 0) and (a[i] mod 5 = 0) then begin Dem:= Dem+1; Tong:= Tong+a[i]; end; writeln(‘Dem la:’,Dem); Writeln(‘Tong la:’,Tong); Readln End

Phòng Giáo dục và Đào tạo Đề khảo sát chất lượng Học kì 1

Trang 17

Môn: Tin học 11 Thời gian làm bài: 45 phút

Phần I Trắc nghiệm

Câu 1: Chương trình dịch Pascal sẽ cấp phát bao nhiêu byte bộ nhớ cho các biến trong khai báo sau:

Var M, N, I: INTEGER; P, A, B: REAL; X: EXTENDED; K: WORD; A 44; B 36; C 38; D 42

Câu 2: Biết rằng a, b, c là độ dài ba cạnh của một tam giác, biểu thức quan hệ nào sau đây cho kết quả true?

A c + a > b; B a - b > c; C c – b ≥ a; D c - a > b

Câu 3: Xét biểu thức logic: (m mod 100 < 10) and (m div 100 > 0) Với giá trị nào của m dưới đây biểu thức trên cho giá trị false?

Trang 18

Câu 4: Biểu thức Pascal: (a+cos(x))/sqrt(sqr(a)+sqr(x)+1) khi chuyển sang tốn học có dạng:

Câu 5: Cho đoạn chương trình sau: x:= 10; y:= 30; writeln(‘x+y’); kết quả màn hình sẽ là gì?

A 20 B x+y C 10 D 30

Câu 6: Biến X có thể nhận giá trị: 0.5; 1.5; 2.5; 3.5; 4.5 và biến Y có thể nhận các giá trị 0; 1; 3; 5; 7; 9 Khai báo biến nào sau đây là đúng?

A Var X: Byte; Y: Real; B Var X: Real; Y: Byte; C Var X, Y: Integer; D Var X, Y: Byte;

Câu 7: Biểu thức ((35 mod 9) div 5) có kết quả là mấy? A 1

B 3 C 4 D 2

Trang 19

Kq:=1;

For i:=1 to 5 do Kq:=Kq*i;

Kết quả sau khi chạy là : A 0

B 120 C 60 D 20

Câu 9: Cho biết kết quả của đoạn chương trình sau? N:=5; Tong:=0;

For i:=1 to n do

If (i mod 2=0) then Tong:=Tong + i; Write(Tong);

A 3 B 1 C 6 D 2

Câu 10: Trong ngơn ngữ lập trình Pascal, cho đoạn chương trình: i:=1;

While i <5 do Begin

if I mod 3 = 0 then Write(‘TIN HOC’); i:=i+1;

Trang 20

Chữ TIN HOC được in ra màn hình mấy lần

A 3 B 2 C 1 D 0

Câu 11: Trong pascal, biểu diễn sqr(x) có nghĩa là: A Bình phương của x

B Căn bậc hai của x C Giá trị tuyệt đối của x D Luỹ thừa cơ số e của x

Câu 12: Cho biết kết quả của biểu thức (2*((45 mod 3) +12)) div 5 là bao nhiêu?

A 2 B 4 C 6 D 8

Câu 13: 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 121 B 2001 C 201 D 1200

Câu 14: Biểu thức nào không phải là biểu thức trong Pascal? A (a+x)*(b+y)/2

Trang 21

C a*sqr(x) + b*x + c = 0 D Not (a >10)

Câu 15: Phép toán nào đúng khi số nguyên A là số lẻ: A A mod 2 = 0

B A div 2 = 1 C A div 2 = 0 D A mod 2 = 1

Câu 16: Biểu thức 3 div 7 có giá trị là: A 2

B 1 C 0 D 7

Câu 17: Để nhập giá trị cho 2 biến a và b ta dùng lệnh: A Write(a,b);

B Real(a.b); C Read(‘a,b’); D Readln(a,b);

Câu 18: Để đưa ra màn hình giá trị của biến a kiểu nguyên và biến b kiểu thực ta dùng lệnh:

A Write(a:8:3, b:8); B Readln(a,b);

C Writeln(a:8, b:8:3); D Writeln(a:8:3, b:8:3);

Trang 22

B Alt + F9 C Alt + F8 D Shift + F9

Câu 20: Cho biết kết quả sau khi thực hiện lệnh: Begin a := 100; b := 30; x := a div b; Write(x); End A 10 B 33 C 3 D 1 Phần II Tự luận

Bài 1 (1.5 điểm) Cho giá trị a=31, b=16, c=8, d=5 Hãy xác định giá trị của biểu thức D:

D:= sqr(d) + b > c*d + a (Tính cụ thể từng bước)

Bài 2 (1 điểm) Viết câu lệnh rẽ nhánh tính:

Bài 3 (2.5 điểm) Viết chương trình:

- Nhập mảng một chiều các số ngun (khơng q 100 phần tử)

- Đếm và tính tổng các số chẵn và là bội của 3 Thông báo kết quả ra màn hình

Trang 23

Phần II Tự luậnBài 1 sqr(d) + b = 25 + 16 = 41 c*d + a = 40 + 31 = 71 41 >= 71 → D := FALSE Bài 2 Cách 1: if (x >= 0) and (y >= 0)

then A:= sqr(x) + sqr(y) + 1 else A:= sqrt(x*y);

Cách 2:

if ( x < 0) and (y < 0)

then A:= sqrt(x*y) else A:= sqr(x) + sqr(y) + 1;

Bài 3

Program bt_3;

Uses crt;

Trang 24

Begin

Clrscr;

Writeln(‘nhap so phan tu, n=’); Readln (n);

for i := 1 to n do begin

writeln(‘nhap gia trij phan tu thu ’,i,’ =’); readln(a[i]);

end; Dem:=0; Tong:=0;

For i:=1 to n do

If (a[i] mod 2 = 0) and (a[i] mod 3 = 0) then begin Dem:= Dem+1; Tong:= Tong+a[i]; end; writeln(‘Dem la:’,Dem); Writeln(‘Tong la:’,Tong); Readln End …………………………………………………

Trang 25

Môn: Tin Học lớp 11

Thời gian làm bài: 45 phút

(Đề 3)

Phần I Trắc nghiệm

Câu 1: Chương trình dịch Pascal sẽ cấp phát bao nhiêu byte bộ nhớ cho các biến trong khai báo sau:

Var M, N, I, J: INTEGER; P, A, B: REAL; X: EXTENDED; K:WORD; A 44 B 36 C 38 D 42

Câu 2: Biết rằng a, b, c là độ dài ba cạnh của một tam giác, biểu thức quan hệ nào sau đây cho kết quả true?

A b + c > a; B c - a > b; C b – a ≥ c; D b - c > a

Câu 3: Xét biểu thức logic: (m mod 100 < 10) and (m div 100 > 0) Với giá trị nào của m dưới đây biểu thức trên cho giá trị true?

Trang 26

D 113

Câu 4: Biểu thức: sqr(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?

Câu 5: Trong cú pháp khai báo biến, danh sách biến một hoặc nhiều tên biến, các tên biến được viết cách nhau bởi:

A Dấu hai chấm (:) B Dấu chấm phẩy (;) C Dấu chấm (.) D Dấu phẩy (,)

Câu 6: Trong 1 chương trình, biến M có thể nhận các giá trị: 10, 15, 20, 30, 40 và biến N có thể nhận các giá trị: 1.0, 1.5, 2.0, 2.5, 3.0 Khai báo nào trong các khai báo sau là đúng?

A Var M,N: Byte;

B Var M: Real; N: Word; C Var M: Byte; N: Real; D Var M, N: Longint;

Câu 7: Biểu thức ((35 mod 9) div 4) có kết quả là mấy? A 1

Trang 27

C 4 D 2

Câu 8:Cho đoạn chương trình: Kq:=0;

For i:=1 to 5 do Kq:=Kq*i;

Kết quả sau khi chạy là : A.0

B.120 C.60 D.20

Câu 9: Cho biết kết quả của đoạn chương trình sau? N:=5; Tong:=0;

For i:=1 to n do

If (i mod 3=0) then Tong:=Tong + i; Write(Tong);

A 3 B 1 C 6 D 2

Câu 10: Trong ngôn ngữ lập trình Pascal, cho đoạn chương trình: i:=1;

Trang 28

if I mod 2 = 0 then Write(‘TIN HOC’); i:=i+1;

End;

Chữ TIN HOC được in ra màn hình mấy lần

A 3 B 2 C 1 D 0

Câu 11: Trong pascal, biểu diễn sqrt(x) có nghĩa là: A Bình phương của x

B Căn bậc hai của x C Giá trị tuyệt đối của x D Luỹ thừa cơ số e của x

Câu 12: Cho biết kết quả của biểu thức (2*(45 mod 3) +12) div 5 là bao nhiêu? A 2

B 4 C 6 D 8

Câu 13: 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ị sai?

Trang 29

Câu 14: Biểu thức nào không phải là biểu thức trong Pascal? A ( m div 5 >=2 ) or ( m <=2)

B a*sqr(x) + b*x + c = 0 C Not (a >10)

D (a+x)(b+y)/2

Câu 15: Phép toán nào đúng khi số nguyên A là số chẵn: A A div 2 = 1

B A div 2 = 0 C A mod 2 = 1 D A mod 2 = 0

Câu 16: Biểu thức 7 div 3 có giá trị là: A 2

B 1 C 0 D 7

Câu 17: Để nhập giá trị cho 2 biến x và y ta dùng lệnh: A Write(x, y);

B Real(x y); C Readln(x, y);

D Read(‘x, y’);

Câu 18: Để đưa ra màn hình giá trị của biến x kiểu nguyên và biến y kiểu thực ta dùng lệnh:

Trang 30

D Writeln(x:8:3, y:8:3);

Câu 19: Để chạy chương trình, trong Pascal ta nhấn tổ hợp phím: A Alt + F9

B Ctrl + F9 C Alt + F3 D Alt + X

Câu 20: Cho biết kết quả sau khi thực hiện lệnh: Begin a := 100; b := 30; x := a mod b ; Write(x); End A 10 B 33 C 3 D 1 Phần II Tự luận

Bài 1 (1.5 điểm) Cho giá trị a=31, b=16, c=8, d=5 Hãy xác định giá trị của biểu thức C:

C := a mod c + d >= sqrt(b) + c (Tính cụ thể từng bước)

Bài 2 (1 điểm) Viết câu lệnh rẽ nhánh tính:

Bài 3 (2.5 điểm) Viết chương trình:

- Nhập mảng một chiều các số nguyên (không quá 100 phần tử)

Trang 31

Đáp án & Thang điểmPhần I Trắc nghiệmPhần II Tự luậnBài 1 a mod c + d = 7 + 5 = 12 sqrt(b) + c = 4 + 8 = 12 12 >= 12 → C := TRUE Bài 2 Cách 1: if (x >= 0) and (y >= 0)

then B:= sqrt(x) + sqrt(y) else B:= abs(x) + abs(y);

Cách 2:

if ( x < 0) and (y < 0)

then B:= abs(x) + abs(y) else B:= sqrt(x) + sqrt(y);

Bài 3

Program bt_3;

Trang 32

Var a: array[1 100] of integer; Dem, Tong, n, i: integer;

Begin

Clrscr;

Writeln(‘nhap so phan tu, n=’); Readln (n);

for i := 1 to n do begin

writeln(‘nhap gia trij phan tu thu ’,i,’ =’); readln(a[i]);

end; Dem:=0; Tong:=0;

For i:=1 to n do

Trang 33

Phòng Giáo dục và Đào tạo Đề thi Học kì 1

Mơn: Tin Học lớp 11

Thời gian làm bài: 45 phút

(Đề 4)

Phần I Trắc nghiệm

Câu 1: Chương trình dịch Pascal sẽ cấp phát bao nhiêu byte bộ nhớ cho các biến trong khai báo sau:

Var M, N, I: INTEGER; P, A, B, C: REAL; X: EXTENDED; K:WORD; A 44; B 36; C 38; D 42

Câu 2: Biết rằng a, b, c là độ dài ba cạnh của một tam giác, biểu thức quan hệ nào sau đây cho kết quả true?

A a + b > c; B b - c > a; C a – c ≥ b; D a - b > c

Câu 3: Xét biểu thức logic: (m mod 100 < 10) and (m div 100 > 0) Với giá trị nào của m dưới đây biểu thức trên cho giá trị false?

Trang 34

B 208; C 2009; D 166509

Câu 4: Biểu thức Pascal B: = Sqr(sqrt(x1-x2)+sqrt(y1-y2)) khi chuyển sang tốn học có dạng:

Câu 5: Cho đoạn chương trình sau: readln(x);

y := (x+2)*x – 5 ;

writeln(‘gia tri cua y = ’, y);

Nếu nhập x = 2 thì có những thơng tin gì ở ngồi màn hình? A gia tri y la:3

B y=3

C gia tri cua y=3 D 3

Câu 6: Biến X có thể nhận giá trị: 0; 1; 3; 5; 7; 9 và biến Y có thể nhận các giá trị 0.5; 1.5; 2.5; 3.5; 4.5 Khai báo biến nào sau đây là đúng?

A Var X: Byte; Y: Real; B Var X: Real; Y: Byte; C Var X, Y: Integer; D Var X, Y: Byte;

Trang 35

A 1 B 3 C 4 D 2

Câu 8: Trong NNLT Pascal câu lệnh Write( ‘5 x 4 = ‘ , 5*4 ) ; viết gì ra màn hình là :

A 5 x 4 = 20 B 5 x 4 = 5*4 C 20 = 5 * 4 D 20 = 20

Câu 9: Cho biết kết quả của đoạn chương trình sau? N:=5; Tong:=0;

For i:=1 to n do

If (i mod 2=0) then Tong:=Tong + 1; Write(Tong);

A 3 B 1 C 6 D 2

Câu 10: Trong ngơn ngữ lập trình Pascal, cho đoạn chương trình: i:=1;

While i <5 do Begin

Trang 36

End;

Chữ TIN HOC được in ra màn hình mấy lần

A 3 B 2 C 1 D 0

Câu 11: Trong pascal, biểu diễn abs(x) có nghĩa là: A Bình phương của x

B Căn bậc hai của x C Giá trị tuyệt đối của x D Luỹ thừa cơ số e của x

Câu 12: Xét biểu thức logic: (n mod 100 > 10) or (n div 100 < 10) Với giá trị nào của n sau đây, biểu thức có giá trị đúng?

A 1009 B 1008 C 1011 D 1010

Câu 13: Cho biết kết quả của biểu thức (2*((45 div 3) +12)) mod 5 là bao nhiêu?

A 2 B 4 C 6 D 8

Trang 37

B ( m div 5 >=2 ) or ( m <=2) C a*sqr(x) + b*x + c = 0 D Not (a < >10)

Câu 15: Phép toán nào đúng khi số nguyên A chia hết cho 3: A A mod 3 = 1

B A div 3 = 1 C A div 3 = 0 D A mod 3 = 0

Câu 16: Biểu thức 3 mod 7 có giá trị là: A 2

B 3 C 0 D 7

Câu 17: Để nhập giá trị cho 3 biến x, y và z ta dùng lệnh: A Write(x, y, z);

B Real(x yz); C Readln(x, y, z);

D Read(‘x, y, z’);

Câu 18: Để đưa ra màn hình giá trị của biến x kiểu thực và biến y kiểu nguyên ta dùng lệnh:

A Write(x:8:3, y:8); B Readln(x, y); C Writeln(x:8, y:8:3); D Writeln(x:8:3, y:8:3);

Trang 38

A Ctrl + F9 B Alt + F9 C Alt + F3 D Alt + X

Câu 20: Cho biết kết quả sau khi thực hiện lệnh: Begin a := 100; b := 15; x := a div b ; Write(x); End A 10 B 33 C 3 D 6 Phần II Tự luận

Bài 1 (1.5 điểm) Cho giá trị a = 49, b = 17, c = 6, k = 4 Hãy xác định giá trị của biểu thức B:

B := Sqrt(a) + b div k >= a mod c + k (Tính cụ thể từng bước)

Bài 2 (1 điểm) Viết câu lệnh rẽ nhánh tính:

Bài 3 (2.5 điểm) Viết chương trình:

- Nhập mảng một chiều các số nguyên (không quá 100 phần tử)

- Đếm và tính tổng các số lẻ và là bội của 3 Thông báo kết quả ra màn hình

Trang 39

Phần I Trắc nghiệmPhần II Tự luậnBài 1 Sqrt(A) + B div K = 7 + 1 = 8 A mod C + K = 1 + 4 = 5 8 >= 5 → B := TRUE Bài 2 Cách 1: if (x > 1) or (x <= -1) then C:= sqrt(x) + 1 else C:= 2*x - 3; Cách 2: if (-1 < x) and (x <= 1) then C:= 2*x – 3 else C:= sqrt(x) + 1; Bài 3 Program bt_3; Uses crt;

Trang 40

Dem, Tong, n, i: integer;

Begin

Clrscr;

Writeln(‘nhap so phan tu, n=’); Readln (n);

for i := 1 to n do begin

writeln(‘nhap gia trij phan tu thu ’,i,’ =’); readln(a[i]);

end; Dem:=0; Tong:=0;

For i:=1 to n do

Ngày đăng: 16/02/2023, 09:09

w