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.

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.

#include <bits/stdc++.h>

using namespace std;

double a,b,c,tbc;

int main()
{

cin>>a>>b>>c;

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

cout<<"Tong la:"<<fixed<<setprecision(2)<<a+b+c<<endl;

cout<<"TBC la:"<<fixed<<setprecision(2)<<tbc;

return 0;

}