Question

 Nhập vào 2 số nguyên, tìm và in ra số lớn nhất trong 2 số.Đầu vào: Một dòng chứa 2 số nguyên cách nhau bởi dấu cách.Đầu ra: Một số là số lớn nhất trong 2 số.

Answer 1

uses crt;

var a,b:integer;

begin

clrscr;

write('Nhap a='); readln(a);

write('Nhap b='); readln(b);

if a>b then writeln('So lon nhat la: ',a)

else if a<b then writeln('So lon nhat la: ',b)

else writeln('Hai so bang nhau');

readln;

end.