Viết chương trình nhập vào 1 xâu và 1 số nguyên N, xuất ra màn hình n kí tự đầu, n kí tự cuối cùng của xâu vừa nhập.

0 bình luận về “Viết chương trình nhập vào 1 xâu và 1 số nguyên N, xuất ra màn hình n kí tự đầu, n kí tự cuối cùng của xâu vừa nhập.”

1. program Xau;
   uses CRT;
   var   s,s1: string;
          i,n: byte;
   begin
         clrscr;
        
         write(‘Nhap xau S: ‘);readln(s);
        
         write(‘Nhap n= ‘);readln(n);
        
         write(‘N ki tu dau: ‘);
        
         for i:=1 to n do
        
             write(s[i]);
            
         writeln;
        
         for i:=length(s) downto length(s)–n+1 do
        
             s1:= s[i] + s1;
            
         write(‘N ki tu cuoi cung: ‘,s1);
        
   readln;
   end.

   Bình luận