Tạo Trắc Nghiệm

Đề thi giữa kì 1 Tin học 11 có đáp án (Đề 1)

23 câu · Đề giữa kì 1

3/23 câu đang cập nhật đáp án (ghi rõ ở từng câu), chưa tính điểm; điểm tính trên 20 câu còn lại.

Xem trước: đọc nhanh mọi câu dạng chữ, chưa tính giờ, chưa hiện đáp án.
Luyện tập: chọn đáp án là biết đúng sai ngay, kèm lời giải.
Thi thử: nộp bài mới chấm điểm và hiện lời giải.

Câu 1

Các thành phần cơ bản của NNLT là:

Đáp án và lời giải

Đáp án: C

Câu 2

Chọn biểu diễn tên đúng trong các biểu diễn dưới đây:

Đáp án và lời giải

Đáp án: A

Câu 3

Biểu diễn nào dưới đây là biểu diễn hằng trong Pascal:

Đáp án và lời giải

Đáp án: A

Câu 4

Trong Pascal, khai báo nào sau đây sai:

Đáp án và lời giải

Đáp án: D

Câu 5

Cho biến thực x đã được gán giá trị 12.41235. Để đưa ra màn hình nội dung “x=12.41” cần chọn câu lệnh nào sau đây?

Đáp án và lời giải

Đáp án: B

Câu 6

Xét khai báo biến sau:

Var x, y, z : real;

c : char;

    i, j : integer;

Tổng bộ nhớ dành cho các biến đã khai báo là bao nhiêu byte?

Đáp án và lời giải

Đáp án: D

Câu 7

Xét biểu thức logic: (n >0) and (n mod 2 = 1). Khẳng định nào sau đây là đúng?

Đáp án và lời giải

Đáp án: A

Câu 8

Cho khai báo biến sau đây:

Var m, n : integer ;

  x, y : real ;

Lệnh gán nào sau đây là sai ?

Đáp án và lời giải

Đáp án: B

Câu 9

Biểu thức toán học dưới đây được biểu diễn trong NNLT Pascal là:

Đáp án và lời giải

Đáp án: D

Câu 10

Biểu thức 5*b + a div 4*3 với a =12, b = 4 có giá trị là:

Đáp án và lời giải

Đáp án: C

Câu 11

Trong Pascal, cú pháp câu lệnh rẽ nhánh if-then dạng thiếu là:

Đáp án và lời giải

Đáp án: A

Câu 12

Trong Pascal, câu lệnh ghép được thực hiện khi sau then hoặc else:

Đáp án và lời giải

Đáp án: C

Câu 13

Cho đoạn chương trình sau:

IF <điều kiện> THEN write(x,’la so duong’) ELSE write(x,’la so am’);

Điều kiện là biểu thức logic nào dưới đây?

Đáp án và lời giải

Đáp án: B

Câu 14

Cho đoạn chương trình sau:

readln(x,y);

IF x > y THEN F:= 2*x – y ELSE

IF x < y THEN F:= sqr(x) + sqr(y) ELSE F:= 2*x;

Nếu nhập vào từ bàn phím x=3 và y=2 thì giá trị của F là:

Đáp án và lời giải

Đáp án: C

Câu 15

Cho đoạn chương trình sau:

readln(x,y);

IF x > y THEN F:= 2*x – y ELSE

IF x < y THEN F:= sqr(x) + sqr(y) ELSE F:= 2*x;

Nếu nhập vào từ bàn phím x=3 và y=2 thì giá trị của F là:

Đáp án và lời giải

Đáp án: C

Câu 16

Cho đoạn chương trình sau:

S := 0 ;

FOR i := 1 to 10 DO

IF (i mod 3=0) or (i mod 5=0) THEN S := S + 1 ;

Sau khi thực hiện, S có giá trị?

Đáp án và lời giải

Đáp án: B

Câu 17

Cho đoạn chương trình sau:

T := 0 ; i:=1;

WHILE i <= 10 DO

BEGIN

IF i mod 2 = 0 THEN T := T + i ;

i:=i+1;

END;

Sau khi thực hiện, T có giá trị?

Đáp án và lời giải

Đáp án: D

Câu 18

Cú pháp khai báo trực tiếp biến mảng một chiều có dạng:

Đáp án và lời giải

Đáp án: A

Câu 19

Giả sử mảng a gồm các phần tử a[1]=1, a[2]=2, a[3]=3, a[4]=4, a[5]=5.

Cho biết kết quả sau khi thực hiện đoạn chương trình sau:

S:=0;

FOR i:=1 to 5 DO

IF a[i] mod 2 = 0 THEN S:=S+a[i];

writeln(‘S = ’,S);

Đáp án và lời giải

Đáp án: B

Câu 20

Phát biểu nào sau đây có thể lấy làm biểu thức điều kiện trong cấu trúc rẽ nhánh?

Đáp án và lời giải

Đáp án: D

Câu 21

Câu tự luận

Hãy viết các biểu thức toán học sau sang dạng tương ứng trong Pascal:

Đáp án tham khảo

Lời giải của đề gốc để bạn tự đối chiếu; câu tự luận không tính điểm.

a) Sqrt(x+sqrt(x+sqrt(x)))

b) (-1 <=sin(x)) and (sin(x)<=1)

Câu 22

Câu tự luận

Cho chương trình Pascal sau:

Program dientich_duongtron;

uses= crt;

const pi = 3.14;

var: dt, r: real;

clrscr;

write(‘nhap ban kinh r = ‘);

readln(r);

dt = pi*sqr(r);

writeln(‘dien tich duong tron la: ‘,dt:10:2, ‘ m’);

readln

End.

Hãy chỉ ra bốn lỗi có trong chương trình, sau đó hãy sửa lại cho đúng.

Đáp án tham khảo

Lời giải của đề gốc để bạn tự đối chiếu; câu tự luận không tính điểm.

a) uses crt;

b) var dt, r: real;

c) Thiếu Begin

d) dt:= pi*sqr(r);

Câu 23

Câu tự luận

Viết chương trình tính tổng các giá trị chẵn trong phạm vi từ 1 đến N

(Số nguyên dương N được nhập vào từ bàn phím)

Đáp án tham khảo

Lời giải của đề gốc để bạn tự đối chiếu; câu tự luận không tính điểm.

Program bt_3;

Uses crt;

Var Tong, n, i: integer;

Begin

 Clrscr;

 Writeln(‘nhap n=’);

 Readln (n);

 Tong:=0;

 For i:=1 to n do

 If I mod 2 = 0 then Tong:= Tong+i;

 Writeln(‘Tong la:’,Tong);

 Readln

End.