Question

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

Answer 1

PascalABC.NET 3.4.2, сборка 1814 от 02.10.2018

begin

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

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

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

end.