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.

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