Trong ngôn ngữ lập trình Pascal, để tìm vị trí xuất hiện đầu tiên của xâu ‘hoa’ trong xâu s ta có thể viết bằng cách nào trong các cách sau.. Xóa hai dấu cách liên tiếp nhau đầu tiên tr[r]
(1)1 NỘI DUNG ÔN TẬP –TRẮC NGHIỆM TIN 11THÁNG 3-2020 Trong ngơn ngữ lập trình Pascal, đoạn chương trình sau thực
cơng việc gì? d:=0;
for i:=1 to length(s)
if s[i]=’ ‘ then d:=d+1; {‘’ khoảng trắng};
A Xóa dấu khoảng trắng xâu s; B Đếm số ký tự có xâu s;
C Xóa chữ số có xâu s; D Xóa chữ số xâu s;
2 Trong ngơn ngữ lập trình Pascal, để xóa ký tự xâu ký tự S ta viết:
A delete(s,1,1);
B delete(s,1,i); {i biến có giá trị bất kỳ} C delete(s, length(s),1);
D delete( 1,S,1);
3 Trong ngơn ngữ lập trình Pascal, để tìm vị trí xuất xâu ‘hoa’ xâu s ta viết cách cách sau?
A S1:=’hoa’; I:=pos(s1,’hoa’); B I:=pos(s,’hoa’);
C I:=pos(’hoa’,s); D I:=pos(‘hoa’,’hoa’);
4 Trong ngôn ngữ lập trình Pascal, đoạn chươn trình sau thực cơng việc công việc sau:
i:=pos(‘ ‘,S); {‘ ’ dấu cách} While i<>0
Begin
Delete(s,i,1); i:=pos(‘ ‘, s); End;
A Xóa hai dấu cách liên tiếp xâu; B Xóa dấu cách xâu;
C Xóa dấu cách xâu s để s khơng cịn dấu cách liền nhau;
(2)2 Trong ngơn ngữ lập trình Pascal, đoạn chương trình sau làm cơng
việc gì?
I:=pos (‘’,X); While i<>0 Begin
Delete(x,I,1); I:=Pos(‘’,X); End;
A Xóa tất dấu cách xâu x;
B Xóa tất dấu cách bên trái xâu x; C Xóa tất dấu cách bên phải xâu x; D Xóa tất dấu cách hai đầu xâu x;
6 Trong ngơn ngữ lập trình Pascal, để in xâu hình theo thứ tự ngược lại ký tự xâu (Ví dụ ‘abcd’ in ‘dcba’), đoạn chương trình sau thực việc này?
A For i:=1 to length(s) write(s[i]); B For i:=1 to length(s) downto write(s[i]); C For i:=1 to length(s) write(s);
D For i:=1 to length(s) div write(s[i]);
7 Trong ngơn ngữ lập trình Pascal, với xâu ký tự ta có thể: A So sánh hai xâu ký tự;
B So sánh hai xâu ký tự, gán biến xâu cho biến xâu gán ký tự cho biến xâu;
C Gán biến xâu cho biến xâu gán ký tự cho biến xâu; D So sánh gán biến xâu cho biến xâu
8 Trong ngơn ngữ lập trình Pascal, hai xâu ký tự so sánh dựa trên: A Mã ký tự xâu từ trái sang phải; B Độ dài tối đa hai xâu;
C Độ dài thực hai xâu;
D Số lượng ký tự khác xâu;
9 Trong ngơn ngữ lập trình Pascal, hàm Upcase(ch) cho kết là: A Chữ in hoa tương ứng với ch;
B Xâu ch toàn chữ thương; C Xâu ch toàn chữ hoa; D Biến ch thành chữ thường;
10.Trong ngơn ngữ lập trình Pascal, xâu ký tự gì? A Mảng ký tự;
(3)3 C Tập hợp chữ bảng chữ tiếng anh;
D Tập hợp chữ chữ số bảng chữ tiếng anh; 11.Trong ngơn ngữ lập trình Pascal cách khai báo xâu ký tự sau
là đúng:
A S: file of String; B S: file of char; C S: String;
D S: Strings[255];
12.Trong ngơn ngữ lập trình Pascal, xâu ký tự có tối đa là: A Ký tự
B 256 ký tự C 16 Ký tự D 255 ký tự
13.Trong ngơn ngữ lập trình Pascal xâu ký tự khơng chứa ký tự gọi là:
A Xâu trắng; B Xâu không; C Xâu rỗng;
D Không phải xâu ký tự
14.Trong ngơn ngữ lập trình Pascal phần tử xâu ký tự mang số là:
A B
C Do người lập trình khai báo D Khơng có số
15.Trong ngơn ngữ lập trình Pascal, khai báo khai báo sau sai khai báo xâu ký tự
A S: String;
B X1: String[100]; C S: String[256]; D X1:String[1];
16.Trong ngôn ngữ lập trình Pascal, thủ tục Delete(c,a,b) thực cơng việc cơng việc sau:
(4)4 17.Trong ngơn ngữ lập trình Pascal, thủ tục Insert(S1,S2,n) thực
cơng việc gì?
A Chèn thêm xâu S1 vào xâu S2 vị trí n S1; B Chèn thêm xâu S1 vào xâu S2 vị trí n S2; C Chèn thêm xâu S2 vào xâu S1 vị trí n S1; D Chèn thêm xâu S2 vào xâu S2 vị trí n S1; 18.Trong ngơn ngữ lập trình Pascal, hàm length(s) cho kết gì?
A Độ dài xâu S khai báo;
B Số ký tự có xâu S khơng tính khoảng trắng(Ký tự trắng, khoảng cách);
C Số ký tự xâu khơng tính dấu cách cuối cùng; D Số ký tự có xâu S;
19.Trong ngơn ngữ lập trình Pascal sau thực đoạn chương trình sau, giá trị biến S là:
S:=’Ha Noi mua thu’; Delete(S,7,8);
Insert(‘Mua thu’,S,1); A Ha Noi Mua thu;
B Mua thu Ha Noi mua thu; C Mua thu Ha Noi;
D Ha Noi;
20.Trong ngôn ngữ lập trình Pascal, thủ tục chèn xâu S1 vào xâu S2 vị trí vt viết:
A Insert(vt,S1,S2); B Insert(S1,S2,vt); C Insert(S1,vt,S2); D Insert(S2,S1,vt);
21 Dữ liệu kiểu tệp
A Được lưu trữ ROM; B Chỉ lưu trữ RAM; C Chỉ lưu trữ đĩa cứng; D Được lưu trữ nhớ ngoài; 22 Dữ liệu kiểu tệp:
A Sẽ bị hểt tắt máy;
B Sẽ bị hết điện đột ngột; C Không bị tắt máy điện;
(5)5 23 Số lượng phần tử tệp
A Không lớn 128; B Không lớn 255; C Phải khai báo trước;
D Không bị giới hạn mà phụ thuộc vào dung lượng đĩa; 24 Trong Pascal, để khai báo tệp văn ta sử dụng cú pháp
A var <tên tệp>:text; B <tên biến tệp>:text; C var <tên tệp>: String; D var <tên biến tệp>: String;
25 Trong Pascal để khai báo hai biến tệp văn f1, f2 ta viết sau: A var f1 f2:text;
B var f1;f2:text; C var f1,f2:text; D var f1:f2: text; 26 Để thao tác với tệp
A ta gán tên tệp cho tên biến tệp, sử dụng trực tiếp tên tệp được;
B ta thiết phải gán tên tệp cho tên biến tệp; C ta nên sử dụng trực tiếp tên tệp chương trình;
D ta thiết phải sử dụng trực tiếp tên tệp chương trình; 27 Để gán tên tệp cho tên biến tệp ta sử dụng câu lệnh:
A <tên biến tệp>:=<tên tệp>; B <tên tệp>:=<tên biến tệp>;
C.asign(<tên biến tệp>:=<tên tệp>); D asign(<tên tệp>:=<tên biến tệp>);
28 Để gán tệp kq.txt cho biến tệp f1 ta sử dụng câu lệnh A f1:=‘kq.txt’:
B kq.txt=f1;
C assign(‘kq.txt’,f1); D assign(f1,’kq.txt’);
29 Trong Pascal, mở tệp để đọc liệu ta sủ dụng thủ tục: A reset(<tên tệp>);
B reset(<tên biến tệp>); C rewrite(<tên tệp>); D rewrite(<tên biến tệp>);
(6)6 B nằm cuối tệp;
C nằm tệp;
D nằm ngẩu nhiên vị trí nào;
31 để ghi kết vào tệp văn ta sử dụng thủ tục sau: 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ả>); D write(<tên tệp>,<danh sách kết quả>); C write(<tên biến tệp>,<danh sách kết quả>);
32 để đọc liệu từ tệp văn ta sử dụng thủ tục sau: 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ả>); D write(<tên tệp>,<danh sách kết quả>); C write(<tên biến tệp>,<danh sách kết quả>); 33 Trong Pascal để đóng tệp ta dùng thủ tục