Những câu hỏi liên quan
Giúp mik vs
Xem chi tiết
Nguyễn Lê Phước Thịnh
8 tháng 3 2022 lúc 6:58

#include <bits/stdc++.h>

using namespace std;

double a[100],t;

int n,i;

int main()

{

cin>>n;

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

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

cout<<"Diem cua ban thu "<<i<<" la: "<<fixed<<setprecision(2)<<a[i]<<endl;

t=0;

for (i=1; i<=n; i++) t+=a[i];

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

return 0;

}

Bình luận (0)
Hương Đinh
Xem chi tiết
Vương Hương Giang
2 tháng 3 2022 lúc 19:19

XEM HÌNH

imagerotate

Bình luận (0)
Hương Đinh
Xem chi tiết
Đỗ Đức Duy
2 tháng 3 2022 lúc 19:05

image

Bình luận (0)
Anh Hoàng
Xem chi tiết
Nguyễn Lê Phước Thịnh
30 tháng 4 2022 lúc 21:58

uses crt;

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

i,n:integer;

ln:real;

begin

clrscr;

readln(n);

for i:=1 to n do readln(a[i]);

for i:=1 to n do writeln(a[i]);

ln:=a[1];

for i:=1 to n do if ln<a[i] then ln:=a[i];

writeln(ln);

readln;

end.

Bình luận (0)
Lê Thị Uyên Hân- MG EaTr...
Xem chi tiết
Võ Thu Hằng
Xem chi tiết
Nguyễn Lê Phước Thịnh
8 tháng 3 2021 lúc 13:53

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.

Bình luận (0)
Trang
Xem chi tiết
Nguyễn Hoàng Duy
21 tháng 3 2023 lúc 21:59

program DiemTrungBinh;
var
  diem: real;
  i, n: integer;
begin
  write('Nhap so luong ban trong lop: ');
  readln(n);
  
  for i := 1 to n do
  begin
    write('Nhap diem trung binh cua ban ', i, ': ');
    readln(diem);
    if diem >= 5 then
      writeln('Diem trung binh cua ban ', i, ' la: ', diem:0:2);
  end;
end.

 

Bình luận (0)
Thuận Ngô
Xem chi tiết
Ngô Bá Hùng
2 tháng 5 2023 lúc 17:34

program DiemTrungBinh;

var
  i, n: integer;
  diem, tong: real;

begin
  n := 40;
  tong := 0;

  for i := 1 to n do
  begin
    write('Nhap diem cua hs ', i, ': ');
    readln(diem);
    tong := tong + diem;
  end;

  writeln('Diem  cua lop la: ', tong / n:0:2);

  readln;
end.

Bình luận (0)
Hương Phạm
Xem chi tiết
Nguyễn Lê Phước Thịnh
19 tháng 12 2021 lúc 23:46

 

 

#include <bits/stdc++.h>

using namespace std;

double a,b,c,tb;

int main()

{

cin>>a>>b>>c;

tb=(a+b+c)/3;

cout<<fixed<<setprecision(1)<<tb<<endl;

if (tb>=8) cout<<"Gioi";

else if ((6.5<=tb) and (tb<8)) cout<<"Kha";

else if ((5<=tb) and (tb<=6.5)) cout<<"Trung Binh";

else cout<<"Chua dat";

return 0;

}

Bình luận (0)