bạn nào biết viết chương trình nhập 2 số nguyên tử vào từ bàn phím và in ra số có giá trị lớn hơn thì giúp mình với ạ

2 câu trả lời

program Min;
uses crt;
var a,b:integer;
begin
   clrscr;
   write('Nhap a,b : '); readln(a,b);
   if a>b then write(a,' lon hon ',b) else if a=b
   then write( a,' bang ',b) else write(a,' nho hon ',b);
   readln
end. 

:D 

uses crt;

var a,b:longint;

begin

write('nhap hai so: ');read(a,b);

if a>b then write('So lon la: ',a);

if a<=b then write('so lon la: ',b);

readln

end.

Bạn test thử nhaa, bài mình chưa test.

Câu hỏi trong lớp Xem thêm