Cho trước một số nguyên a hãy viết thuật toán cho biết số đó là số chẵn hay số lẻ
2 câu trả lời
Program Kiem_tra_am_duong;
Uses Crt;
begin
clrscr;
real(b);
If a > 0 then write ('Do la so duong');
If a < 0 then write ('Do la so a
Program Kiem_tra_am_duong;
Uses Crt;
begin
clrscr;
real(b);
If a > 0 then write ('Do la so duong');
If a < 0 then write ('Do la so a