Разместите нашу кнопку!

Новые статьи:

Programming articles

Создание сайтов на шаблонах

Множество вариантов работы с графикой на канве

Шифруем файл с помощью другого файла

Перехват API функций - Основы

Как сделать действительно хороший сайт

Создание почтового клиента в Delphi 7

Применение паскаля для решения геометрических задач

Управление windows с помощью Delphi

Создание wap сайта

Операционная система unix, термины и понятия

SQL враг или друг

Возникновение и первая редакция ОС UNIX

Оптимизация проекта в Delphi

Ресурсы, зачем нужны ресурсы

Термины программистов 20 века

Советы по созданию собственного сайта с нуля

Шифруем файл с помощью пароля

Фракталы - геометрия природы

Crypt - Delphi программа для шифрования

Рассылка, зачем она нужна и как ее организовать?

Учебник по C++ для начинающих программистов

Уроки для изучения ассемблера

Загадочный тип PCHAR

Средства по созданию сайтов

Операторы преобразования классов is и as

Borland Developer studio 2006. Всё в одном

Создание базы данных в Delphi, без сторонних БД


Software engineering articles



Sum

Находит сумму элементов массива, состоящего из чисел с плавающей точкой

Описание:

    Функция Sum подсчитывает сумму элементов в переданном массиве Numbers, состоящего из чисел типа Double.

Пример кода:

var
   doubles : array[0..5] of double;

begin
   // Fill up the number array
   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('Sum of array values='+FloatToStr(Sum(doubles)));
   ShowMessage('12.3 + 45.6 = '+FloatToStr(Sum([12.3, 45.6])));
end;

Результат выполнения:

Sum of array values = 134.375
12.3 + 45.6 = 57.9