Những câu hỏi liên quan
Nguyenngochang
Xem chi tiết
Ngochang99
Xem chi tiết
Lê Thị Vân Anh
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.

Anh Nguyễn
Xem chi tiết
Bàn Chàn Khuân
Xem chi tiết
Bùi Thị Phương Nga
Xem chi tiết
Nguyên Đăng
Xem chi tiết
đặng thị thúy uyên
Xem chi tiết
Trần Gia Đạo
26 tháng 12 2016 lúc 19:50

Phần trăm hs yếu :

100% - (50% + 30% + 15%) = 5%

Vì 20<38 và (20 : 100) nhân với 50; 30; 15; 5 có kết quả là số tự nhiên

Nên Sô học sinh cả lớp là 20 hs 

Vậy số hs khá là :

20 x 50 : 100 = 10 hs

đặng thị thúy uyên
26 tháng 12 2016 lúc 19:30

ai nhanh dc k

đặng thị thúy uyên
26 tháng 12 2016 lúc 19:31

AI NHANH DC K NHÉ