binary_search.os

// Текст задачи: написать алгоритм бинарного поиска в отсортированном массиве элементов.

Функция БинарныйПоиск(ИскомыйЭлемент, ИсходныйМассив)
	НижняяГраница = 0;
	ВерхняяГраница = ИсходныйМассив.Количество() - 1;
	
	Пока НижняяГраница <= ВерхняяГраница Цикл
		СерединаИндекс = Цел((НижняяГраница + ВерхняяГраница) / 2);
		Догадка = ИсходныйМассив[СерединаИндекс];
		
		Если ИскомыйЭлемент = Догадка Тогда
			Возврат СерединаИндекс;
		ИначеЕсли ИскомыйЭлемент < Догадка Тогда
			ВерхняяГраница = СерединаИндекс - 1;
		Иначе
			НижняяГраница = СерединаИндекс + 1;
		КонецЕсли;
	КонецЦикла;
	
	Возврат -1; // Если ничего не нашлось, то возвращаем "индекс" -1, что означает "ничего".
	
КонецФункции

// Проверка работы функции.

НовыйМассив = Новый Массив;
НовыйМассив.Добавить(30);
НовыйМассив.Добавить(-60);
НовыйМассив.Добавить(25);
НовыйМассив.Добавить(19);
НовыйМассив.Добавить(103);

Сообщить(БинарныйПоиск(25, НовыйМассив));
Сообщить(БинарныйПоиск(100, НовыйМассив));