Viết chương trình Nhập vào 2 số nguyên a,b hoán đổi 2 số đó khi a>b rồi in ra màn hình

0 bình luận về “Viết chương trình Nhập vào 2 số nguyên a,b hoán đổi 2 số đó khi a>b rồi in ra màn hình”

1. uses crt;

   var a,b,td: integer;

   begin

   clrscr;

   write (‘nhap a: ‘);  readln (a);

   write (‘nhap b: ‘);  readln (b);

   if a>b then

   begin

   td:=a;

   a:=b;

   b:=td;

   end;

   writeln (‘gia tri cua a: ‘,a);

   writeln (‘gia tri cua b: ‘,b);

   readln;

   end.

   Bình luận