1/ cho a:=15, b:=8 hãy tính giá trị của a,b trong trường hợp sau ? if a>b then begin a:=b-a; b:=a+2; end else a:=b-a; 2/ đoạn chương trình khi chạy cho kết quảgì A:= 0; if a>0 then a:=1; Wrireln(a); 3/

if a>b then 

begin

a:=b-a;

b:=a+2;

end

else a:=b-a;

vì a được gán bằng 15,b được gán bằng 8

=> a:=b-a => a = -7

=> b:=a+2 => b=-5

2/ đoạn chương trình khi chạy cho kết quảgì

 A:= 0;

if a>0 then a:=1;

Wrireln(a);

Vì a được gán bằng 0 => a không >0 => khi chạy xong sẽ in ra kết quả a=0

Bài 1:

a:=15; b:=8 $\to$ a>b

a:=8-15 $\to$ a:=-7

b:=-7+2 $\to$ b:=-5

Bài 2:

a:=0

$\to$ Câu lệnh: if a>0 then a:=1; writeln(a); không được thực hiện.

$\to$ Sau khi kết thúc chương trình, a:=0.

CHÚC BẠN HỌC TỐT!!!