begin

 var a := 123456;

 var s := a.ToString;

 var Sum := s.Aggregate(0, (s, x) -> s + x.toDigit);

 Print(Sum, Sum / s.Length)

end.