Viết chương trình nhập vào 2 số nguyên a và b. Hãy in ra số nhỏ nhất giữa 2 số đó
2 câu trả lời
Program nhonhat;
Uses crt;
Var a,b: integer;
Begin
Clrscr;
Write('a=');Readln(a);
Write('b='); Readln(b);
If a>b then writeln(b,' la so nho nhat');
If a<b then writeln(a,' la so nho nhat');
If a=b then writeln('Hai so nay bang nhau');
Readln
End.
uses crt;
var a, b : integer;
begin
clrscr;
write('Nhap hai so a, b : '); readln(a, b);
if a > b then write(b)
else if a < b then write(a)
else write('Hai so bang nhau');
readln
end.
Câu hỏi trong lớp
Xem thêm
