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
Phạm Tuấn Kiệt

Viết chương trình cho phép nhập dãy n số nguyên, em hãy: a/ Cho biết trong dãy số vừa nhập có bao nhiêu số chẳn? b/ Tính trung bình cộng các phần tử chẳn? c/ In các phần tử trong dãy ra màn hình theo chiều dọc? Giúp với ạ

Minh Lệ
2 tháng 5 2023 lúc 21:09

Program HOC24;

var d,i,n: integer;

t: real;

begin

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

for i:=1 to n do 

begin

write('Nhap so thu ',i,': '); readln(a[i]);

end;

d:=0; t:=0;

for i:=1 to n do

if a[i] mod 2=0 then 

begin

d:=d+1;

t:=t+a[i];

end;

t:=t/d;

writeln('Co ',d,' so chan trong mang');

writeln('Trung binh cong cac phan tu chan la: ',t:2:5);

write('Cac phan tu trong day theo chieu doc: ');

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

readln

end.


Các câu hỏi tương tự
Hiền Nguyễn
Xem chi tiết
Nhật
Xem chi tiết
Huy Hoang Nguyen
Xem chi tiết
Hùng Cường Nguyễn
Xem chi tiết
Phương Linh
Xem chi tiết
Hồ Thị Ngọc Vy
Xem chi tiết
Hồ Thị Ngọc Vy
Xem chi tiết
minh dương
Xem chi tiết
Mỹ Phượng
Xem chi tiết