viết chương trình.nhập 10 số nguyên bất kỳ, tính trùng bình cộng của các số lẻ vừa nhập được
2 câu trả lời
a=list(input().split())
t=c=0
for i in a:
i=int(i)
if i%2==1:
t+=i
c+=1
print(t/c)
program bai_giai;
uses crt;
var a:array[1..10]of longint;i,dem,s:longint;tbc:real;
begin
clrscr;
s:=0;
for i:=1 to 10 do
begin
write('a[',i,']=');readln(a[i]);
if(a[i]mod 2<>0)then
begin
s:=s+a[i];
inc(dem);
end;
end;
tbc:=s/dem;
write('trung binh cong cac so le la:',tbc);
readln;
end.
Câu hỏi trong lớp
Xem thêm