Question

64.Дано натуральное число n и действительные числа a1,a2,,...,an. Найти b равное среднему арифметическому чисел a1,а2,...ап. И наибольшее отклонение от среднего, т.е. max(a1, -b,a2 -b,...an - b)

Answer 1

##

var n := ReadInteger;

var a := ReadArrInteger(n);

var b := a.Average;

var d := a.Select(t -> t - b).Max;

Print(b, d)