Hãy viết chương trình nhập hai số nguyên dương a,b bất kì nhập từ bàn phím và in ra kết quả so sánh của 2 số đó dưới dạng "a>b" hoặc "a=b"

2 câu trả lời

Program BTT;
Uses crt;
Var a,b: qword;
Begin
        Clrscr;
        Write('Nhap a, b: '); Readln(a,b);
        If a>b then Write('a>b')
        ELse If b>a then Write('b>a')
        Else Write('a=b');
        Readln
End.

uses crt;
var a,b:longint;
begin
clrscr;
   write('Nhap a,b: ');readln(a,b);
   if a>b then 
      write('a>b');
   if a<b then 
      write('a<b');
   if a=b then 
      write('a=b');
readln
end.