Câu 1: Xâu St sau đây có độ dài bằng bao nhiêu? 

a) St := ‘Truong THPT Do Dang Tuyen’;

xâu có $25$ kí tự => độ dài của xâu $=25$

b) St:= ‘’;

xâu không có kí tự nào => độ dài của xâu $=0$

c) St:= ‘ ’;

xâu có $1$ kí tự => độ dài của xâu $=1$

Câu 2: Khai báo nào sau đây SAI? Giải thích?

a. Var S: String[5];

b. Var S: String[20];

c. Var S:String;

d. Var S:String[300]; độ dài của xâu tối đa là $255 $ kí tự 

Câu 3: Hãy phân tích và cho biết chức năng của mỗi dòng lệnh trong chương trình sau:

Var S:string[30];{1} Khai báo xâu có 30 kí tự 

Begin

Write(‘Nhap ho ten:’);{2}  Xuất dữ liệu - nhập xâu

Readln(S);{3} Nhập dữ liệu - đọc xâu 

Writeln(‘Ten vua nhap:’,S); {4} xuất dữ liệu - in xâu ra 

Readln; 

End.

Bài 2: 

Câu 1: Hãy cho biết khai báo biến xâu nào sau đây là đúng?

A. Var St:string[1..20]; B. Var St:string of Char;  

 C. Var St:string[10]; D. Var St:string[500];

Cấu trúc khai báo xâu : $Var <biến>:string[\text{độ dài của xâu }] $

Câu 2: Cho xâu S1 := ‘abc’ ; và xâu S2 := ‘bac’ ; Hãy cho biết kết quả của S2 sau khi thực hiện thủ tục INSERT(S1,S2,3)

A. ‘abcbac’ B. ‘bacabc’                  

C. ‘baabcc’ D. ‘abbacc’

INSERT(S1,S2,3) nghĩa là chèn xâu S1 vào xâu S2 từ kí tự thứ 3

=> đáp án là 'bacabc'

Câu 3: Cho st1=’Chu Van An’ và st2:=copy(st1,pos(‘V’,st1),5), kết quả xâu st2 là:

A. st2= ‘Chu Van’ B. xt2=‘u Van an’      

C. st2= ‘Van An’ D. st2= ‘Van A’

Câu 4: St:=’hoc tap tot’. Thủ tục Delete(st,4,4) cho kết quả:

  A. ‘hoc tap’ B. ‘hoc tot’ C. ‘tap tot’ D. ‘tot' 

Câu 5: Hàm length(‘MicrosoftMW’) có kết quả là           

 A. 8 B. 10 C. 11 D. 12    

Câu 6: Cho xâu S1=’VinhHaLong’. Em hãy cho biết giá trị của S2:= Copy(S1,1,4).

A. ‘Ha’ B. ‘Vinh’ C. ‘Long‘ D. ‘ng‘

Câu 7: thủ tục INSERT(S1,S2,VT) thực hiện công việc gì trong các công việc sau:

A. Chèn xâu S1 vào xâu S2 bắt đầu từ vị trí VT             

B. Chèn xâu S2 vào xâu S1 bắt đầu từ vị trí VT

C. Xóa xâu S2 vào xâu S1 bắt đầu từ vị trí VT               

D. Xóa xâu S1 vào xâu S2 bắt đầu từ vị trí VT

Câu 8: Chọn khai báo biến đúng trong ngôn ngữ lập trình Pascal?

 A. Var st: String[275]; B. Var st: string[255];          

C. Var st: String[50]. D. Var: st: string;