Tạo Trắc Nghiệm

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

22 câu · Đề giữa kì 2

2/22 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

Cho xâu kí tự sau: s:= ‘Nguyen Trai’. Lệnh nào sau đây cho kết quả ‘Nguyen’

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

Đáp án: C

Câu 2

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

s1 := ‘123’; s2 := ‘abc’;

insert (s2 , s1 , 1);

write(s1);

Kết quả in ra màn hình là:

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

Đáp án: D

Câu 3

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

s := ’ABCDEF’;

delete(s, 3, 2);

insert(‘XYZ’, s, 4);

write(s);

Kết quả in ra màn hình là:

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

Đáp án: B

Câu 4

Xâu rỗng là xâu có độ dài bằng:

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

Đáp án: C

Câu 5

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

s := ‘1001010’;

write(pos(‘011’, s));

Kết quả in ra màn hình là:

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

Đáp án: A

Câu 6

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

s := ‘Mua xuan’;

write(upcase(s[length(s)-1]));

Kết quả in ra màn hình là:

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

Đáp án: C

Câu 7

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

s1 := ‘abc’; s2 := ‘1234’;

if length(s1) > length(s2) then writeln(s1) else writeln(s2);

Kết quả in ra màn hình là:

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

Đáp án: A

Câu 8

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

s:= ‘edcba’;

For i:= length(s) downto 1 do write(s[i]);

Kết quả in ra màn hình là:

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

Đáp án: C

Câu 9

Câu lệnh Var <tên biến tệp> : Text; có ý nghĩa là:

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

Đáp án: D

Câu 10

Để gắn tên tệp cho tên biến tệp ta sử dụng câu lệnh:

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

Đáp án: C

Câu 11

Câu lệnh để gắn tên tệp ‘bai1.txt’, cho biến tệp f là:

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

Đáp án: B

Câu 12

Câu lệnh dùng để ghi kết quả vào tệp văn bản có dạng:

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

Đáp án: D

Câu 13

Câu lệnh Reset(<biến tệp>) ; có ý nghĩa gì?

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

Đáp án: C

Câu 14

Nếu hàm eof( ) cho giá trị bằng true thì con trỏ tệp nằm ở vị trí:

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

Đáp án: A

Câu 15

Câu lệnh dùng để đóng tệp f2 là:

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

Đáp án: C

Câu 16

Hãy chọn thứ tự hợp lí nhất khi thực hiện các thao tác đọc dữ liệu từ tệp :

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

Đáp án: B

Câu 17

Chọn phát biểu đúng trong các phát biểu dưới đây khi nói về lợi ích của việc sử dụng chương trình con:

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

Đáp án: B

Câu 18

Để khai báo thủ tục trong Pascal bắt đầu bằng:

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

Đáp án: A

Câu 19

Chương trình con gồm có: (chọn câu trả lời đúng nhất)

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

Đáp án: C

Câu 20

Chương trình con thực hiện các thao tác nhất định nhưng không trả về giá trị nào qua tên của nó là:

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

Đáp án: B

Câu 21

Câu tự luận

Viết các câu lệnh để ghi dữ liệu vào tệp KQ.TXT 2 biến C, V (sử dụng biến tệp f).

Đá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.

Assign(f,’KQ.TXT’);

Rewrite(f);

Write(f,C,V);

Close(f);

Câu 22

Câu tự luận

Viết chương trình:

Nhập vào một xâu kí tự.

Đếm và in ra màn hình số kí tự là số có trong xâu.

Var a: string;

 I,dem: integer;

Begin

 Readln(a);

 Dem:=0;

 For i:=1 to length(a) do

 If (‘0’<=a[i]) and (a[i]<=’9’) then dem:=dem+1;

 Writeln(dem);

 Readln

 

End.

Đá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.

Var a: string;

  i, Dem: integer;

Begin

 writeln(‘nhap xau:’);

 Readln(a);

 Dem:=0;

 For i:=1 to length(a) do

 If (‘0’<=a[i]) and (a[i]<=’9’) then Dem:= Dem+1;

 Writeln(Dem);

 Readln

End.