SP

Nhập số N nguyên dương đếm các số chẳn của N

H9
16 tháng 3 2023 lúc 19:47

Uses crt;

var n,i,g: integer;

begin clrscr;

readln(n);

g:=0;

for i:=1 to n do if(i mod 2 =0) then g:=g+1;

write(n,' ');

readln;

end.

Bình luận (2)

Các câu hỏi tương tự
TP
Xem chi tiết
TP
Xem chi tiết
HC
Xem chi tiết
TP
Xem chi tiết
VT
Xem chi tiết
HT
Xem chi tiết
GL
Xem chi tiết
LH
Xem chi tiết
IT
Xem chi tiết