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.

23 tháng 8 2023

A = [170, 175, 160, 180, 165] # ví dụ dãy số đo chiều cao của lớp

n = len(A) # số lượng học sinh trong lớp

tong_chieu_cao = sum(A) # tổng số đo chiều cao của cả lớp

trung_binh_chieu_cao = tong_chieu_cao/n # số đo chiều cao trung bình của cả lớp

so_hs_tren_tb = 0 # số học sinh có chiều cao lớn hơn chiều cao trung bình của cả lớp

for i in range(n):

  if A[i] > trung_binh_chieu_cao:

   so_hs_tren_tb += 1

print("Số đo chiều cao trung bình của cả lớp là:", trung_binh_chieu_cao)

print("Số bạn có chiều cao lớn hơn chiều cao trung bình của cả lớp là:", so_hs_tren_tb)

tham khảo!

uses crt;

var a:array[1..14]of real;

i,n:integer;

t:real;

begin

clrscr;

write('Nhap so mon hoc='); readln(n);

for i:=1 to n do 

begin

repeat

write('A[',i,']='); readln(a[i]);

until (0<=a[i]) and (a[i]<=10);

end;

for i:=1 to n do 

  write(a[i]:4:2,' ');

t:=0;

for i:=1 to n do 

  t:=t+a[i];

writeln('Diem trung binh mon la: ',t/n:4:2);

if t>=5 then writeln('Duoc len lop')

else writeln('Thi lai');

readln;

end.

a: 

#include <bits/stdc++.h>

using namespace std;

double tbc,x;

long long n,i;

int main()

{

cin>>n;

tbc=0;

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

{

cin>>x;

tbc=tbc+x;

}

cout<<fixed<<setprecision(2)<<tbc/(n*1.0);

return 0;

}

17 tháng 12 2021

bạn ơi bn làm bằng pascal với đc ko

 

7 tháng 5 2023

program TinhTBCTimSoNT;

var
  ten, lop: string;
  n, i, tong, dem: integer;
  A: array [1..11] of integer;
  trung_binh: real;

function LaSoNguyenTo(x: integer): boolean;
var
  i: integer;
begin
  if x < 2 then
    LaSoNguyenTo := false
  else if x = 2 then
    LaSoNguyenTo := true
  else if x mod 2 = 0 then
    LaSoNguyenTo := false
  else
  begin
    i := 3;
    while (i <= trunc(sqrt(x))) and (x mod i <> 0) do
      i := i + 2;
    LaSoNguyenTo := x mod i <> 0;
  end;
end;

begin
  // Nhập tên và lớp của học sinh
  write('Nhập tên của học sinh: ');
  readln(ten);
  write('Nhập lớp: ');
  readln(lop);

  // Nhập dãy số nguyên và tính trung bình cộng
  repeat
    write('Nhập số phần tử của dãy số (n<12): ');
    readln(n);
  until n < 12;
  tong := 0;
  for i := 1 to n do
  begin
    write('Nhập phần tử thứ ', i, ': ');
    readln(A[i]);
    tong := tong + A[i];
  end;
  trung_binh := tong / n;

  // In tên, lớp, dãy số và trung bình cộng ra màn hình
  writeln('Học sinh: ', ten);
  writeln('Lớp: ', lop);
  write('Dãy số: ');
  for i := 1 to n do
    write(A[i], ' ');
  writeln;
 
  // In các số nguyên tố của dãy số ra màn hình
  writeln('Các số nguyên tố của dãy số:');
  for i := 1 to n do
    if LaSoNguyenTo(A[i]) then
      writeln(A[i]);
end.

7 tháng 10 2021

#include <iostream>
using namespace std;
int main()
{
int a[100], n;
double tong = 0;
cin >> n;
for(int i=1; i<=n; i++)
    cin >> a[i], tong+=a[i];
cout << (double)tong/n << endl;
return 0;
}

Chúc bn học tốt!

30 tháng 12 2020

uses crt;

var a,t,dem:integer;

begin

clrscr;

t:=0;

dem:=0;

repeat

write('Nhap a='); readln(a);

if (a mod 2=0) and (a mod 3=0) then

  begin

    t:=t+a;

dem:=dem+1;

end;

until a=0;

writeln('Trung binh cong cua cac so chia het cho 3 va 2 la: ',t/dem:4:2);

readln;

end.

#include <bits/stdc++.h>

using namespace std;

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

int main()

{

cin>>n;

dem=0;

t=0;

t1=0;

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

{

cin>>x;

t+=x;

if (x>0)

{

dem++;

t1+=x;

}
}

cout<<"So phan tu duong la: "<<dem<<endl;

cout<<"Tong cac so duong la: "<<t1<<endl;

cout<<"Trung binh cong cua day la: "<<fixed<<setprecision(2)<<(t*1.0)/(n*1.0)<<endl;

cout<<"Trung binh cac so duong la: "<<fixed<<setprecision(2)<<(t1*1.0)/(dem*1.0);

return 0;

}

QT
Quoc Tran Anh Le
Giáo viên
21 tháng 8 2023

#include <bits/stdc++.h>

using namespace std;

int main()

{

int a[6] = {5, 4, 3, 2, 1, 0};

sort(a, a + 6);// thu được 0 1 2 3 4 5

//sort(a + 2, a + 5);thu được 5 4 1 2 3 0

vector a = {5, 4, 3, 2, 1, 0};

sort(a.begin(), a.end()); // thu được 0 1 2 3 4 5

return 0;

}