Câu hỏi:

Để gắn tệp KQ.TXT cho biến tệp f2 ta sử dụng câu lệnh:

A. f2 := ‘KQ.TXT’;

B. ‘KQ.TXT’ := f2;

C. Assign(‘KQ.TXT’, f2);

D. Assign(f2, ‘KQ.TXT’);

Câu 1:

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;

Câu 2:

Cho đoạn chương trình sau:

s1 := ‘abcd’; s2: ‘abab’;

if length(s1) > length(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’

Câu 3:

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, 1, 11);

B. copy(s, 1, 12);

C. delete(s, 1, 11);

D. delete(s,1, 12);

Câu 4:

Viết chương trình:

Đọc từ tệp “DULIEU.TXT” 2 số nguyên M và N (M < N)

Tính tổng các số chẵn trong phạm vi từ M đến N

Ghi kết quả ra tệp “KETQUA.TXT”.

A.

Câu 5:

Muốn khai báo x, y 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);

Câu 6:

Tệp f1 có dữ liệu  để đọc 3 giá trị trên tương ứng với 3 biến x, y, z 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);