Bài 11: Kiểu mảng

Ngoc Anh Nguyen

viết chương trình nhập từ bàn phím 1 mảng 1 chiều N (N<=200). Tính và in ra màn hình tổng số chẵn trong mảng

Minh Lệ
15 tháng 5 2021 lúc 21:38

Program HOC24;

var i,n: integer;

a: array[1..200] of integer;

t: longint;

begin

write('Nhap N: '); readln(n);

for i:=1 to n do

begin

write('a[',i,']='); readln(a[i]);

end;

t:=0;

for i:=1 to n do if a[i] mod 2=0 then t:=t+a[i];

write('Tong cac so chan trong mang la: ',t);

readln

end.


Các câu hỏi tương tự
Ngoc Anh Nguyen
Xem chi tiết
Ngoc Anh Nguyen
Xem chi tiết
nông thị ngân
Xem chi tiết
nguyễn hoàng long
Xem chi tiết
Ken Kaneki
Xem chi tiết
Nguyễn tiên
Xem chi tiết
Ngoc Huyen
Xem chi tiết
Nguyen Loi
Xem chi tiết
Benny
Xem chi tiết