viết chương trình nhập từ bàn phím 2 số a và b.tính tổng của chúng nếu a=b mn giúp e vs

1 câu trả lời

Program BTT;
Uses crt;
Var a,b: longint;
Begin
        Clrscr;
        Write('Nhap a: '); Readln(a);
        Write('Nhap b: '); Readln(b);
        If a<b then Write(a,' + ',b,' = ',a+b)
        Else Write(a,' x ',b,' = ',a*b);
        Readln
End.

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