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]
(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 sau cho kết quả ‘Trai’
A copy(s, 4, 8);
B delete(s, 7, 1);
C Cả A, B
D Cả A, B sai
Câu 2: Xâu rỗng xâu có độ dài bằng:
A
B
C
D
Câu 3: Cho đoạn chương trình sau:
s1 := ‘123’; s2 := ‘abc’; insert(s1 , s2 , 1);
write(s1);
Kết in hình là: A ‘a123bc’
B ‘1abc23’
C ‘123’
D ‘abc’
(2)s := ’ABCDEF’; delete(s, 3, 2); insert(‘XYZ’, s, 3); write(s);
Kết in hình là: A ‘ABXYZEF’
B ‘ABEXYZF’
C ‘AXYZ’
D ‘AXYZBEF’
Câu 5: Cho đoạn chương trình sau:
s:= ‘abcd’;
For i:= length(s) downto write(s[i]); Kết in hình là:
A ‘abcd’
B ‘dcba’
C ‘abcde’
D ‘edcba’
Câu 6: Cho đoạn chương trình sau:
s := ‘abcde’;
write(pos(‘aba’, s));
Kết in hình là: A
B ‘0’
(3)D ‘3’
Câu 7: Cho đoạn chương trình sau:
s := ‘Mua xuan’;
write(upcase(s[length(s)-3])); Kết in hình là: A ‘U’
B ‘A’
C ‘X’
D ‘N’
Câu 8: Cho đoạn chương trình sau:
s1 := ‘1234’; s2 := ‘abc’;
if length(s1) > length(s2) then writeln(s1) else writeln(s2); Kết in hình là:
A ‘1234’
B ‘abc’
C ‘1234abc’
D ‘abc1234’
Câu 9: Trong PASCAL, cú pháp khai báo biến tệp văn là:
A Var <tên tệp> : Text;
B Var <tên tệp> : String;
C Var <tên biến tệp> : String;
D Var <tên biến tệp> : Text;
Câu 10: Câu lệnh Assign(<biến tệp> , <tên tệp) ; có ý nghĩa gì?
(4)B Thủ tục mở tên để đọc liệu
C Khai báo biến tệp
D Thủ tục đóng 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( f, ‘bai1.txt’);
B assign(bai1.txt, f);
C assign( f, bai1.txt);
D assign(‘bai1.txt’, f);
Câu 12: Câu lệnh Rewrite(<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 đóng tệp
D Thủ tục mở tên để ghi liệu
Câu 13: Câu lệnh dùng để đọc liệu từ tệp văn có dạng:
A Read(<tên tệp> , <danh sách kết biến>);
B Read(<biến tệp> , <danh sách kết biến>);
C Write(<tên tệp> , <danh sách kết biến>);
D Write(<biến tệp> , <danh sách kết biến>);
Câu 14: Nếu hàm eoln( ) cho giá trị true trỏ tệp nằm vị trí:
A Đầu dòng
B Đầu tệp
C Cuối dòng
D Cuối tệp
(5)A Close(<biến tệp>);
B Close(<tên tệp>);
C Stop(<biến tệp>);
D Stop(<tên tệp>);
Câu 16: Hãy chọn thứ tự hợp lí thực thao tác ghi liệu vào tệp :
A Mở tệp => Gắn tên tệp => Ghi liệu vào tệp => Đóng tệp
B Mở tệp => Ghi liệu vào tệp => Gán tên tệp => Đóng tệp
C Gắn tên tệp => Mở tệp => Ghi liệu vào tệp => Đóng tệp
D Gắn tên tệp => Ghi liệu vào tệp => Mở tệp => Đóng tệp
Câu 17: Chọn phát biểu phát biểu nói lợi ích việc sử dụng chương trình con:
A Tránh việc phải viết lặp lặp lại dãy lệnh
B Để chương trình gọn
C Hỗ trợ việc viết chương trình có cấu trúc cấu trúc lặp, rẽ nhánh
D Khơng có lợi ích
Câu 18: Để khai báo hàm Pascal khoá:
A Program
B Procedure
C Var
D Function
Câu 19: Chương trình gồm có: (chọn câu trả lời nhất)
A Hằng biến
B Hàm thủ tục
(6)D Thủ tục biến
Câu 20: Khi viết chương trình muốn trả giá trị ta nên dùng:
A Hàm
B Thủ tục
C Chương trình
D Thủ tục hàm
Phần II Tự luận
Bài (2 điểm) Viết câu lệnh để đọc liệu từ tệp “DL.TXT” biến x1, x2 (sử dụng biến tệp f)
Bài (3 điểm) Viết chương trình:
Nhập vào xâu kí tự
Đếm in hình số kí tự chữ (chữ thường) có xâu
Đáp án & Thang điểm
Phần I Trắc nghiệm
Phần II Tự luận
Bài
(7)Reset(f);
Read(f,x1,x2);
Close(f);
Bài 2.
Var a: string; i, Dem: integer;
Begin
writeln(‘nhap xau:’);
Readln(a);
Dem:=0;
For i:=1 to length(a)
If (‘a’<=a[i]) and (a[i]<=’z’)
Dem:= Dem+1;
Writeln(Dem);
Readln
End.