20 CÂU HỎI
Cho đoạn chương trình sau:
s1 := ‘abcd’; s2: ‘abab’;
if s1 > s2 then write(s1) else write(s2);
Kết quả in ra màn hình là:
A. ‘abcd’
B. ‘abab’
C. ‘abcdabab’
D. ‘abababcd’
Cho s = ‘ABCDEF’, hàm copy (s, 4, 3) cho giá trị là:
A. ‘ABC’
B. ‘BCD’
C. ‘CDE’
D. ‘DEF’
Cho s = ‘Xin chao Viet Nam’, hàm length(s) cho giá trị bằng:
A. 15
B. 16
C. 17
D. 18
Cho đoạn chương trình sau:
s1 := ‘2345’; s2: ‘1234’;
if length(s1) > length(s2) then write(s1) else write(s2);
Kết quả in ra màn hình là:
A. ‘2345’
B. ‘1234’
C. ‘23451234’
D. ‘12342345’
Cho xâu kí tự sau: s:= ‘Truyen Kieu-Nguyen Du’
Lệnh nào sau đây cho kết quả ‘Truyen Kieu’
A. copy(s, 12, 10);
B. copy(s, 13, 9);
C. delete(s, 12, 10);
D. delete(s,13, 9);
Cho đoạn chương trình sau:
s1 := ‘123c’; s2 := ‘abcd’;
delete(s1, 1, 3);
write(pos (s1, s2));
Kết quả in ra màn hình là:
A. 1
B. 2
C. 3
D. 4
Khai báo 2 biến xâu a, b nào sau đây là sai:
A. var a, b = string;
B. var a, b : string[15];
C. var a, b : string[25];
D. var a, b : string;
Trong PASCAL, để khai báo hai biến tệp văn bản f1, f2 ta viết:
A. Var f1. f2 : Text;
B. Var f1 ; f2 : Text;
C. Var f1 : f2 : Text;
D. Var f1 , f2 : Text;
Để gắn tệp DL.TXT cho biến tệp f1 ta sử dụng câu lệnh:
A. f1 := ‘DL.TXT’;
B. ‘DL.TXT’ := f1;
C. Assign(f1, ‘DL.TXT’);
D. Assign(‘DL.TXT’, f1);
Câu lệnh mở biến tệp f2 để ghi dữ liệu có dạng:
A. reset(f1);
B. rewrite(f1);
C. read(f1);
D. write(f1);
Để ghi 2 biến CV và DT vào biến tệp f2 ta sử dụng câu lệnh:
A. write(f2, CV, DT);
B. read(f2, CV, DT);
C. writeln(CV, DT, f2);
D. readln(CV, DT, f2);
Để biết con trỏ tệp đã ở cuối tệp f hay chưa, ta sử dụng hàm:
A. eof(f)
B. eoln(f)
C. Cả A, B đều đúng
D. Cả A, B đều sai
Giả sử a = 5; b = 9; c = 15; để ghi các giá trị trên vào tệp f2 có dạng là ta sử dụng câu lệnh:
A. Read(f1, x, y, z);
B. Readln(x, y, z, f1);
C. write(f1, x, y, z);
D. writeln(x, y, z, f1);
Trong lời gọi thủ tục, các tham số hình thức được thay bằng các giá trị cụ thể được gọi là:
A. Tham số thực sự
B. Tham số giá trị
C. Tham số hình thức
D. Tham số biến
Cho đoạn chương trình sau:
Var g:text;
I:integer;
Begin
Assign(g, ‘C:\DLA.txt’);
Rewrite(g);
For i:=1 to 10 do
If i mod 2 = 0 then write(g, i);
Close(g);
Readln
End.
Sau khi thực hiện chương trình trên, nội dung của tệp ‘DLA.txt’ gồm những phần tử nào?
A. 2; 4; 6; 8; 10
B. 1; 3; 5; 9
C. 1; 3; 5; 7; 9
D. 4; 6; 8; 10
Tham số được khai báo trong chương trình chính được gọi là:
A. Tham số thực sự
B. Tham số hình thức
C. Tham số biến
D. Tham số giá trị
Muốn khai báo y là tham số giá trị, x là tham số biến (x, y thuộc kiểu integer) trong thủ tục có tên là “Hoan_doi” thì khai báo nào sau đây là đúng:
A. Procedure Hoan_doi (y : integer; Var x : integer);
B. Procedure Hoan_doi (x : integer; Var y : integer);
C. Procedure Hoan_doi (Var x, y : integer);
D. Procedure Hoan_doi (x, y : integer);
Để phân biệt giữa tham biến và tham trị, trước tham biến người ta dùng từ khoá:
A. Type
B. Begin
C. Var
D. Const
Giả sử ta có hàm max(A, B: integer):integer; để tìm số lớn hơn trong hai số A và B. Cần sử dụng hàm max trên như thế nào để tìm được số lớn nhất trong ba số A, B, C?
A. max(A; B; c);
B. max(A; max(B, C);
C. max(A, B, C);
D. max(max(A, B),C);
Cho chương trình sau:
procedure thutuc (a, b: integer);
Begin
…
End;
Trong chương trình chính có thể gọi lại chương trình con như thế nào:
A. thutuc;
B. thutuc(1, 2, 3);
C. thutuc (5, 10);
D. thutuc(5);