Viết chương trình nhập 2 số a b tính tổng hai số a b tính hiệu 2 số a b kiểm tra tổng hai số đó là chẵn hay lẻ kiểm tra hiệu hai số đó là âm hay dương

program az;

uses Crt;

var a,b,T,H : longint;
begin

clrscr;

Write('Nhap 2 so a va b : '); readln(a,b);

T := a+b;

H := a-b;

Writeln('Tong 2 so la : ',T);

Writeln('Hieu 2 so la : ',H);

If (T mod 2 = 0) then Writeln('Tong 2 so la 1 so chan ') else Writeln('Tong 2 so la 1 so le ');

If (H < 0) then Writeln('Hieu 2 so a va b la 1 so am ') else If (H > 0) then Writeln('Hieu 2 so a va b la 1 so duong ') else Writeln('Hieu 2 so la 0 - khong phai so duong hay so am ');

readln

end.

program hhhhhhhhhhhj;

uses Crt;

var a,b,T,H : longint;
begin

clrscr;

Write('Nhap 2 so a va b : '); readln(a,b);

T := a+b;

H := a-b;

Writeln('Tong 2 so la : ',T);

Writeln('Hieu 2 so la : ',H);

If (T mod 2 = 0) then Writeln('Tong 2 so la 1 so chan ') else Writeln('Tong 2 so la 1 so le ');

If (H < 0) then Writeln('Hieu 2 so a va b la 1 so am ') else If (H > 0) then Writeln('Hieu 2 so a va b la 1 so duong ') else Writeln('Hieu 2 so la 0 - khong phai so duong hay so am ');

readln

end.