Viết chương trình nhập một xâu có độ dài 20 kí tự và 1 số tự nhiên n (n<20). Đưa ra màn hình n kí tự đầu, n kí tự cuối của xâu vừa nhập ra màn hình.

0 bình luận về “Viết chương trình nhập một xâu có độ dài 20 kí tự và 1 số tự nhiên n (n<20). Đưa ra màn hình n kí tự đầu, n kí tự cuối của xâu vừa nhập ra màn hình.”

1. program xoaXau;

   uses crt;

   var s: string[20];

       n: byte;

   begin

     clrscr;

     write(‘nhap xau: ‘); readln(s);

     write(‘nhap n = ‘); readln(n);

     writeln(‘xau ban dau: ‘, s);

     write(n, ‘ ki tu dau: ‘);

     writeln(copy(s,1,n));

     write(n, ‘ ki tu cuoi: ‘);

     write(copy(s, length(s)-n+1, n));

     readln;

   end.

    

   Bình luận