K
Khách

Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.

11 tháng 4 2021

Câu 2: Hãy chọn phương án ghép đúng nhất. Thủ tục chuẩn Insert(S1,S2,vt) thực hiện:

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

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

C. Nối xâu S2 vào S1

D. Sao chép vào cuối S1 một phần của S2 từ vị trí vt

 

Cây 2: A

11 tháng 4 2021

Câu 14. -NB Hãy chọn phương án ĐÚNG khi thực hiện thủ tục chuẩn Insert(S1,S2,vt) ?

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

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

C. Nối xâu S2 vào S1

D. Sao chép vào cuối S1 một phần của S2 từ vị trí vt

 

Câu 15- NB Cho xâu S= 'Thu do Ha Noi', khi thực hiện thủ tục Delete(S,1,6) kết quả là gì?

A. 'THa Noi'    

B. ' Ha Noi'    

C. 'Thu do'    

D. 'Ha Noi'

11 tháng 4 2021

a

b

28 tháng 3 2022

Cho xâu S1=‘Ha  Noi ’; xâu S2 =‘Viet  Nam’. 

Kết quả của thủ tục Insert(s1,s2,6) là:

A. ‘Viet Ha Noi Nam’ B. ‘Viet Ha NoiNam’

C. ‘VietHa Noi Nam’ D. ‘VietHa NoiNam’

29 tháng 3 2022

không câu nào đúng. kết quả đúng là: Viet NHa Noiam

uses crt;

const s1='Pin_NLMT';

s2='Pin_luthium';

s3='Pin_JA_Solar';

s4='Pin_Jinko_Solar';

begin

clrscr;

if s1<s4 then writeln('Xau s1 nho hon xau s4')

else if s1=s4 then writeln('Xau s1 bang xau s4)

else writeln('Xau s1 lon hon xau s4');

if s2<s3 then writeln('Xau s2 nho hon xau s3')

else if s2=s3 then writeln('Xau s2 bang xau s3')

else writeln('Xau s2 lon hon xau s3');

readln;

end.

4 tháng 4 2021

Anh ơi! Nếu mình làm xong cái này thì kết quả nó sẽ ra là gì ạ? Em kh cài Pascal nên kh kiểm tra được ạ! Phiền anh

uses crt;

var st:string;

begin

clrscr;

readln(st);

delete(st,3,5);

writeln(st);

readln;

end.

function demsolan(s1,s2:string):integer;

var dem,vt,d2:integer;

begin

dem:=0;

d2:=length(s2);

vt:=pos(s1,s2);

while vt>0 do 

  begin

inc(dem);

delete(s2,vt,d2);

end;

demsolan:=dem;

end;