Câu hỏi:

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

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

insert (s1, s2 ,4);

write(s2);

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

A. ‘123abcd’

B. ‘a123bcd’

C. ‘ab123cd’

D. ‘abc123d’

Câu 1:

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

s1 := ‘123456789’;

s2 := copy(s1, 3, 1);

write(s2);

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

A. ‘123’

B. 123

C. ‘3’

D. 3

Câu 2:

Trong Pascal, cú pháp khai báo biến kiểu xâu là:

A. Var <tên biến xâu> : string [độ dài lớn nhất của xâu] ;

B. Var < độ dài lớn nhất của xâu > = string [tên biến xâu] ;

C. Var <tên biến xâu> = string [độ dài lớn nhất của xâu] ;

D. Var < độ dài lớn nhất của xâu > : string [tên biến xâu] ;

Câu 3:

Biến Hoten lưu trữ giá trị hằng xâu ‘Nguyen Van Troi’ thì Hoten[4] cho ta kí tự là:

A. ‘ ’

B. ‘y’

C. ‘e’

D. ‘n’

Câu 4:

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

s := ‘500 ki tu’;

write(length(s));

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

A. 500

B. 9

C. ‘9’

D. ‘500’

Câu 5:

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

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

write(pos(s1, s2));

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

A. 0

B. ‘0’

C. 1

D. ‘1’

Câu 6:

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

s := 'Mua Thu';

write(upcase(s[1]));

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

A. ‘T’

B. ‘U’

C. ‘A’

D. ‘M’