Những câu hỏi liên quan
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

Hương Đinh
Xem chi tiết
Đỗ Đức Duy
2 tháng 3 2022 lúc 19:05

image

Tri Nguyễn
Xem chi tiết
Cihce
22 tháng 5 2022 lúc 18:08

Đề thiếu?

Tiến 4 Hoàng
Xem chi tiết
nguyễn quốc bảo
Xem chi tiết
Nguyễn Lê Phước Thịnh
30 tháng 4 2022 lúc 22:04

uses crt;

const fi='vanban.txt'

var f1:text;

a,b,c,tb:array[1..100]of real;

ln:real;

n,i:integer;

begin

clrscr;

assign(f1,fi); reset(f1);

n:=0;

while not eof(f1) do 

begin

n:=n+1;

readln(a[n],b[n],c[n]);

end;

for i:=1 to n do tb[i]:=(a[i]+b[i]+c[i])/3;

for i:=1 to n do 

writeln(tb[i]:4:2);

ln:=0;

for i:=1 to n do 

  if ln<tb[i] then ln:=tb[i];

writeln(ln:4:2);

close(f1);

readln;

end.

Fan_NeymarJR
Xem chi tiết

Số HS đạt loại khá:

300% x 5= 15(HS)

Tỉ số tổng số HS giỏi so với tổng số HS cả lớp bằng:

1 - 1/2= 1/2 (tổng số HS)

Vậy lớp có số HS giỏi là:

5+15=20(HS)

Số HS của cả lớp là:

20: 1/2= 40(HS)

11. Bùi Đắc Đông Lộc
Xem chi tiết
11. Bùi Đắc Đông Lộc
1 tháng 4 2022 lúc 18:52

Sus help me các step brother!

Minh Lệ
1 tháng 4 2022 lúc 19:29

Program HOC24;

var Toan,Ly,Tin,TBMToan,TBMLy,TBMTin: real;

i,n: byte;

begin

write('Nhap so ban hoc sinh trong lop: '); readln(n);

for i:=1 to n do 

begin

write('Nhap diem Toan; Ly; Tin cua ban thu ',i,': ');

readln(Toan[i],Ly[i],Tin[i]);

end;

TBMToan:=0; TBMLy:=0; TBMTin:=0;

For i:=1 to n do 

begin

TBMToan:=TBMToan+Toan[i];

TBMLy:=TBMLy+Ly[i];

TBMTin:=TBMTin+Tin[i];

end;

writeln('Diem trung binh mon Toan la: ',TBMToan:5:1);

writeln('Diem trung binh mon Ly la: ',TBMLy:5:1);

writeln('Diem trung binh mon Tin la: ',TBMTin:5:1);

For i:=1 to n do

writeln('Diem trung binh 3 mon cua ban thu ',i,' la: ',TBMToan+TBMLy+TBMTin:5:1);

Readln

end.

Bùi Thị Phương Nga
Xem chi tiết
Bàn Chàn Khuân
Xem chi tiết