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.

7 tháng 11 2023

Câu lệnh bổ sung:

for i in nh_d:

    tb = tb + i

loading...

#include <bits/stdc++.h>

using namespace std;

double a[7],b[7],c[7],t;

int dem,i;

int main()

{

for (i=1; i<=7; i++) cin>>a[i]>>b[i];

for (i=1; i<=7; i++) c[i]=(a[i]+b[i])/2;

t=0;

dem=0;

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

{

t+=c[i];

if (c[i]<10) dem++;

}

cout<<"Nhiet do trung binh la: "<<fixed<<setprecision(2)<<t/(7*1.0)<<endl;

cout<<"So ngay nhiet do trung binh nho hon 10 do la: "<<dem;

return 0;

}

24 tháng 3 2021

Bạn ơi giúp mình với chiều nay mình thi rồi

 

Câu 2: 

uses crt;

var a:array[1..100]of integer;

i,n,tb:integer;

begin

clrscr;

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

for i:=1 to n do 

  begin

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

end;

tb:=0;

for i:=1 to n do 

  tb:=tb+a[i];

writeln(tb/n:4:2);

readln;

end.

2 tháng 3 2022

XEM HÌNH

imagerotate

13 tháng 5 2022

Program HOC24;

var i,n: integer;

a: array[1..1000] of integer;

t: real;

begin

write('Nhap so phan tu: '); readln(n);

for i:=1 to n do

begin

write('Nhap so thu ',i,': '); readln(a[i]);

end;

t:=0;

for i:=1 to n do t:=t+a[i];

t:=t/n;

write('Trung binh cong cua day so la: ',t:5:2); 

readln

end.

uses crt;

var a:array[1..100]of integer;

i,n,t:integer;

begin

clrscr;

readln(n);

for i:=1 to n do 

begin

readln(a[i]);

end;

for i:=1 to n do 

  write(a[i]:4);

readln;

t:=0;

for i:=1 to n do 

 t:=t+a[i];

writeln(t/n:4:2);

readln;

end.

uses crt;

var a,b,c:real;

begin

clrscr;

readln(a,b,c);

writeln((a+b+c)/3:4:2);

readln;

end.

6 tháng 1 2023

Program nữa ạ

 

3 tháng 5 2023

program TinhTBC;

uses crt;

var

      N, i: integer;

      Tong, TBC : real;

      A: array[1..100] of real;

begin

      write('Nhap so phan tu mang N = ');

      readln(N);

      writeln('Nhap cac phan tu cua mang: ');

      for i:=1 to N do

      begin

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

            readln(A[i]);

      end;

      Tong := 0;

      for i:=1 to N do

            Tong := Tong + A[i];

      TBC := Tong / N;

      writeln('Tong cac phan tu: ', Tong:5:2);

      writeln('Trung binh cong: ', TBC:5:2);

      readln;

end.

9 tháng 12 2021

var m,n: integer;

begin

    writeln(' nhap so nguyen a: ');

    read(a);

    writeln(' nhap so nguyen b: ');

    read(b);

    writeln((m + n)/2);

    readln;

end.