Помощь - Поиск - Пользователи - Календарь
Полная версия этой страницы: Самое длинное слово в строке
Украинский 1С форум: всё про 1С 8.3, 1С 8.2, 1С 8.1, 1С 8.0, 1С 7.7 > Программисту > Программирование в 1С Предприятие 8.2 > Программирование обычных форм 1С 8.2 и не интерфейсной логики
cao0603
имеется массив слов,как найти самое длинное среди них, пожалуйста помогите

cao0603 @ Сегодня, 20:28 необходимо зарегистрироваться для просмотра ссылки ,
уже нашел решение,

МассивЧисел = Новый Массив(3);
МассивЧисел[0] = 234;
МассивЧисел[1] = 100;
МассивЧисел[2] = 54;

ИндексМаксимальногоЭлемента = -1;
ЗначениеМаксимальногоЭлемента = -Pow(2, 31); // Значение, заведомо меньшее любого элемента в массиве.

Для Индекс = 0 По МассивЧисел.Количество() - 1 Цикл
    Если МассивЧисел[Индекс] > ЗначениеМаксимальногоЭлемента Тогда
        ЗначениеМаксимальногоЭлемента = МассивЧисел[Индекс];
        ИндексМаксимальногоЭлемента = Индекс;
    КонецЕсли;
КонецЦикла;

Если ИндексМаксимальногоЭлемента >= 0 Тогда
    Сообщить("Значение максимального элемента равно " +
        Строка(ЗначениеМаксимальногоЭлемента) +
        " . Его индекс в массиве равен " +
        Строка(ИндексМаксимальногоЭлемента)
    );
КонецЕсли;


если у кого то есть решение получше пишите, посмотрим
andr_andrey
Цитата(cao0603 @ 27.06.17, 20:36) необходимо зарегистрироваться для просмотра ссылки
имеется массив слов

А в алгоритме
МассивЧисел = Новый Массив(3);
МассивЧисел[0] = 234;
МассивЧисел[1] = 100;
МассивЧисел[2] = 54;


Это какой-то - позор (с)
nik389

 ! 

необходимо зарегистрироваться для просмотра ссылки: 16
 
Для просмотра полной версии этой страницы, пожалуйста, пройдите по ссылке.