Viết chương trình tìm số lớn nhất trong 3 số a b c nhập từ bàn phím
2 câu trả lời
Var : a,b,c , max : integer ;
Begin
Write (' Nhap a b c') ; Readln ( a,b,c) ;
Max:=a;
If max <b then max:=b ;
If max<c then max:=c ;
Write (' So lon nhat la',max);
Readln ;
End .
