Question

Дано шестизначное число А. Найти сумму цифр числа и среднее арифметическое.
ПАСКАЛЬ!

Answer 1

begin

 var a := 123456;

 var s := a.ToString;

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

 Print(Sum, Sum / s.Length)

end.