Tạo Trắc Nghiệm

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

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

4/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 19 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

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

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

Đáp án: C

Câu 2

Trong Pascal, các đoạn chú thích được đặt giữa cặp dấu nào ?

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

Đáp án: A

Câu 3

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

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

Đáp án: D

Câu 4

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

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

Đáp án: D

Câu 5

Để viết chương trình giải phương trình bậc hai có dạng: ax2 + bx + c=0 (a#0), em cần phải thực hiện lệnh nhập vào từ bàn phím các biến 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 : word;

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 sau (3*x <=15) or (x <=4). Biểu thức cho kết quả TRUE khi:

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

Đáp án: C

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: A

Câu 9

Biểu thức Pascal: b/sqrt(sqr(a)+sqrt(b)) được biểu diễn trong toán học là:

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

Đáp án: C

Câu 10

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

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

Đáp án: A

Câu 11

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

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

Đáp án: C

Câu 12

Hình / âm thanh của câu đang cập nhật

Trong Pascal, câu lệnh ghép có dạng:

  • A

  • B

  • C

    \

  • D

    [hình đang cập nhật]

Câu này chưa tính điểm. Đáp án sẽ được cập nhật sớm.

Câu 13

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

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

Đ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=2 và y=3 thì giá trị của F là:

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

Đáp án: A

Câu 15

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

S := 0 ;

FOR i := 1 to 10 DO

IF i mod 2 = 1 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 16

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

T := 0 ;

FOR i := 1 to 10 DO

IF (i mod 3=0) and (i mod 5=0) THEN T := T + i ;

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

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

Đáp án: A

Câu 17

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

Đáp án: B

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:

D:=0;

FOR i:=1 to 5 DO

IF a[i] mod 2 = 1 THEN D:=D+1;

writeln(‘D = ’,D);

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

Đáp án: D

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: B

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(2*sqr(x) + abs(x))

b) (-1/2 <=cos(x)) and (cos(x)<=1/2)

Câu 22

Câu tự luận

Cho chương trình Pascal sau:

Program chuvi_duongtron:

uses crt;

const pi = 3,14;

var cv, r: real;

Begin

    clrscr;

    write(nhap ban kinh r = );

    readln(r);

    cv:= 2*pi*r;

    writeln(‘chu vi duong tron la: ‘,cv:10:2, ‘ m’);

 readln

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) Program chuvi_duongtron;

b) const pi = 3.14;

c) write(‘nhap ban kinh r = ‘);

d) Thiếu End.

Câu 23

Câu tự luận

Viết chương trình tính tổng các giá trị là bội của 3 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 3 = 0 then Tong:=Tong+i;

 Writeln(‘Tong la:’,Tong);

 Readln

End.