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:. A[r]
Trang 1Đề kiểm tra Tin học 11 - Học kì 1
Thời gian làm bài: 45 phút
Phần I Trắc nghiệm
Câu 1: Cho xâu kí tự sau: s:= ‘Nguyen Trai’ Lệnh nào sau đây cho kết quả
‘Nguyen’
A copy(s, 6, 1);
B delete(s, 5, 7);
C Cả A, B đều đúng
D Cả A, B đều sai
Câu 2: Xâu rỗng là xâu có độ dài bằng:
A 0
B 1
C 3
D 4
Câu 3: Cho đoạn chương trình sau:
s1 := ‘123’; s2 := ‘abc’;
insert(s2 , s1 , 2);
write(s2);
Kết quả in ra màn hình là:
A ‘a123bc’
B ‘1abc23’
C ‘123’
D ‘abc’
Câu 4: Cho đoạn chương trình sau:
Trang 2s := ’ABCDEF’;
delete(s, 3, 2);
insert(‘XYZ’, s, 2);
write(s);
Kết quả in ra màn hình là:
A ‘ABXYZEF’
B ‘ABEXYZF’
C ‘AXYZ’
D ‘AXYZBEF’
Câu 5: Cho đoạn chương trình sau:
s := ‘1001010’;
write(pos(‘012’, s));
Kết quả in ra màn hình là:
A 0
B ‘0’
C 3
D ‘3’
Câu 6: Cho đoạn chương trình sau:
s := ‘Mua xuan’;
write(upcase(s[length(s)]));
Kết quả in ra màn hình là:
A ‘X’
B ‘U’
C ‘A’
Trang 3D ‘N’
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à:
A ‘1234’
B ‘abc’
C ‘1234abc’
D ‘abc1234’
Câu 8: Cho đoạn chương trình sau:
s:= ‘54321’;
For i:= length(s) downto 1 do write(s[i]);
Kết quả in ra màn hình là:
A ‘123456’
B ‘12345’
C ‘54321’
D ‘654321’
Câu 9: Câu lệnh Var <tên biến tệp> : Text; có ý nghĩa là:
A Thủ tục gắn tên tệp cho tên biến tệp
B Thủ tục mở tên để đọc dữ liệu
C Khai báo biến tệp
D Thủ tục đóng tệp
Câu 10: Để gắn tên tệp cho tên biến tệp ta sử dụng câu lệnh:
A <biến tệp> := <tên tệp>;
Trang 4B assign(<biến tệp> , <tên tệp>);
C <tên tệp> := <biến tệp>;
D assign(<tên tệp> , <biến tệp>);
Câu 11: Câu lệnh để gắn tên tệp ‘bai1.txt’, cho biến tệp f là:
A assign(bai1.txt, f);
B assign( f, bai1.txt);
C assign( f, ‘bai1.txt’);
D assign(‘bai1.txt’, f);
Câu 12: Câu lệnh Reset(<biến tệp>) ; có ý nghĩa gì?
A Thủ tục gắn tên tệp cho tên biến tệp
B Khai báo biến tệp
C Thủ tục mở tên để đọc dữ liệu
D Thủ tục đóng tệp
Câu 13: Câu lệnh dùng để ghi kết quả vào tệp văn bản có dạng:
A Read(<tên tệp>, <danh sách kết quả>);
B Read(<tên biến tệp>, <danh sách kết quả>);
C Write(<tên tệp>, <danh sách kết quả>);
D Write(<tên biến tệp>, <danh sách kết quả>);
Câu 14: Nếu hàm eof( ) cho giá trị bằng true thì con trỏ tệp nằm ở vị trí:
A Cuối tệp
B Đầu dòng
C Đầu tệp
D Cuối dòng
Câu 15: Câu lệnh dùng thủ tục để đóng tệp có dạng:
Trang 5A Close(<tên tệp>);
B Stop(<biến tệp>);
C Stop((<tên tệp>);
D Close(<biến tệp>);
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 :
A Mở tệp => Gắn tên tệp => Đọc dữ liệu từ tệp => Đóng tệp
B Mở tệp => Đọc dữ liệu từ tệp => Gắn tên tệp => Đóng tệp
C Gắn tên tệp => Đọc dữ liệu từ tệp => Mở tệp => Đóng tệp
D Gắn tên tệp => Mở tệp => Đọc dữ liệu từ tệp => Đóng tệp
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:
A Để chương trình gọn hơn
B Hỗ trợ việc viết chương trình có cấu trúc như cấu trúc lặp, rẽ nhánh
C Tránh được việc phải viết lặp đi lặp lại cùng một dãy lệnh nào đó
D Không có lợi ích
Câu 18: Để khai báo thủ tục trong Pascal bắt đầu bằng:
A Program
B Procedure
C Function
D Var
Câu 19: Chương trình con gồm có: (chọn câu trả lời đúng nhất)
A Hằng và biến
B Hàm và hằng
C Thủ tục và biến
Trang 6D Hàm và thủ tục
Câu 20: Chương trình con thực hiện một số thao tác nào đó và trả về một giá
trị qua tên của nó là:
A Hàm
B Thủ tục
C Cả A và B đều đúng
D Đáp án khác
Phần II Tự luận
Bài 1 (2 điểm) Viết các câu lệnh để ghi dữ liệu vào tệp “ketqua.txt” 2 biến T,
S (sử dụng biến tệp f2)
Bài 2 (3 điểm) 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à chữ cái (chữ hoa) có trong xâu
Đáp án & Thang điểm
Phần I Trắc nghiệm
Phần II Tự luận
Bài 1
Trang 7Rewrite(f2);
Write(f2,T,S);
Close(f2);
Bài 2.
Var a: string;
i, Dem: integer;
Begin
writeln(‘nhap xau:’);
Readln(a);
Dem:=0;
For i:=1 to length(a) do
If (‘A’<=a[i]) and (a[i]<=’Z’) then Dem:= Dem+1;
Writeln(Dem);
Readln
End.
Mời bạn đọc cùng tham khảo thêm