K
Khách

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.

15 tháng 10 2021

#include <bits/stdc++.h>

using namespace std;

long long i,dem,t;

double tbc;

int main()

{

dem=0;

t=0;

for (i=5; i<=500; i++)

if (i%5==0) 

{

dem++;

t=t+i;
}

tbc=(t*1.0)/(dem*1.0);

cout<<fixed<<setprecsion(2)<<tbc;

return 0;

}

15 tháng 10 2021

bạn viết bình thường giúp mình với ,mình xem chả hiểu j

21 tháng 10 2021

#include <bits/stdc++.h>

using namespace std;

long long n,i,t;

int main()

{

cin>>n;

t=0;

for (i=1; i<=n; i++)

if (i%3==0) t=t+i;

cout<<t;

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;

}

20 tháng 3 2023

tong = 0

for i in range(1, 101):

     if i % 3 == 0 and i % 5 == 0:

          tong += i

print("Tổng các số chia hết cho 3 và 5 trong phạm vi từ 1 đến 100 là", tong)

26 tháng 10 2021

#include <bits/stdc++.h>

using namespace std;

long long n,i,x,t,dem;

int main()

{

cin>>n;

dem=0;

t=0;

for (i=1; i<=n; i++)

{

cin>>x;

if (x%2!=0) 

{

dem++;

t=t+x;

}

}

double s=t*1.0/dem*1.0;

cout<<fixed<<setprecision(2)<<s;

return 0;

}

27 tháng 10 2021

Thuật toán liệt kê:

Bước 1: Nhập n và dãy A1,A2,..,An

Bước 2: TB←0; i←1; d←0;

Bước 3: Nếu i>n thì in ra TB/d và kết thúc

Bước 4: Nếu Ai mod 2=1 thì TB←TB+Ai và d←d+1;

Bước 5: i←i+1, quay lại bước 3

5 tháng 4 2023

program Dem_Chia_Het;
var s, i: longint;
begin
  s := 0;
  for i := 10 to 2000 do
  begin
    if i mod 297 = 0 then // Kiểm tra chia hết cho 9, 3, 11
      s := s + 1;
  end;
  writeln('So luong cac so chia het cho 9, 3 va 11 la: ', s);
end.

 

6 tháng 4 2023

count = 0

for i in range(10, 2001):

     if i % 3 == 0 and i % 9 == 0 and i % 11 == 0:

          count += 1

print(count)

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.