viết chương trình kiểm tra 1 số nguyên a được nhập vào từ bàn phím là số chẵn hay số lẻ

0 bình luận về “viết chương trình kiểm tra 1 số nguyên a được nhập vào từ bàn phím là số chẵn hay số lẻ”

1. // Viết bằng pascal

   uses crt;

   var a:longint;

   begin

          clrscr;

          write(‘Nhap a= ‘);

          readln(a);

          if a mod 2 = 1 then write(a,’ la so le’)

          else write(a, ‘ la so chan’);

          readln;

   end.

   Bình luận

2. uses crt;

   var n:longint;

   begin

   clrscr;

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

   if n mod 2=0 then write(‘La so chan’) else write(‘La so le’);

   readln

   end.

   Bình luận