Bài 9. Làm việc với dãy số

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Phan Hùng Anh

Viết chương trình nhập mảng A gồm N phần tử (tối đa 50 phần tử) a) Nhập các giá trị cho các phần tử của mảng. b) In phần tử là số chẵn có trong mảng và cho biết tổng của các số chẵn đó.

Minh Lệ
2 tháng 5 2023 lúc 20:48

Program HOC24;

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

i,n: byte;

t: longint;

begin

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

for i:=1 to n do

begin

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

end;

write('Cac phan tu chan trong mang la: ');

for i:=1 to n do

if a[i] mod 2=0 then

begin

write(a[i],' ');

t:=t+a[i];

end;

writeln;

write('Tong cac phan tu chan trong day la: ',t);

readln

end.


Các câu hỏi tương tự
Thị Na Trần
Xem chi tiết
lê sơn
Xem chi tiết
Ánh sao
Xem chi tiết
Ánh sao
Xem chi tiết
Bửu Nguyễn Đắc
Xem chi tiết
Ánh sao
Xem chi tiết
Nguyen Bảo Nhi
Xem chi tiết
Vân Nguyễn
Xem chi tiết
Đặng Nguyễn Hoài Băng
Xem chi tiết