viết chương trình xuất ra màn hình số nhỏ nhất trong ba số nguyên ngẫu nhiên được nhập từ bàn phím

2 câu trả lời

Program so_nho_nhat;

Uses crt;

Var a,b,c,min: integer;

Begin 

Writeln ('nhap a,b,c='); 

Readln (a,b,c);

If a<b then min:= a else min:= b;

If c<min then min:= c;

Writeln ('so nho nhat la:', min);

Readln

End.

#Đây nhé :v

uses crt;
var a,b,c,min: integer;
begin 
   writeln('nhap a,b,c: '); 
   readln(a,b,c);
   if a<b then min:=a else min:=b;
   if c<min then min:=c;
   writeln ('so nho nhat la: ', min);
   readln
end.