Viết chương trình nhập xâu chứa tối đa 20 kí tự và một số tự nhiên n, xoá n kí tự đầu, n kí tự cuối và xuất kết quả ra màn hình.

0 bình luận về “Viết chương trình nhập xâu chứa tối đa 20 kí tự và một số tự nhiên n, xoá n kí tự đầu, n kí tự cuối và xuất kết quả 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(‘xoa ‘,n,’ ki tu dau: ‘);
     writeln(copy(s, n+1, length(s)-n));
     write(‘xoa ‘,n,’ ki tu cuoi: ‘);
     writeln(copy(s, 1, length(s)-n));
     readln;
   end.

   Bình luận