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

0 bình luận về “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”

1. 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.

   Bình luận

2. 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.

   Bình luận