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.