Viết chương trình nhập vào hai số nguyên a,b. Tính hiệu a và b. Nếu hiệu mod 2 = 0 thì xuất hiệu là số chẵn. Ngược lại hiệu là số lẽ

0 bình luận về “Viết chương trình nhập vào hai số nguyên a,b. Tính hiệu a và b. Nếu hiệu mod 2 = 0 thì xuất hiệu là số chẵn. Ngược lại hiệu là số lẽ”

1. Program BTT;
   Uses crt;
   Var a,b,h: longint;
   Begin
           Clrscr;
           Write(‘Nhap a: ‘); Readln(a);
           Write(‘Nhap b: ‘); Readln(b);
           h:=a-b;
           If h mod 2 = 0 then Write(‘Hieu la so chan’)
           Else Write(‘Hieu la so le’);
           Readln
   End.

   Bình luận

2. uses crt;

   var a,b:longInt;

   begin

   clrscr;

   write(‘Nhap a:’);readln(a);

   Write(‘Nhap b:’);readln(b);

   writeln(‘Hieu:’,a-b);

   if a-b mod 2=0 then write(‘hieu a va b la so chan’) else write(‘hieu a va b la so le’);

   readln;

   end.

   Bình luận