Nếu b 25/08/2021 Bởi aihong Nếu b { "@context": "https://schema.org", "@type": "QAPage", "mainEntity": { "@type": "Question", "name": " Nếu b
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. Bình luận
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.