В массиве из 10 целых чисел вычислить разность между наибольшим элементом и средним арифметическим всех элементов массива Паскаль !
В массиве из 10 целых чисел вычислить разность между наибольшим элементом и средним арифметическим всех элементов массива
Паскаль !
Гость
Ответ(ы) на вопрос:
Гостьvar ma,sum,x:real;
i:int64;
begin
for i:=1 to 10 do begin
read(x);
sum:=sum+x;
if ma
Гость// PascalABC.NET 3.1, сборка 1250 от 28.05.2016
begin
var a:=ArrRandom(10,20,25); a.Println;
Writeln(a.Max-a.Average)
end.
Тестовое решение
23 25 25 23 23 24 20 23 25 21
1.8
Не нашли ответ?
Похожие вопросы