Cho st Nguyen Van A giá trị của st sau khi thực hiện lệnh sau là gì Delete(st pos V st 5)

Var ten_xau: STRING[độ dài của xâu];

hoặc Var ten_xau:string;

Xâu ký tự trong bộ nhớ nó chiếm số byte bằng số ký tự cực đại được khai báo cộng với byte đầu tiên chứa số ký tự hiện có của xâu. Độ dài tối đa của xâu ký tự là 255.

- Cách nhập/xuất: Cách đọc hay viết kiểu STRING cũng tương tự như các kiểu dữ liệu khác, ta sử dụng các thủ tục READ, hoặc WRITE.

- Truy cập từng phần tử của xâu ký tự: tương tự mảng 1 chiều: thông qua tên biến kiểu STRING và chỉ số của nó

Các thao tác trên xâu ký tự:

st1:=’Le’; st2:=’Thanh’; St=st1 + st2; 

2/ Phép so sánh: 

j/ Hàm UPCASE[Ký_tự]--> Đổi Ký_tự thành "KÝ_TỰ" in hoa

4. Truy xuất từng ký tự trong chuỗi

Có thể kết hợp dùng vòng lặp truy xuất các ký tự trong chuỗi.

Ví dụ: In ra các ký tự của chuỗi st[i] ra màn hình theo từng dòng

for i:=1 to 6 do writeln[st[i]];

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

AMBIENT-ADSENSE/

Câu hỏi này thuộc đề thi trắc nghiệm dưới đây, bấm vào Bắt đầu thi để làm toàn bài

CÂU HỎI KHÁC

• Số phần tử của một mảng một chiều là: 
• Trong Pascal, đoạn chương trình sau thực hiện công việc gì ? For i := length[S] downto 1 do  If S[i] = ‘ ’ then Delete[S,
• Trong ngôn ngữ lập trình Pascal, với khai báo như sau: Type mang = ARRAY[1..100] of integer ; Var a, b : mang ; c : array[1..
• Trong ngôn ngữ lập trình Pascal, xâu kí tự có tối đa ? 

UREKA

• Trong ngôn ngữ lập trình Pascal, đoạn chương trình sau thực hiện việc nào trong các việc sau [A là mảng số có N phầ
• Trong ngôn ngữ lập trình Pascal, đoạn chương trình sau thực hiện công việc gì? d :=  0 ;   For i := 1 to 
• Với khai báo A : Array [1 .. 100] Of Integer; thì việc truy xuất đến phần tử thứ 5 như sau: 
• Cú pháp để khai báo biến mảng một chiều trực tiếp là: 
• Cho sâu s1 = ‘123’; s2 = ‘abc’ sau khi thực hiện thủ tục Insert[s1,s2,2] thì: 
• Trong Pascal, cho đoạn chương trình sau: S := 0; For I := 1 To 5 Do If  [I mod 2 = 0] Then s := s + a[1]; Với mảng a có c�
• Cho s = ‘123456789’ hàm Copy[s,2,3] cho giá trị bằng: 
• Trong Pascal, để tìm vị trí xuất hiện đầu tiên của xâu ‘hoa’ trong xâu S ta có thể viết bằng cách nào trong các
• Cho str là một xâu kí tự, đoạn chương trình sau thực hiện công việc gì? for  i := length[str] downto 1 do write[str[i]
• Trong các phát biểu sau hãy tìm ra phát biểu sai? 
• Cho xâu s = ‘123456789’, sau khi thực hiện thủ tục delets[s,3,4] thì: 
• Cho A = ‘abc’; B = ‘ABC’; Khi đó A + B cho kết quả nào? 
• Cho khai báo mảng và đoạn chương trình như sau: Var a : array[0..
• Để khai báo kiểu xâu trực tiếp ta sử dụng cú pháp nào? 
• Hãy điền vào chổ trống để đoạn chương trình sau thực hiện đếm các phẩn tử có giá trị bằng 10? Dem := 0;
• Trong ngôn ngữ lập trình Pascal, xâu kí tự là ? 
• Xâu ‘ABBA’ lớn hơn xâu:
• Cú pháp câu lệnh nào sau đây là đúng? 
• Đoạn chương trình sau in ra kết quả nào? Program Welcome ; Var a : string[10]; Begin a := ‘tinhoc ’; writeln[le
• Trong ngôn ngữ lập trình Pascal, khai báo nào trong các khai báo sau là  sai khi khai báo xâu kí tự ? 
• Trong ngôn ngữ lập trình Pascal, đoạn chương trình sau thực hiện công việc gì? 
• Cho đoạn chương trình sau:  D := 0;For I := 1 To 5 Do If [a[i] > 10] and [a[i] < 100] and [a[i] mod 3 = 0]Then d := d + 1;
• Cho s = ‘500 ki tu’, hàm Length[s] cho giá trị bằng: 
• Hỏi đoạn chương trình sau có chức năng gì? M := a[1];For I := 2 To n Do If [ a[i] < m] Then m := a[i];Write[m]; 
• Trong ngôn ngữ lập trình Pascal, sau khi chương trình thực hiện xong đoạn chương trình sau, giá trị của biến S là ?&nb
• Thủ tục delete[st,p,n] thực hiện:  
• Cho s1 = ‘010’; s2 = ‘1001010’ hàm pos[s1,s2] cho giá trị bằng: 
• Trong ngôn ngữ lập trình Pascal, đoạn chương trình sau thực hiện công việc gì ? [giá trị của biến đếm] d := 0
• Cho khai báo sau: Var  a : array[0..