Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 11.04.2016, 21:39   #1
feyka
Новичок
Джуниор
 
Регистрация: 22.02.2016
Сообщений: 3
По умолчанию Бинарный поиск

нужно определить какой из алгоритмов правильный(может быть несколько правильных)
при бинарном поиске в массиве 0 или 1
A.
низ:= 1;
верх := field size;
repeat
mid := (н+ в) div 2;
if searh > field[mid] then
низ := mid + 1;
if searh < field[mid] then
верх := mid - 1;
found := (Searh value = field[Mid])
until found or (низ> верх);

B.
низ:= 1;
верх := field size;
repeat
mid := (н+ в) div 2;
if searh > field[mid] then
низ := mid
else
верх := mid
found := (Searh value = field[Mid])
until found or (низ>= верх);

C.
found:= false;
низ:= 1;
верх := field size;
while (низ<верх) and not found do
begin
mid := (н+ в) div 2;
if searh > field[mid] then
found: true
else
if searh < field[mid] then
верх := mid - 1
else
низ := mid + 1
end;

D.
found:= false;
низ:= 1;
верх := field size;
while (низ<=верх) and not found do
begin
mid := (н+ в) div 2;
if searh > field[mid] then
found: true
else
if searh < field[mid] then
верх := mid - 1
else
низ := mid + 1
end;

E.
низ:= 1;
верх := field size;
repeat
mid := (н+ в) div 2;
if searh <=field[mid] then
верх := mid - 1;
if searh < =field[mid] then
низ := mid + 1;
until (низ> верх);
found := (Searh value = field[Mid]) ;

Последний раз редактировалось feyka; 12.04.2016 в 00:52.
feyka вне форума Ответить с цитированием
Старый 12.04.2016, 00:59   #2
feyka
Новичок
Джуниор
 
Регистрация: 22.02.2016
Сообщений: 3
По умолчанию

я думаю ответ D
правильно?
feyka вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Помощь в доработке программы на языке паскаль (бинарный поиск, поиск перебором) DimzNOVIchok45 Помощь студентам 0 13.10.2014 20:11
Реализовать два метода поиска строк в массиве: поиск перебором, бинарный поиск на языке Pascal DimzNOVIchok45 Помощь студентам 7 19.09.2014 21:40
Бинарный поиск C++ vladislav23 Помощь студентам 7 01.06.2013 01:06
Бинарный поиск Gendalf Помощь студентам 1 07.07.2007 22:09