Дано шестизначное число А. Найти сумму цифр числа и среднее арифметическое.

begin

 var a := ReadString('num->').JoinIntoString(' ').ToIntegers;

 Println('Сумма =', a.Sum);

 Println('Сред. арифм =', a.Average);

end.