Đề thi Học kì 2 Tin học 11 có đáp án (Đề 3)
-
3708 lượt thi
-
22 câu hỏi
-
30 phút
Danh sách câu hỏi
Câu 1:
Cho đoạn chương trình sau:
s1 := ‘acb’; s2: ‘abcd’;
if s1 > s2 then write(s1) else write(s2);
Kết quả in ra màn hình là:
Đáp án đúng : B
Câu 4:
Cho đoạn chương trình sau:
s1 := ‘abcd’; s2: ‘1234’;
if length(s1) > length(s2) then write(s1) else write(s2);
Kết quả in ra màn hình là:
Đáp án đúng : B
Câu 5:
Cho xâu kí tự sau: s:= ‘Truyen Kieu-Nguyen Du’
Lệnh nào sau đây cho kết quả ‘Nguyen Du’
Đáp án đúng : D
Câu 6:
Cho đoạn chương trình sau:
s1 := ‘123b’; s2 := ‘abcd’;
delete(s1, 1, 3);
write(pos (s1, s2));
Kết quả in ra màn hình là:
Đáp án đúng : B
Câu 11:
Để đọc dữ liệu từ biến tệp f1 chứa 2 biến a, b ta sử dụng câu lệnh:
Đáp án đúng : A
Câu 12:
Tệp f1 có dữ liệu 
để đọc 3 giá trị trên tương ứng với 3 biến x, y, z ta sử dụng câu lệnh:
Đáp án đúng : A
Câu 13:
Để biết con trỏ tệp đã ở cuối dòng của tệp f hay chưa, ta sử dụng hàm:
Đáp án đúng : B
Câu 14:
Trong lời gọi thủ tục, các tham số hình thức được thay bằng các giá trị cụ thể được gọi là:
Đáp án đúng : C
Câu 15:
Cho đoạn chương trình sau:
Var g:text;
I:integer;
Begin
Assign(g, ‘C:\DLA.txt’);
Rewrite(g);
For i:=1 to 10 do
If i mod 2 <> 0 then write(g, i);
Close(g);
Readln
End.
Sau khi thực hiện chương trình trên, nội dung của tệp ‘DLA.txt’ gồm những phần tử nào?
Đáp án đúng : C
Câu 17:
Muốn khai báo x,y là tham số giá trị (x, y thuộc kiểu integer) trong thủ tục có tên là “Hoan_doi” thì khai báo nào sau đây là đúng:
Đáp án đúng : D
Câu 18:
Để phân biệt giữa tham biến và tham trị, trước tham biến người ta dùng từ khoá:
Đáp án đúng : D
Câu 19:
Giả sử ta có hàm max(A, B: integer):integer; để tìm số lớn hơn trong hai số A và B. Cần sử dụng hàm max trên như thế nào để tìm được số lớn nhất trong ba số A, B, C?
Đáp án đúng : B
Câu 20:
Cho chương trình sau:
procedure thutuc (a, b: integer);
Begin
…
End;
Trong chương trình chính có thể gọi lại chương trình con như thế nào:
Đáp án đúng : A
Câu 21:
Viết chương trình:
Đọc từ tệp “DULIEU.TXT” 2 số nguyên M và N (M < N)
Tính tổng các số chia hết cho 3 trong phạm vi từ M đến N
Ghi kết quả ra tệp “KETQUA.TXT”
Var f1, f2: text;
Tong, m, n, i: integer;
Begin
assign(f1, ‘DULIEU.TXT’);
reset(f1);
assign(f2, ‘KETQUA’);
rewrite(f2);
Tong;= 0;
read(f1, m, n);
for i:= m to n do
if i mod 2 = 0 then Tong:= Tong+i;
write(f2, Tong);
close(f1);
close(f2);
End.
Câu 22:
Cho chương trình sau:
Program C_trinh_con;
Var d: char;
X1: string;
Procedure Xoa (a: char ; var Xt:string);
Var j: byte;
Begin
j := pos (a, Xt);
while j < > 0 do
begin
delete(Xt, j, 1);
j := pos(a, Xt);
end;
End;
Begin
X1:=’SEPTEMBER’;
d := ‘E’;
Xoa (d, X1);
End.
a/ Hãy chạy tay cho ra kết quả theo bảng mẫu dưới đây
b/ Hãy chỉ ra: biến toàn cục, biến cục bộ, tham số hình thức, tham số thực sự, tham số biến,tham số giá trị trong chương trình trên.
a)
b)
