B3: Viết phương trình nhập vào từ bàn phím 2 số nguyên a,b. Tìm giá trị lớn nhất của 2 số đó và in ra màn hình giá trị lớn nhất
2 câu trả lời
uses crt;
var a,b:integer;
begin
clrscr;
write('a='); readln(a);
write('b='); readln(b);
if a=b then writeln('gia tri lon nhat la: ',a)
else if a>b then writeln('gia tri lon nhat la: ',a)
else writeln('gia tri lon nhat la: ',b);
readln;
end.
Câu hỏi trong lớp
Xem thêm