Viết chương trình kiểm tra tính chẵn lẻ của số nguyên N từ bàn phím

0 bình luận về “Viết chương trình kiểm tra tính chẵn lẻ của số nguyên N từ bàn phím”

1. @Meoss_

   * Viết chương trình kiểm tra tính chẵn lẻ của số nguyên N từ bàn phím:

   Program Kiemtra_chanle;

   Uses crt;

   var N:integer;

   begin

   clrscr;

   Write(‘Nhap so nguyen N’);Readln(N);

   If ( N mod 2=0) then write(N,’la so chan’) else write(N,’la so le’);

   Readln;

   End.

   Bình luận

2. program chan_le;

   Uses crt;

   var n:integer;

   begin

           clrscr;

           write(‘Nhap n: ‘);  readln(n);

           if n mod 2=0 then write(n,’ la so chan’)

                   else write(n,’ la so le’);

           readln;

   end.

   Bình luận