имеется массив слов,как найти самое длинное среди них, пожалуйста помогите
cao0603 @ Сегодня, 20:28
,
уже нашел решение,
МассивЧисел = Новый Массив(3);
МассивЧисел[0] = 234;
МассивЧисел[1] = 100;
МассивЧисел[2] = 54;
ИндексМаксимальногоЭлемента = -1;
ЗначениеМаксимальногоЭлемента = -Pow(2, 31); // Значение, заведомо меньшее любого элемента в массиве.
Для Индекс = 0 По МассивЧисел.Количество() - 1 Цикл
Если МассивЧисел[Индекс] > ЗначениеМаксимальногоЭлемента Тогда
ЗначениеМаксимальногоЭлемента = МассивЧисел[Индекс];
ИндексМаксимальногоЭлемента = Индекс;
КонецЕсли;
КонецЦикла;
Если ИндексМаксимальногоЭлемента >= 0 Тогда
Сообщить("Значение максимального элемента равно " +
Строка(ЗначениеМаксимальногоЭлемента) +
" . Его индекс в массиве равен " +
Строка(ИндексМаксимальногоЭлемента)
);
КонецЕсли;
если у кого то есть решение получше пишите, посмотрим