var a,b,c:integer; s:real;beginwriteln('Vvedite abc');read(a,b,c);s:=(a+b+c)/3;writeln('Srednee arifmeticheskoe 3 chisel = ',s);end.
var a,b,c:integer;
s:real;
begin
writeln('Vvedite abc');
read(a,b,c);
s:=(a+b+c)/3;
writeln('Srednee arifmeticheskoe 3 chisel = ',s);
end.