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