Viết chương trình nhập từ bàn phím số nguyên dương n và dãy A gồm n số nguyên dương A1, A2,...,An, sau đó in ra màn hình trung bình cộng các phần tử chẵn trong dãy A.

quaythuhoa123

2 năm trước

Loga Sinh Học lớp 12

0 lượt thích 21 xem

1 trả lời

Thích Trả lời

Thanh2110

program ct;

uses crt;

var i,n,S:integer; tbc:real;

A:array[1..100] of integer;

begin

clrscr;

write('nhap n:=');readln(n);

for i:=1 to n do

begin

write('nhap mang A[',i,']:=');readln(A[i]);

end;

S:=0;

for i:=1 to n do

if A[i] mod 2=0 then

begin

S:=S+A[i];

tbc:=S/n;

end;

writeln('trung binh cong cac so chan la:',tbc);

readln

end.

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

datdeptrai

program oken;
uses crt;
var a: array [1..100] of integer;
n,i,dem,s: longint;
begin
clrscr;
write('Nhap so phan tu cua mang: '); readln(n);
s:=0; dem:=0;
for i:=1 to n do
begin
write('A[',i,']: '); readln(A[i]);
if (a[i] mod 2=0) then
begin
s:=s+a[i];
dem:=dem+1;
end;
end;
writeln('TBC cac phan tu chan: ',s/dem:0:3);
readln;
end.

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

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

viết một đoạn văn ngắn bằng tiếng anh về một bộ phim mà bạn yêu thích (sử dụng từ ngữ đơn giản)

Cho tam giác ABC nhọn nội tiếp đường tròn tâm O (AB<AC) Đường cao BF ,CE cắt nhau ở H EF cắt BC tại S ,cắt đường tròn tâm O lần lượt tại M,N Chứng minh: SM.SN =SE.SF

“Phượng vỹ” và “nhành lan tím” được JACK đưa vào bài hát nào?(9 chữ cái)

một thỏi chì có khối lượng 630 gam được đun nóng tới 270 độ c rồi thả vào m Kg nước ở 25 độ C làm cho nước nóng tới 45 độ C A,nhiệt độ thỏi chì khi cân bằng nhiệt là bao nhiêu B,tính nhiệt lượng toa ra của thỏi chì C,tính khối lượng của nước Cần gấp ạ mai thi rồi,cảm ơn trước mọi người

Giải giúp em với mọi người mai em thi rồi

chứng minh rằng tồn tại số tự nhiên toàn số 1 và chia hết cho 17

một người đi bộ từ A với vận tốc 4,5 km/ giờ và đến B lúc 12 giờ . Biết quãng đường AB dài 14,4 km . Hỏi người đó đi từ A lúc mấy giờ , biết dọc đường có dừng lại 40 phút

Cho đg tròn tâm O . Từ M nằm ngoài O kẻ 2 tiếp tuyến MC,MD và cát tuyến MAB (với A,B,C,D thuộc đg tròn và dây AB ko đi qua O, A nằm giữa M và B) gọi I là trung điểm của AB , H là giao điểm của MO và CD. Cm 5 điểm M,O,I,C,D cùng nằm trên 1 đg tròn

Cho tam giác ABC vuông tại A có AB=15 cm, AC=20cm. Qua đỉnh A, vẽ đg thẳng a// BC và vẽ BD lvuông góc vớ a tại D. AB cắt CD tại I . Tính diện tích tam giác BIC ???

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