viết chương trình kiểm tra từ 1 đến n có bao nhiêu số chẳn và lẻ
K
Khách
Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
Những câu hỏi liên quan
Program HOC24;
var i,n,d,d1: integer;
begin
write('Nhap n: '); readln(n);
for i:=1 to n do
if i mod 2=0 then d:=d+1 else d1:=d1+1;
writeln('Co ',d,' so chan');
write('Co ',d,' so le');
readln
end.