program mittle;

uses
  lowlevelunit, SysUtils;

var
  Zeile:             ansiString;
  Zahl,Summe,QSumme: extended;
  Anzahl:            longint;

begin

while not eof do begin
  readln(Zeile);

  Anzahl:=0;
  Summe:=0;
  QSumme:=0;

  write(erstesArgument(Zeile,' ',false));
  while Zeile<>'' do begin
    inc(Anzahl);
    Zahl:=strToFloat(erstesArgument(Zeile,' ',false));
    Summe:=Summe+Zahl;
    QSumme:=QSumme+sqr(Zahl);
  end;
  writeln(' '+floatToStr(Summe/Anzahl)+' '+floatToStr(sqrt(QSumme/Anzahl-sqr(Summe/Anzahl))));

end;

end.