Bài 1:

var

      n : integer;

begin

      write('Moi ban nhap so can kiem tra: '); readln(n);

      if n mod 2=0 then write(n,' chia het cho 2') else write(n,' khong chia het cho 2');

      readln;

end.

Bài 2:

var

       n: integer;

begin

        write('Moi ban nhap so can kiem tra: ');readln(n);

        if n mod 2=0 then write(n,' la so chan') else write(n,' la so le');

        readln;

end.

Mình giải thích thêm: Những số chia hết cho 2 là số khi chia 2 dư 0, nên ta dùng phép toán "mod" để kiểm tra xem co chia hết cho 2 hay không. Số chẵn, lẽ cũng tương tự như thế

#Chuc_ban_hoc_tot

#Neu_khong_hieu_ban_hoi_lai_nhe

Câu 1: Nếu 1 số nguyên thì chắc chắn sẽ chia hết cho 2 ( nhưng còn tùy thuộc vào số đó là chẵn hay lẻ )

Câu 2: Tùy theo cậu nhập số nguyên n đó là chẵn hay lẽ

  + Nếu chẵn thì nó sẽ ra chẵn

  + Nếu lẻ thì nó sẽ ra lẻ

#xinctlhn

#chucbanhoctot^^

#TTLD Shinichi Kudou#

~~~~~~~~~~Munz~~~~~~~~~~