cho bài toán sau :nhập từ bàn phím ba số nguyên a,b,c.tìm và xuất ra màn hình giá trị nhỏ nhất của ba số nguyên a,b,c
1 câu trả lời
program az;
uses Crt;
var a,b,c,Min : integer;
begin
clrscr;
Write('Nhap 3 so a,b,c : '); readln(a,b,c);
Min := a;
If (b < Min) then Min := b;
If (c < Min) then Min := c;
Write('so nho nhat trong 3 so la : ',Min);
readln
end.
