Облака / Clouds
    Go to Copy.com
    Copy.com
    The bast cloud service
    Get 20 GB free!!!
    Support WebDav.
    Show more >>

    Go to Dropbox.com
    Dropbox.com
    time-tested cloud storage
    Support WebDav.
Все бесплатно
    Все ссылки на файлы, расположенные на страницах сайта, добавлены пользователями и доступны для бесплатного скачивания. За содержание этих файлов администрация сайта ответственности не несет.



Вопросы
  Преобразовать любой тип в строку
   Категория: Текст и строки
  Упаковка ZIPTV
   Категория: Компоненты
  Узнать запущен ли сервис FireBird
   Категория: Интернет и Сети
  Список ошибок BDE
   Категория: Базы данных
  Как создать ярлык
   Категория: Приложение
  Компоненты Panel, GroupBox, Bevel, ScrollBox, Splitter
   Категория: Компоненты
  Группировка TopAdvGrid
   Категория: Компоненты
  Поставить пароль на Paradox
   Категория: Базы данных
  Добавить данные в EXE файл и получить их
   Категория: Файловая система
  Listbox - элементы вверх-вниз
   Категория: Компоненты

Delphi - Справочник: Sum

ABCDEFGHIJKLMNOPQRSTUVWXYZ

  << Вернуться  

 Sum
function Sum ( const Numbers : array of Double ) : Double;
Функция (Unit Math)
Находит сумму элементов массива, состоящего из чисел с плавающей точкой
Описание:
Функция Sum подсчитывает сумму элементов в переданном массиве Numbers, состоящего из чисел типа Double.
Пример кода: Примеры суммирования массивов и установленного значения

var ` begin // Заполните массива чисел doubles[0] := 25.0; doubles[1] := 100.5; doubles[2] := -4.125; doubles[3] := 75.0; doubles[4] := -62.0; doubles[5] := 0.0; ShowMessage('Сумма значений массива = '+FloatToStr(Sum(doubles))); ShowMessage('12.3 + 45.6 = '+FloatToStr(Sum([12.3, 45.6]))); end;

Результат:
Сумма значений массива = 134.375
12.3 + 45.6 = 57.9

  << Вернуться