Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Nguyen Dinh

Viết chương trình đếm các số chẵn trong dãy số nguyên A có N phần tử

Nguyễn Lê Phước Thịnh
8 tháng 4 2022 lúc 9:33

uses crt;

var a:array[1..100]of integer;

i,n,dem:integer;

begin

clrscr;

readln(n);

for i:=1 to n do readln(a[i]);

dem:=0;

for i:=1 to n do

if a[i] mod 2=0 then dem:=dem+1;

writeln(dem);

readln;

end.


Các câu hỏi tương tự
Tuấn Lê
Xem chi tiết
Hiếu Xuân
Xem chi tiết
Nguyễn Anh Quân
Xem chi tiết
Thiên Nhật
Xem chi tiết
ĐOÀN ĐỨC ANH
Xem chi tiết
Trần Gia Bảo
Xem chi tiết
Vy Nguyễn Hà Thảo
Xem chi tiết
Du Ng
Xem chi tiết
Danh Nguyễn
Xem chi tiết