I. МАТЕМАТИЧЕСКИЕ ФУНКЦИИ И ПРОЦЕДУРЫ
5. Операции над числовыми массивами
Функция SumOfSquares (
const Data: array of Double ): Extended;
Модуль: Math
Описание Фнкция возвращает сумму квадратов всех значений числового массива Data:
Data[0]*Data[0] + Data[1]*Data[1] + ... Data[length(Data)-1]*Data[length(Data)-1].
Пример
var
Mas: array of Integer;
SumSqr: Extendes;
I: Integer;
begin
...
SetLength(Mas, 10);
for i:= 0 to 9 do Mas[i]:= i/10;
SumSqr:= SumOfSquares(Mas); { SumSqr:=2.85 }
...
end;
[Вернуться к содержанию]
|