Если элемент не найден, то вставить его в массив на первое место

@AnyM0re · Регистрация: 24.07.2017

Author24 — интернет-сервис помощи студентам

Сформировать массив а[1..10], упорядоченный по возрастанию. Методом бинарного поиска определить, содержит ли он заданное число. Если элемент не найден, то вставить его в массив на первое место.

@ZX Spectrum-128 · 17.12.2018, 10:36

Сообщение от AnyM0re

Если элемент не найден, то вставить его в массив на первое место.

Аха! А как мы его вставим? Если его нет? (Не найден).

@bormant · 17.12.2018, 10:48

ZX Spectrum-128,
Как-как, сдвинем и потеряем последний.

@ZX Spectrum-128 · 17.12.2018, 10:50

bormant, но его же НЕТ!
?

@bormant · 17.12.2018, 14:44

ZX Spectrum-128,
а искали вы при этом что? Вот что искали и не нашли, то и вставить.

@AnyM0re · 24.12.2018, 16:06 **[ТС]**

Помогите пожалуйста(

@Puporev · 24.12.2018, 16:39

Pascal

var a:array[1..11] of integer;
    n,i,l,r,m,x,i1:integer;
begin
n:=10;
writeln('Исходный массив');
for i:=1 to n do
 begin
  a[i]:=i+2;
  write(a[i]:3);
 end;
writeln;
write('Введите число для поиска x=');
readln(x);
l:=0;
r:=n;
while r-l>1 do
 begin
  m:=(l+r) div 2;
  if x<=a[m] then r:=m else l:=m;
 end;
if a[r]=x then writeln('Число ',x,' в массиве есть, его индекс=',r)
else
 begin
  writeln('Числа ',x,' в массиве нет',i1);
  n:=n+1;
  for i:=n downto 2 do
  a[i]:=a[i-1];
  a[1]:=x;
  writeln('Массив после вставки элемента');
  for i:=1 to n do
  write(a[i]:4);
 end;
end.

Добавлено через 16 минут
В строке 24 уберите ,i1

@AnyM0re 1 / 1 / 1 Регистрация: 24.07.2017 Сообщений: 45
		1
	Если элемент не найден, то вставить его в массив на первое место 16.12.2018, 20:58. Показов 1663. Ответов 6 Метки нет (Все метки) Сформировать массив а[1..10], упорядоченный по возрастанию. Методом бинарного поиска определить, содержит ли он заданное число. Если элемент не найден, то вставить его в массив на первое место. 0

@ZX Spectrum-128 6810 / 4567 / 4819 Регистрация: 05.06.2014 Сообщений: 22,438
	17.12.2018, 10:36	2
	Сообщение от AnyM0re Если элемент не найден, то вставить его в массив на первое место. Аха! А как мы его вставим? Если его нет? (Не найден). 0

@bormant Модератор 7769 / 4598 / 2823 Регистрация: 22.11.2013 Сообщений: 13,076 Записей в блоге: 1
	17.12.2018, 10:48	3
	ZX Spectrum-128, Как-как, сдвинем и потеряем последний. 1

@ZX Spectrum-128 6810 / 4567 / 4819 Регистрация: 05.06.2014 Сообщений: 22,438
	17.12.2018, 10:50	4
	bormant, но его же НЕТ! ? 1

@bormant Модератор 7769 / 4598 / 2823 Регистрация: 22.11.2013 Сообщений: 13,076 Записей в блоге: 1
	17.12.2018, 14:44	5
	ZX Spectrum-128, а искали вы при этом что? Вот что искали и не нашли, то и вставить. 1

@AnyM0re 1 / 1 / 1 Регистрация: 24.07.2017 Сообщений: 45
	24.12.2018, 16:06 [ТС]	6
	Помогите пожалуйста( 0

	24.12.2018, 16:39

Опции темы

Если элемент не найден, то вставить его в массив на первое место

Решение