Viết chương trình nhập vào một số nguyên có 2 chử số và xuất ra số đảo ngược

0 bình luận về “Viết chương trình nhập vào một số nguyên có 2 chử số và xuất ra số đảo ngược”

1. program oken;
   uses crt;
   var m,n:longint;
   begin
           clrscr;
           write(‘Nhap so n: ‘);readln(n);
           write(‘So dao nguoc cua ‘,n,’ la: ‘);
           m:=n;
           while m>0 do
                   begin
                           write(m mod 10);
                           m:=m div 10;
                   end;
           readln;
   end.

   Bình luận