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 đó Câu 18: Để khai báo hàm trong Pascal bắt đầu bằng từ khoá:.. 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, 8, 4); B delete(s, 1, 7); 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 , 2);
write(s1);
Kết in hình là: A ‘a123bc’
(2)D ‘abc’
Câu 4: Cho đoạn chương trình sau:
s := ’ABCDEF’; delete(s, 3, 2); insert(‘XYZ’, s, 1); write(s);
Kết in hình là: A ‘ABXYZEF’
B ‘ABEXYZF’ C ‘AXYZ’ D ‘XYZABEF’
Câu 5: Cho đoạn chương trình sau:
s := ‘abcde’;
write(pos(‘cba’, s));
Kết in hình là: A
B ‘0’ C D ‘3’
Câu 6: Cho đoạn chương trình sau:
s := ‘Mua xuan’;
(3)Kết in hình là: A ‘X’
B ‘U’ C ‘A’ D ‘N’
Câu 7: 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 8: Cho đoạn chương trình sau:
s:= ‘123456’;
For i:= length(s) downto write(s[i]); Kết in hình là:
A ‘123456’ B ‘12345’ C ‘54321’ D ‘654321’
(4)A Var <tên biến tệp> : Text; B Var <tên tệp> : Text; C Var <tên tệp> : String; D Var <tên biến tệp> : String;
Câu 10: Câu lệnh Assign(<biến tệp> , <tê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 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(bai1.txt, f); B assign( f, bai1.txt); C assign(‘bai1.txt’, f); D assign( f, ‘bai1.txt’);
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:
(5)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
Câu 15: Câu lệnh dùng để đóng tệp f1 là:
A Close(f1): B Close(f1); C Stop(f1): D Stop((f1);
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 Để chương trình gọn
(6)D Tránh việc phải viết lặp lặp lại dãy lệnh Câu 18: Để khai báo hàm Pascal khoá:
A Program B Procedure C Function D Var
Câu 19: Chương trình gồm có: (chọn câu trả lời nhất)
A Hàm thủ tục B Hằng biến C Hàm 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 “dulieu.txt” biến a, b (sử dụng biến tệp f1)
Bài (3 điểm) Viết chương trình:
Nhập vào xâu kí tự
(7)Phần I Trắc nghiệm
Phần II Tự luận
Bài
Assign(f1,’dulieu.txt’); Reset(f1);
Read(f1,a,b); Close(f1); Bài 2.
Var a: string;
i, Dem: integer; Begin
writeln(‘nhap xau:’); Readln(a);
Dem:=0;
(8)If a[i] =’ ‘ then Dem:= Dem+1; Writeln(Dem); Readln