Cho dãy A gồm N số a1, a2,..., aN. Viết bài toán tính trung bình cộng các số chẵn trong dãy. Giúp em với ạ, em cần gấp ạ

tang2004

2 năm trước

Loga Sinh Học lớp 12

0 lượt thích 15 xem

1 trả lời

Thích Trả lời

lvdtthuong02

program ct;

uses crt;

vaar A:array[1..1000] of real;

i,N:integer;

Tb,S:real;

begin clrscr;

write('Nhap so phan tu N: '); readln(N);

for i:=1 to N do

begin

writeln('Nhap phan tu thu ',i,': '); readln(A[i]);

end;

S:=0; Tb:=0;

for i:=1 to N do

if A[i] mod 2=0 then

begin

S:=S+1; Tb:=(Tb+A[i])/S;

end;

writeln('Trung binh cong cac so chan trong day la: ',Tb:4:2);

readln;

end.

Học tốt!

Vote (0) Phản hồi (0) 2 năm trước

Thangnam1

Program tinh_tbc;

Uses crt;

Var A : array [1..150] of integer;

S,i,n,d : integer;

Tbc : real;

Begin

Write ('nhap n=');

Readln (n);

For i:=1 to n do

Begin

Write ('nhap phan tu thu ',i,'=');

Readln (A[i]);

end;

S:=0;

d:=0;

For i:=1 to n do

If A[i] mod 2= 0 then

Begin

d:=d+1;

S:=S+A[i];

end;

Tbc:=S/d;

Writeln ('Trung binh cong cua day la:', Tbc:8:3);

Readln

End.

Vote (0) Phản hồi (0) 2 năm trước

Các câu hỏi liên quan

Đề:hãy viết bài văn nghj luận về lòng khoan dung con người

Nhớ làm hết nha( làm ko hết thì mk ko tick đâu) Complete the second sentence so that it has similar meaning to the first sentence 1. It is my sister's eighteenth birthday next week. -> My sister will... 2. Mai likes reading science books very much -> Mai is very... 3. Learning about recycling is fun -> It's ... AI ĐÚNG MK TICK BẰNG 3 NICK!!!!!!!!!!!!!!!!!!!!!!!!!

Giải giúp mình vd2 bài 6 và bài 10 vd1 vs

ĐỀ BÀI ạ : "Cho 20,16 gam hỗn hợp X gồm Fe, Cu, Mg tác dụng với dung dịch H2SO4 loãng dư thì thu được 8,064 lít khí (ở đktc). Mặt khác nếu cho 0,4 mol hỗn hợp X tác dụng với khí Cl2 dư thì thấy có 10,08 lít khí Cl2 (đktc) tham gia phản ứng. Tính khối lượng từng kim loại trong 20,16 gam hỗn hợp X." Giúp mình với ạ!!!!! Mình đang bí quá không biết giải sao nữa! Cảm ơn thật thật nhiều ạ!!!1

cho hình lập phương ABCD .A'B'CD' có độ dài cạnh a bằng ăcn 2 .Tính góc giữa 2 đường thẳng AC và DA' . Cm AC' vuông góc vơiBDA'

Nêu hiện tượng, giải thích thí nghiệm,: cho 1 mẫu Kim loại Nari vào cốc nước 2 trình bày ppHH nhận biết các gói bột màu trắng bị mất nhãn:k2o,Cao, p2o5,Al2o3 và NaCl

1pho từ là j?có mấy loại phó từ?Vd? 2. Các biện pháp tu từ: -khái niệm, tác dụng,VD -phát hiện các biện pháp tu từ trong các vb lớp 6 3.nêu khái niệm, đặc điểm của câu trần thuật đơn có từ là và ko có từ là

Cho x,y>0 thõa mãn x+2y lớn hơn hoặc bằng 5. Tìm giá trị nhỏ nhất của H= x^2+ 2y^2+ 1/z +24/y giúp mk bài dưới nhé

Một nhiệt lượng kế chứa 1,5l nước ở nhiệt độ 25 độ C. Hỏi nước nóng lên tới bao nhiêu độ nếu bỏ vào nhiệt lượng kế một quả cân bằng đồng khối lượng 0,8g được nung nóng tới 120 độ C. Cho nhiệt dung riêng của đồng là 380J/kg.K và của nước là 4200J/kg.k. Bỏ qua nhiệt lượng truyền cho nhiệt lượng kế và môi trường bên ngoài.

Giải gấp giúp mình nhé Vài toán hình Có một bài

Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến