Массив

[Walter]

День добрый! Столкнулся с задачей, в которой надо определить номер интервала, в который попадает заданное число. Есть код, но дело в том, что там находиться само число, не интервал. Кто может немного помочь, т.к. я пока ещё не надумал.

begin
 i:=0;
  while (i<Length(Mas)-1) and (Mas[i]<>a) do
    i:=i+1;
      if Mas[i]=a then
        ShowMessage('Нaйден № интервала'+IntToStr(i+1))
      else ShowMessage ('Не найден');

[StarWorm]

Напишите полную постановку задачи... Может, в честь Нового Года и решу за бесплатно... если успею и не напьюсь (как настоящий программист) раньше этого!

[Walter]

Отсортировать массив и определить номер интервала, в который попадает заданное число. Например, введён массив 61734 и число 5. Сортируем массив, получаеться 13467. Число 5 попадает в интервал номер 3. Ну с сортировкой у меня проблем не оказалось, вот тока с интервалом нужна помощь... Кто сможет помогите пожалуйста

[puporev]

Запутался в твоих кнопках, повыкидывал половину.
Короче поправил.