Nhập vào một dãy N số nguyên A1,A2,...,AN (N≤10000,|Ai|≤109). Hãy in ra màn hình Trung bình cộng các phần tử âm. Dữ liệu vào: Dòng đầu tiên chứa số N Dòng thứ 2 chứa N số nguyên A1,A2,...,AN. Kết quả: In ra Trung bình cộng các phần tử âm lấy 2 số lẻ sau phần thập phân, nếu trong dãy không có số âm nào thì in ra −1. Sample Input Copy 7 7 6 -4 19 -22 51 -82 Sample Output Copy -36.00 https://lqdoj.edu.vn/problem/av04
2 câu trả lời
Đã test.
=======================
s = 0
d = 0
n = int(input())
a = str(input())
a = a.split()
for i in a:
i = int(i)
if i < 0:
s += i;
d += 1;
if d == 0:
print(-1)
else:
print("{:.2f}".format(s/d))
uses crt;
var a:array[1..10000]of integer;
n,i,t,dem:integer;
begin
clrscr;
repeat
write('nhap n='); readln(n);
until (0<n) and (n<10000);
for i:=1 to n do
begin
repeat
write('a[',i,']='); readln(a[i]);
until (a[i]<=109);
end;
t:=0;
dem:=0;
for i:=1 to n do
if a[i]<0 then
begin
t:=t+a[i];
inc(dem);
end;
writeln('trung bình cộng của các số là : ',t/dem:4:2);
readln;
end.
học tốt ạ !!!!!!
nếu được xin hay nhất ạ !!