1 câu trả lời
Program TTT;
Uses crt;
Var a,b,h: longint;
Begin
Clrscr;
Write('Nhap a va b: '); Readln(a,b);
If b<a then
Begin
a:=a*2;
h:=a-b;
End;
Write('Hieu la: ',h);
Readln
End.
Program TTT;
Uses crt;
Var a,b,h: longint;
Begin
Clrscr;
Write('Nhap a va b: '); Readln(a,b);
If b<a then
Begin
a:=a*2;
h:=a-b;
End;
Write('Hieu la: ',h);
Readln
End.