Заказы на доработку 1С (сервис удаленной работы)

Хранилище

База знаний
Неназначенных незавершенных заказов: 1
Бесплатные отчеты, обработки, конфигурации, внешние компоненты для 1С Статьи, описание работы, методики по работе с 1С

Здравствуйте, гость ( Вход | Зарегистрироваться )



> Самое длинное слово в строке , поиск в самого длинного слова в массиве          
cao0603 Подменю пользователя
сообщение 27.06.17, 19:36
Сообщение #1

Говорящий
***
Группа: Пользователи
Сообщений: 75
Спасибо сказали: 0 раз
Рейтинг: 0

имеется массив слов,как найти самое длинное среди них, пожалуйста помогите

cao0603 @ Сегодня, 20:28 * ,
уже нашел решение,

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

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

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

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


если у кого то есть решение получше пишите, посмотрим

andr_andrey Подменю пользователя
сообщение 28.06.17, 14:34
Сообщение #2

Почти ветеран
Иконка группы
Группа: Местный
Сообщений: 626
Спасибо сказали: 166 раз
Рейтинг: 130.8

Цитата(cao0603 @ 27.06.17, 20:36) *
имеется массив слов

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


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


Signature
#define private public
enum BOOL { FALSE, TRUE, FILENOTFOUND } is made my day

Спасибо сказали: awp,

nik389 Подменю пользователя
сообщение 04.07.17, 20:59
Сообщение #3

Завсегдатай
****
Группа: Пользователи
Сообщений: 158
Из: Украина
Спасибо сказали: 38 раз
Рейтинг: 35


 ! 

Правила: 16
 


Сообщение отредактировал logist - 05.07.17, 0:08

Не нашли ответа на свой вопрос?
Зарегистрируйтесь и задайте новый вопрос.


Ответить Новая тема
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 

RSS Текстовая версия Сейчас: 16.04.24, 23:14
1С Предприятие 8.3, 1С Предприятие 8.2, 1С Предприятие 8.1, 1С Предприятие 8.0, 1С Предприятие 7.7, Литература 1С, Общие вопросы по администрированию 1С, Методическая поддержка 1С - всё в одном месте: на Украинском 1С форуме!