viết chương trình nhập một xâu vào từ bàn phím và đưa ra màn hình xâu đó nhưng được viết theo thứ tự ngược lại

0 bình luận về “viết chương trình nhập một xâu vào từ bàn phím và đưa ra màn hình xâu đó nhưng được viết theo thứ tự ngược lại”

1. program xau_dao_nguoc;

   uses crt;

   var s:string;

        i:byte;

   begin

          clrscr;

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

          for i:=length(s) downto 1 do

                 write(s[i]);

          readln;

   end.

   Bình luận

2. program bt;

   uses crt;

   var a: string;

         i, x: byte;

   begin

     clrscr;

     write(‘Nhap xau a la:’); readln(a);

     x:= length(a);

     write(‘Xau nguoc la:’);

     for i := x downto 1 do write(a[i]);

     readln

   end.

   Xin câu trả lời hay nhất ạ :3

   Bình luận