Viết chương trình nhập vào 3 xâu S1, S2, S3 độ dài không quá 200 kí tự: – Thực hiện ghép 3 xâu, hiển thị kết quả sau khi ghép ra màn hình – Chèn sâu S

0 bình luận về “Viết chương trình nhập vào 3 xâu S1, S2, S3 độ dài không quá 200 kí tự: – Thực hiện ghép 3 xâu, hiển thị kết quả sau khi ghép ra màn hình – Chèn sâu S”

1. Program FNG;
   Uses crt;
   Var S1,S2,S3: String;
   Begin
           Clrscr;
           Write(‘Nhap S1: ‘); Readln(S1);
           Write(‘Nhap S2: ‘); Readln(S2);
           Write(‘Nhap S3: ‘); Readln(S3);

           Writeln(‘Ghep xau: ‘,Concat(S1,S2,S3));

           Insert(S1,S3,1);
           Writeln(‘Chen xau: ‘,S3);
           Readln
   End.

   Bình luận