Lập chương trình tìm giá trị lớn nhất của 2 số nguyên M, N
2 câu trả lời
program lonnhat;
uses crt;
var m,n:integer;
begin
clrscr;
write('Nhap M: '); readln(m);
write('Nhap N: '); readln(n);
if m>n then write(m,' lon hon ',n)
else if n>m then write(n,' lon hon ',m)
else write(m,' bang ',n);
readln
end.
uses crt;
var m,n:integer;
begin
clrscr;
write('Nhap M: '); readln(m);
write('Nhap N: '); readln(n);
if m>n then write(m,' lon hon ',n)
else if n>m then write(n,' lon hon ',m)
else write(m,' bang ',n);
readln
end.
xin hay nhất
