KẾ HOẠCH ÔN TẬP KHỐI 11 A PHẦN LÝ THUYẾT: Kiến thức: - Biết kiểu liệu mới, biết khái niệm kiểu xâu - Phân biệt giống khác kiểu mảng kí tự với xâu kí tự - Biết cách khai báo biến, nhập xuất liệu, tham chiếu đến kí tự xâu - Biết phép toán liên quan đến xâu - Biết đặc điểm kiểu liệu tệp - Biết khái niệm tệp có cấu trúc tệp văn - Củng cố lại kiến thức học tệp chương thông qua ví dụ Yêu cầu: - Khai báo biến kiểu xâu ngơn ngữ lập trình Pascal Sử dụng biến xâu phép toán xâu để giải toán đơn giản - Khai báo biến kiểu tệp - Thực thao tác xử lí tệp: Gán tên tệp, mở đóng tệp, đọc ghi tệp - Sử dụng thủ tục liên quan để đọc ghi liệu tệp - Sử dụng hàm thủ tục liên quan để giải tập B PHẦN BÀI TẬP: Kiến thức: - Củng cố lại kiến thức kiểu mảng - Làm quen với thuật toán xếp - Củng cố lại kiến thức liên quan đến kiểu mảng, kiểu xâu - Biết sâu thêm phần kiến thức lí thuyết kiểu xâu kí tự, đặc biệt hàm thủ tục liên quan - Nắm số thuật toán bản: tạo xâu mới, đếm số lần xuất kí tự,… - Biết đặc điểm kiểu liệu tệp - Biết khái niệm tệp có cấu trúc tệp văn - Củng cố lại kiến thức học tệp chương thơng qua ví dụ - Củng cố lại kiến thức học tệp chương thơng qua ví dụ - Bước đầu sử dụng kiểu liệu tệp số toán Yêu cầu: - Rèn luyện kĩ sử dụng kiểu liệu có cấu trúc, kĩ diễn đạt thuật tốn chương trình sử dụng liệu kiểu mảng Rèn luyện kĩ nhận xét, phân tích đề xuất cách giải tốn - Rèn luyện kĩ vận dụng - Khai báo biến kiểu xâu - Nhập, xuất giá trị cho biến xâu - Duyệt qua tất kí tự xâu - Sử dụng hàm thủ tục chuẩn - Khai báo biến kiểu tệp - Thực thao tác xử lí tệp: Gán tên tệp, mở đóng tệp, đọc ghi tệp - Sử dụng thủ tục liên quan để đọc ghi liệu tệp - Sử dụng hàm thủ tục liên quan để giải tập C MỘT SỐ CÂU HỎI TRẮC NGHIỆM: Câu 1: Giả sử biến N có kiểu liệu số nguyên tồn phạm vi từ 10 đến 222 Cách khai báo P sau tốn nhớ A Byte B Integer C Longint D var x,y,z: real; i: integer; D Word x1,x2: extended; Câu 2: Dữ liệu kiểu nguyên gồm có: A longint, byte, word, integer B longint, word, extended, boolean C byte, real, word, integer D integer, extended, word, byte Câu 3: Ta có khai báo sau: Câu 6: Cho x=99 Thực đoạn chương trình x:=x+1; If x 10 then g, t: Boolean; B If A > 10, B > 10, C > 10 then Với khai báo máy tính cấp phát nhớ byte? B 18 C 20 Câu 4: Hãy chọn cú pháp khai báo biến A Var < danh sách biến > < kiểu liệu > ; C If (A>10) Or (B>10) Or (C>10) then D If (A>10) And (B>10) And (C>10) then Câu 9: Cho khai báo Biến: Var m, n:integer; x,y: real; Phép gán sau sai? B Var < danh sách biến > = < kiểu liệu > ; A y:=10.5; B m:= 4; C Var < danh sách biến > : < kiểu liệu > ; C n:=3.5; D x:= -6; Câu 5: Khai báo biến sau đúng: A var a,b,c: interger; X,Y,Z: word; x1,x2,x3: real; B var a,b,c: word; X,Y,Z: boolean; x1,x2: read; C var i,k: byt; m,n: boolean; c,k: char; C write(a[i]); Câu 8: Muốn kiểm tra đồng thời giá trị A, B, C có lớn 10 hay khơng ta viết câu lệnh If cho đúng? d: Real; A 17 D 100 Câu 10: Cấu trúc if – then sau cú pháp: A if then < câu lệnh> lệnh>; B if ; then < câu C if then < câu lệnh>; lệnh>; D if then < câu Câu 11: Cấu trúc lặp For – Do cú pháp: A For := to ; B For := downto C For := to ; D For := to downto ; Câu 12: Cho đoạn lệnh đây: S:=1; For i:=1 to S:=S + i; A Kết tính tổng S là? A B B C D Câu 19: Cho đoạn lệnh sau thực công việc đây? C D Câu 13: Trong Pascal khai báo sau đúng? A Var x; y; z : real; B Var x, y, z : char; C Var x, y, z = real; D Var : x, y, z = Char; k := a[1] ; for i := to 50 if a[i] > k then k := a[i] ; write(k); Câu 14: Xác định giá trị x, y sau thực đoạn chương A Tìm phần tử nhỏ mảng; trình đây: B Tìm phần tử lớn mảng; Var x, y : Integer; Begin C Tìm số phần tử lớn mảng; x:= 30; y:= 20; x:= x-y; D Tìm số phần tử nhỏ mảng; y:= y-x; End; Câu 20: Tham chiếu phần tử thứ 10 mảng khai báo sau: Hãy chọn phương án đúng? A x= 10, y= -10 B x= 10, y= 10 Var a : array[1 10] of integer ; C x= 30, y= 20 D x= 10, y= 20 Hãy chọn phương án A a[10]; B a(10); C a[9]; D a(9); Câu 15: Cho đoạn chương trình: IF A>B then Câu 21: Phát biểu sau mảng không ? Begin TG:=A; A:=B; B:=TG; A Kiểu số mảng bắt đầu -3; Write(A, B); End; B Một xâu có 10 kí tự xem mảng; Với A=10 B=5 kết A, B sau thực đoạn C Có thể khai báo biến mảng nhiều cách; chương trình là? A A=10 B=5 B A=15 B=10 C A= B=10 D A=10 B=15 Câu 16: Phát biểu kiểu mảng đúng: A Phải tập hợp số nguyên; B Số phần tử tối đa mảng 255; C Là dãy hữu hạn phần tử kiểu; D Các phần tử mảng khơng kí tự; Câu 17: Để khai báo số phần tử mảng PASCAL, người lập trình cần A khai báo số số phần tử mảng; B khai báo số bắt đầu kết thúc có dạng đoạn số nguyên liên tục; C khơng cần khai báo gì, hệ thống tự xác định; Câu 18: Mảng table chứa tối đa phần tử? Const n = 3; Var table : array [ n] of integer; D Khơng có cách xác định giá trị phần tử mảng; Câu 22: Đoạn chương trình sau đưa hình kết nào? for i:= to 10 write(i); A 12345678910 B Đưa 10 dấu cách C 10 D 10 Câu 23: Câu lệnh if sau đúng? A if a= then a:= d+1 else a:= d+2; B if a= then a:= d+1; else a:= d+2; C if a= then a= d+1 else a= d+2; Câu 24: Cho S i biến nguyên Khi chạy đoạn chương trình S:=0; for i:=1 to 10 s := s+i; writeln(s); Kết xuất hình là? A 55 B 100 C 11 Câu 25: Khi chạy chương trình: D 101 Var S, i, j : Integer; Var S : string; Begin S := 0; i, L : integer; Begin S :='So Buu chinh Vien thong'; L:=length(S); for i:= to S := S + ; End Giá trị sau S là: A B for i := to L C D If (S[i] >= 'a') and (S[i] = ‘0’) and (S[i] ‘ABcd’ D ‘ABC’ = ‘abc’ Câu 54: Hãy cho biết cú pháp khai báo sau đúng: A < tên biến > : string[độ dài lớn xâu]; A tập hợp chữ chữ số tiếng Anh B Var string[độ dài lớn xâu]; B tập hợp chữ tiếng Anh C Var < tên biến > : string[độ dài lớn xâu]; C mảng kí tự D Var < tên biến > string[độ dài lớn xâu]; D dãy kí tự mã ASCII Câu 48: Trong Pascal, để khai báo xâu có độ dài khơng q 40 kí tự, khai báo đúng? Câu 55: Giả sử xâu S ’ABCD’ lệnh write(S) có kết là: A AB B BC C CD D ABCD Câu 56: Giả sử xâu S :’ABCD’ lệnh write(S[1]) có kết C Hai xâu chúng giống hoàn là: toàn A D B B C A Câu 57: Giả sử xâu S write(S[length(S)]) có kết là: A D B B C A D C :’ABCD’ D Xâu A lớn xâu B độ dài xâu A lớn độ dài xâu lệnh B Câu 68: Lệnh sau không hợp lệ: D C A var S_1:string; Câu 58: Giả sử : st:=’abcd’; thủ tục Delete(st,2,2); có kết là: A ad B cd C bc D bd C var abc:string[100]; B ababad C ababcd D aabbcd A B D var abc:string[1]; Câu 69: Trong khai báo sau, khai báo đúng: Câu 59: Giả sử : st:=’abcd’; thủ tục Insert(‘ab’,st,2); có kết là: A abcdab B var s1:string[256]; A var ten = string[30]; B var Hoten:string[27]; C var ho:string(20; D var diachi: string(100); Câu 70: Cho xâu a=’abc’, xâu b=’ABC’ Khi a + b cho kết Câu 60: Giả sử : st:=’Thuan Hoa’; hàm copy(st,7,3); có kết quả là: là: A ‘aAbBcC’ B ‘ABCabc’ A Hoa B uan Hoa C n Ho D an Hoa C ‘abcABC’ D ‘AaBbCc’ Câu 61: Giả sử : st:=’Thuan Hoa’; hàm length(st); có kết là: Câu 71: Cho s=’500kitu’, hàm length(s) cho giá trị bằng: A B C D 10 A ‘u’ B C 500 D ‘5’ Câu 62: Giả sử : st:=’Thuan Hoa’; hàm Pos(‘m’,st); có kết Câu 72: Hàm length(s) cho kết là: là: C A kí tự có số thứ tự với độ dài xâu s D B kí tự xâu s Câu 63: Cho s1=’010’, s2=’1001010’, hàm pos(s1, s2) cho kết là: A B C D Câu 64: Xâu ‘ABBA’ lớn xâu: A ‘BABA’ B ‘ABC’ B ’123’ C ‘ABCBA’ C 234 D độ dài xâu s Câu 73: Hàm copy(s,n1,n2) cho kết là: D ‘ABABA’ Câu 65: Cho s=’123456789’, hàm copy(s,2,3) cho kết là: A ’34’ C kí tự cuối xâu s D ‘234’ Câu 66: Trong phát biểu sau, phát biểu sai: A Xâu có chiều dài khơng q 250 kí tự B Xâu khơng có kí tự gọi xâu rỗng C Thao tác nhập, xuất liệu kiểu xâu giống nhập, xuất giá trị biến kiểu liệu chuẩn D Có thể tham chiếu đến kí tự xâu A xâu gồm n2 kí tự liên tiếp vị trí n1 xâu s B xâu gồm n1 kí tự liên tiếp vị trí n2 xâu s C xâu gồm n2 kí tự liên tiếp vị trí n1-n2 xâu s D xâu gồm n1 kí tự liên tiếp vị trí n2-n1 xâu s Câu 74: Thủ tục delete(st,p,n) thực hiện: A xóa p kí tự biến xâu st vị trí n Câu 67: Phát biểu sau sai: B xóa kí tự biến xâu st vị trí n đến vị trí p A Nếu A B hai xâu có độ dài khác A đoạn đầu xâu B A nhỏ B C xóa n kí tự biến xâu st vị trí p B Xâu A lớn xâu B kí tự khác chúng kể từ trái sang xâu A có mã ASCII lớn D xóa kí tự biến xâu st vị trí p đến vị trí n Câu 75: Xâu ‘ABBA’ với xâu: A ‘AB’ + ‘BA’ B ‘B’ C ‘A’ D ‘abba’ Câu 76: Cho xâu s=’123456789’ Thủ tục delete(s,3,4) cho kết là: A ‘123789’ B ‘1256789’ C ‘’ D ‘12789’ Câu 77: Cho xâu s1= ‘123’, s2=’abc’, thủ tục insert(s1,s2, 2) cho kết quả: A s1=’ab123’ s2=’abc’ s2=’a123bc’ B s1=’123’ C s1=’123’ s2=’12abc’ s2=’abc’ D s1=’1abc23’ A ‘1111111111’ B ‘20007’ ‘1010101010’ C ‘207’ D D 'THU DUC THPT' Câu 84: Cho đoạn lệnh sau: S1:= 'THPT THU DUC'; x:= POS('U', s1); B ‘AAA’ Đoạn lệnh in hình kết quả? B C 10 D 11 Câu 85: Cho đoạn lệnh sau: S1:= 'THANH PHO HO CHI MINH'; delete(s1,1,7); C ‘A’ D ‘ABA’ write(s1); Đoạn lệnh in hình kết quả? Câu 80: Phát biểu đúng? A Xâu có độ dài lớn ngầm định 255; B Xâu có độ dài lớn 0; C Câu lệnh sai thiếu khai báo độ dài tối đa xâu; D Bắt buộc phải khai báo kích thước xâu; A 'HO HO CHI MINH' B 'PHO HO CHI MINH' C 'THANH P' D 'CHI MINH' Câu 86:Hãy chọn phương án ghép Thủ tục chuẩn Insert(s1, s2, vt) thực A Chèn xâu s1 vào s2 vị trí vt xâu s2; Câu 81: Cho đoạn lệnh sau: B Chèn xâu s1 vào s2 vị trí vt xâu s1; S1:= 'THPT THU DUC'; C Chèn xâu s2 vào s1 vị trí vt xâu s2; S2:= Copy(S1,2,5); Câu 87: Phát biểu sau sai? write(s2); A Lượng liệu lưu trữ tệp nhỏ Đoạn lệnh in hình kết quả? B 'T THU' C 'THPT T' D 'TH' Câu 82: Cho đoạn lệnh sau: B Dữ liệu kiểu tệp lưu trữ lâu dài nhớ C Số lượng phần tử tệp không cần xác định trước Câu 88: Phát biểu sau đúng? S1:= 'THPT THU DUC'; A Lượng liệu lưu trữ tệp phụ thuộc vào dung lượng đĩa x:= length(s1); write(x); B Dữ liệu lưu trữ tệp bị tắt máy Đoạn lệnh in hình kết quả? A 12 C 'THPT THU DUC A Câu 79: Xâu ‘ABBA’ nhỏ xâu A 'HPT T' B 'THU THPT DUC' write(x); Câu 78: Xâu ‘2007’ nhỏ xâu: A ‘B’ A 'THU THPTDUC' B 11 C 13 Câu 83: Cho đoạn lệnh sau: D 10 C Tệp có cấu trúc thuộc loại tệp mà liệu ghi dạng kí tự Câu 89: Trong Pascal, để khai báo biến tệp văn ta viết: S1:= 'THPT'; A Var f1, f2: text; B Var f1: f2: text; S2:= 'THU DUC'; C Var f1 f2: text; D Var f1; f2: text; Insert(s1,s2,5); Câu 90: Để gắn tệp KQ.txt cho biến tệp f1 ta sử dụng lệnh: write(s2); A Assign(f1, ‘KQ.txt’); Đoạn lệnh in hình kết quả? C KQ.txt:= f1; B Assign(‘KQ.txt’, f1); Câu 91: Trong Pascal, mở tệp để đọc liệu ta phải sử dụng thủ Câu 96: Muốn mở tệp có tên ‘Baihat.txt’ để ghi liệu vào đó, tục: ta thực nào? A Reset(); B Reset(); C Rewrite(); D Rewrite(); Câu 92: Để đọc liệu từ tệp văn ta sử dụng lệnh: A Read(, ); A Assign(f,’Baihat.txt’); A); Write(f, A); C Assign(f,’Baihat.txt’); Rewrite(f); Reset(‘Baihat.txt’); D Write(, ); D Câu 97: Câu lệnh read(tep, A, B), dùng để làm gì? B Read(, ); C Write(, ); B Write(‘Baihat.txt’, A Mở tệp để ghi liệu; C Ghi liệu vào tệp liệu; B Đọc liệu từ tệp; D Mở tệp để đọc Câu 93: Nếu hàm eof() cho giá trị True Câu 98: Thủ tục Assign(f,’tep.txt’) thực cơng việc gì? trỏ tệp nằm ở: A Đóng tệp ‘tep.txt’ B Mở tệp ‘tep.txt’ để đọc A Cuối tệp B Cuối dòng C Đầu tệp D Đầu dòng C Gắn tệp ‘tep.txt’ cho biến tệp f D Mở tệp ‘tep.txt’ để ghi Câu 94: Nếu hàm EOLN() cho giá trị False Câu 99: Cho đoạn chương trình sau: trỏ tệp: A Chưa cuối dòng B Cuối dòng C Chưa cuối tệp D Đầu dòng Câu 95: Thủ tục Rewrite(); có ý nghĩa gì? A Thủ tục mở tệp để ghi liệu B Thủ tục đọc liệu C Thủ tục ghi liệu D Thủ tục đóng tệp Rewrite(tep); Write(tep2, ‘x=’, -B/A:5:2); Đoạn chương trình thực cơng việc gì? A Mở tệp ghi liệu vào tệp B Mở tệp đọc liệu tệp C Ghi liệu vào tệp D Đọc liệu tệp Phần câu hỏi Kiểu tệp em làm tiếp sau học xong Chúc em ôn tập tốt nhé! ... s1=’1abc23’ A ? ?111 1111 111? ?? B ‘20007’ ‘1010101010’ C ‘207’ D D ''THU DUC THPT'' Câu 84: Cho đoạn lệnh sau: S1:= ''THPT THU DUC''; x:= POS(''U'', s1); B ‘AAA’ Đoạn lệnh in hình kết quả? B C 10 D 11 Câu 85:... Pos(‘Vietnam’,S) là: S := Copy( ''PASCAL TINHOC 11'' , 8, 9) ; A B C D Write(S); Câu 35: Khi chạy chương trình : Kết qủa in lên hình là: Program bt; A PASCAL B 11 C TINHOC 11 D TINHOC Câu 40: Trong Pascal,... write(S) có kết là: A AB B BC C CD D ABCD Câu 56: Giả sử xâu S :’ABCD’ lệnh write(S[1]) có kết C Hai xâu chúng giống hoàn là: toàn A D B B C A Câu 57: Giả sử xâu S write(S[length(S)]) có kết là: