Đề kiểm tra 45 phút tin học lớp 11, bài số 3 học kỳ 2 năm học 2019 2020. Đề được xây dựng theo phân phối chương trình giảm tải, bám sát chuẩn kỹ năng kiến thức, đã được trình bày khoa học. Bộ gồm 3 đề đã trộn sẵn.
Trang 1KIỂM TRA 1 TIẾT Môn Tin học
Thời gian làm bài: 45 phút;
Mã đề thi 179
(Thí sinh không được sử dụng tài liệu)
Họ, tên thí sinh: Lớp:
Câu 1: Khi thực hiện xong đoạn chương trình sau, giá trị của biến S là:
S:= ‘Ha Noi’;
Insert(‘Mua Thu ’,S,1);
A Tất cả đều sai B ‘Mua Thu Ha Noi’; C ‘Ha NoiMua Thu’; D ‘Ha Noi Mua Thu’;
Câu 2: Để gắn biến tệp tep1 với tệp có tên Input.dat, ta sử dụng thủ tục:
A Assign(tep1, input.dat); B Assign(input.dat,tep1);
C Assign(tep1,’input.dat’); D Assign(‘input.dat’, tep1);
Câu 3: Để đọc giá trị xâu s từ tệp gắn với biến tệp f , ta viết:
A Read(f,s); B Read(s,f); C Write(f,s); D Write(s,f);
Câu 4: Biểu thức Length(‘123’) - Length(‘ ’) trả về giá trị là:
Câu 5: Để đọc dữ liệu từ tệp thì cần sử dụng các thao tác là:
A Gắn tên tệp =>mở tệp để ghi dữ liệu mới =>Ghi dữ liệu mới =>Đóng tệp.
B Gắn tên tệp => mở tệp để đọc dữ liệu=> Đọc dữ liệu trong tệp => Đóng tệp.
C Mở tệp để đọc => Đọc dữ liệu trong tệp => Gán biến tệp với tên tệp => Đóng tệp.
D Mở tệp để đọc => Đọc dữ liệu trong tệp => Đóng tệp => Gán biến tệp với tên tệp.
Câu 6: Sau khi thực hiện đoạn chương trình sau thu được kết quả xâu S là gì?
begin
S := ‘GBCDEFA’;
Delete(S,4,2);
end;
Câu 7: Trong NNLT Pascal, hai xâu kí tự được so sánh dựa trên?
A Độ dài tối đa của hai xâu
B Mã của từng kí tự trong các xâu lần lượt từ trái sang phải
C Độ dài thực sự cảu hai xâu
D Số lượng các kí tự khác nhau trong xâu
Câu 8: Phát biểu nào là chính xác khi nói về xâu rỗng:
C Là xâu không có ký tự nào; D Là xâu có độ dài là 1;
Câu 9: Trong ngôn ngữ lập trình Pascal, để in các kí tự trong xâu S ra màn hình ở dạng chữ in hoa(vd :
abcd thi in ra là ABCD), đoạn chương nào sau đây thực hiện việc gì ?
A For i := length(S) downto 1 do write(Upcase(S[i]));
B For i := 1 to length(S) do write(Upcase(S[i]));
C For i := length(S) downto 1 do write(S);
D For i := 1 to length(S) div 2 do write(S[i]);
Câu 10: Phát biểu nào dưới đây là đúng ?
A Các kiểu dữ liệu đều được lưu trữ ở bộ nhớ trong (RAM);
B Dữ liệu kiểu tệp được lưu trữ ở bộ nhớ trong;
C Dữ liệu kiểu tệp được lưu trữ ở bộ nhờ ngoài (đĩa cứng, CD, thiết bị nhớ Flash).
D Các dữ liệu trong máy tính đều bị mất đi khi tắt nguồn điện.
II Phần tự luận (5 điểm)
Câu 1 Nêu cú pháp thủ tục gắn tên tệp? lấy ví dụ minh họa?
Câu 2 Viết chương trình nhập vào một xâu Xóa các kí tự ‘a’ ở đầu xâu.
Trang 1/2 - Mã đề thi 179
Trang 2Câu 3 Cho tệp văn bản Input.txt gồm 1 dòng chứa các số nguyên, các số cách nhau 1 dấu cách Viết
chương trình đọc dữ liệu từ tệp và kiểm tra và thông báo ra màn hình số đó là số chẵn hay sô lẻ.
- Yêu cầu: Viết lại các câu lệnh sau để được 1 chương trình giải quyết yêu cầu trên.
a Assign(f,’Input.txt’);
b Var f:text; x:byte;
c If (x mod 2 = 0) then Write(‘x la so chan’) Else Writeln(‘ x la so le’);
d Reset(f);
e End;
f While not eof(f) Do
g Close(f);
h Begin
i Read(f,x);
- HẾT
Trang 2/2 - Mã đề thi 179