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 .

Câu hỏi trong lớp Xem thêm