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. Xâu A lớn hơn xâu B nếu độ dài xâu A lớn hơn độ dài xâu B

B. Xâu A lớn hơn xâu B nếu kí tự dầu tiên khác nhau giữa chúng kể tử trái sang trong xâu A có mã ASCII lớn hơn

C. Nếu A và B là các xâu có độ dài khác nhau và A là đoạn đầu của B thì A nhỏ hơn B

D. Hai xâu bằng nhau nếu chúng giống nhau hoàn toàn

A. ‘ ’

B. ‘y’

C. ‘e’

D. ‘n’

A. ‘123abcd’

B. ‘a123bcd’

C. ‘ab123cd’

D. ‘abc123d’

A. 0

B. ‘0’

C. 1

D. ‘1’

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] ;

A. ‘123456’

B. ‘abc123456’

C. ‘123456abc’

D. ‘abc’