Câu hỏi:

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

s1 := ‘abc’; s2 := ‘1234’;

if length(s1) > length(s2) then writeln(s1) else writeln(s2);

Kết quả in ra màn hình là:

A. ‘1234’

B. ‘abc’

C. ‘1234abc’

D. ‘abc1234’

Câu 1:

Để khai báo thủ tục trong Pascal bắt đầu bằng:

A. Procedure

B. Program

C. Function

D. Var

Câu 2:

Nếu hàm eof( ) cho giá trị bằng true thì con trỏ tệp nằm ở vị trí:

A. Cuối tệp

B. Đầu dòng

C. Đầu tệp

D. Cuối dòng

Câu 3:

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

s := ‘Mua xuan’;

write(upcase(s[length(s)-1]));

Kết quả in ra màn hình là:

A. ‘X’

B. ‘U’

C. ‘A’

D. ‘N’

Câu 4:

Câu lệnh Reset(<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 mở tên để đọc dữ liệu

D. Thủ tục đóng tệp

Câu 5:

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

A. <biến tệp> := <tên tệp>;

B. <tên tệp> := <biến tệp>;

C. assign(<biến tệp> , <tên tệp>);

D. assign(<tên tệp> , <biến tệp>);

Câu 6:

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

s1 := ‘123’; s2 := ‘abc’;

insert (s2 , s1 , 1);

write(s1);

Kết quả in ra màn hình là:

A. ‘123abc’

B. ‘abc’

C. ‘123’

D. ‘abc123’