Bài 12: Kiểu xâu

NH

viết chương trình nhập 1 xâu S từ bàn phím. Thay "g" có trong xâu thành "h". Xuất xâu S ra màn hình. 

ML
15 tháng 3 2021 lúc 19:07

Program HOC24;

var s: string;

i: byte;

begin

write('Nhap xau S= '); readln(s);

while pos('g',s)<>0 do

begin

insert('h',s,pos('g',s));

delete(s,pos('g',s),1);

end;

write('S= ',s);

readln

end.

Bình luận (0)

Các câu hỏi tương tự
KM
Xem chi tiết
KM
Xem chi tiết
KM
Xem chi tiết
NH
Xem chi tiết
TT
Xem chi tiết
KM
Xem chi tiết
YM
Xem chi tiết
NT
Xem chi tiết
AT
Xem chi tiết