Viết chương trình pascal nhập vào tên của em và chiều ngược lại. (Sử dụng kiểu mảng )

0 bình luận về “Viết chương trình pascal nhập vào tên của em và chiều ngược lại. (Sử dụng kiểu mảng )”

1. program oken;
   uses crt;
   var s: string;
       i,j: integer;
   begin
           clrscr;
           write(‘nhap 1 xau: ‘); readln(s);
           j:=length(s);
           writeln(‘xau nay co ‘,j,’ chu’);
           for i:=j downto 1 do
                   write(s[i]);
           readln;
   end.

   Bình luận