Паскаль.
Дано натуральное число N, вещественные числа X1,X2...Xn, где n - кол-во чисел. Найти среднее и наименьшее.
Дано натуральное число N, вещественные числа X1,X2...Xn, где n - кол-во чисел. Найти среднее и наименьшее.
More Questions From This User See All
Answers & Comments
Внимание! Если программа не работает, обновите версию!
begin
var a:=SeqRandom(ReadInteger('n='),-99,99).Select(t->0.1*t).ToArray;
a.Println;
Writeln('Среднее ',a.Average:0:4,', минимум ',a.Min)
end.
Пример
n= 15
2.8 -7.8 1.7 0.2 8.7 1.9 -6.3 -6.4 -0.2 5.4 -7.3 5.7 -8 -3.3 9.2
Среднее -0.2467, минимум -8