Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
uses crt;
var a:array[1..100]of integer;
i,n,t:integer;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
t:=0;
for i:=1 to n do
if a[i] mod 5=0 then
begin
write(a[i]:4);
t:=t+a[i];
end;
writeln;
writeln('Tong cac phan tu chia het cho 5 la: ',t);
readln;
end.
2:
#include <bits/stdc++.h>
using namespace std;
int i,dem,s;
int main()
{
dem=0;
s=0;
for (i=1; i<=100; i++)
if (i%2==0)
{
dem++;
s=s+i;
}
cout<<fixed<<setprecision(2)<<(s*1.0)/(dem*1.0);
return 0;
}
#include <bits/stdc++.h>
using namespace std;
long long a[10000],i,n,t;
int main()
{
freopen("avg.inp","r",stdin);
freopen("avg.out","w",stdout);
cin>>n;
for (i=1; i<=n; i++) cin>>a[i];
t=0;
for (i=1; i<=n; i++) t+=a[i];
cout<<fixed<<setprecision(1)<<(t*1.0)/(n*1.0);
return 0;
}
a: #incldue <bits/stdc++.h>
using namespace std;
long long i,n,x,t;
int main()
{
cin>>n;
t=0;
for (i=1; i<=n; i++)
{
cin>>x;
if (x>0) t=t+x;
}
cout<<t;
return 0;
}