PDA

Просмотр полной версии : Как сложить элементы массива



MidnightKiller
22.04.2013, 19:40
Добрый день.

Хочу написать обработку, которая при нажатии кнопки сообщала бы сумму всех элементов массива.
Помогите, как это реализовать а то всю голову уже сломал.




Процедура КнопкаВыполнитьНажатие(Кн� �пка)

А = Новый Массив(5);

а[0] = 1;
а[1] = 2;
а[2] = 9;
а[3] = 8;



Сумма = 0;

Для каждого Элемент из Новый Массив(5) Цикл

Д = Сумма + Элемент;


КонецЦикла;

Сообщить(Д);


КонецПроцедуры

MidnightKiller
22.04.2013, 23:27
Все, разобрался сам. :)

Суммирует между собой элементы массива и сообщает результат.


Кому интересно:



Процедура КнопкаВыполнитьНажатие(Кн� �пка)

МойМассив = Новый Массив(5); //Создание массива размерностью 5

МойМассив[0] = 10;
МойМассив[1] = 1;
МойМассив[2] = 2;
МойМассив[3] = 3;
//Числами проинициализированы первые 4 элемента массива (Т.е. 5й элемент остался не инициализированным)

Сумма = 0;

Для каждого эл из МойМассив Цикл

Если ТипЗнч(эл) = Тип("Число") Тогда //Проверим что элемент массива является числом для математической операции сложения
Сумма = Сумма + эл;
КонецЕсли;

КонецЦикла;

Сообщить(Сумма);

КонецПроцедуры

---------- Post added at 21:27 ---------- Previous post was at 21:27 ----------

Все, разобрался сам. :)

Суммирует между собой элементы массива и сообщает результат.


Кому интересно:



Процедура КнопкаВыполнитьНажатие(Кн� �пка)

МойМассив = Новый Массив(5); //Создание массива размерностью 5

МойМассив[0] = 10;
МойМассив[1] = 1;
МойМассив[2] = 2;
МойМассив[3] = 3;
//Числами проинициализированы первые 4 элемента массива (Т.е. 5й элемент остался не инициализированным)

Сумма = 0;

Для каждого эл из МойМассив Цикл

Если ТипЗнч(эл) = Тип("Число") Тогда //Проверим что элемент массива является числом для математической операции сложения
Сумма = Сумма + эл;
КонецЕсли;

КонецЦикла;

Сообщить(Сумма);

КонецПроцедуры