Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 5.00/11: Рейтинг темы: голосов - 11, средняя оценка - 5.00
 Аватар для pro_100_den
23 / 23 / 2
Регистрация: 17.10.2011
Сообщений: 173

Вставить элемент в массив так, чтобы он сохранил упорядоченность

27.05.2014, 17:26. Показов 2070. Ответов 3

Студворк — интернет-сервис помощи студентам
Дан одномерный числовой массив, упорядоченный по возрастанию размером N и число X. Вставить X в массив, чтобы он сохранил упорядоченность Дополнительного массива не заводить!
0
Лучшие ответы (1)
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
27.05.2014, 17:26
Ответы с готовыми решениями:

Упорядочить массив по возрастанию и вставить число так, чтобы упорядоченность не нарушилась
одномерный массив, элементы которого задаются с помощью датчика случайных чисел от -50 до +50. 1) использовать сортировку простыми...

Массив: Удалить из массива элемент с номером k и вставить элемент, равный p, так, чтобы не нарушилась упорядоченность.
Дано: a:array of real;p:real;k:integer;(a<=a<=⋯<=a,0<k≤n). Удалить из a элемент с номером k (т.е. a) и вставить элемент, равный p, так,...

В упорядоченный по неубыванию числовой массив вставить в заданное число так, чтобы упорядоченность сохранилась
В упорядоченный по неубыванию числовой массив вставить в заданное число так, чтобы упорядоченность сохранилась.

3
 Аватар для vaberg
52 / 52 / 30
Регистрация: 24.02.2014
Сообщений: 229
27.05.2014, 17:34
1. нужно определить адрес Х в массиве (p)
2. увеличить размер массива на 1
3. скопировать все элементы массива начиная с адреса p по адресу p+1
4. в адрес p вставить X
0
 Аватар для pro_100_den
23 / 23 / 2
Регистрация: 17.10.2011
Сообщений: 173
27.05.2014, 17:51  [ТС]
и как это прописать в коде?
0
 Аватар для vaberg
52 / 52 / 30
Регистрация: 24.02.2014
Сообщений: 229
27.05.2014, 18:12
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Так Находится место для вставки элемента
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
var
  M : array[0..999999] of integer;
.....
// бинарный поиск места Х в массиве М
function getIndexM(X : integer): integer;
var
  Min      : integer;
  Max      : integer;
  i        : integer;
begin
  Min := 0;
  Max := 999999-1; // длина массива - 1
  if Max > 0 then
  begin
    while Max-Min > 1 do
    begin
      i := (Max+Min) div 2;
      if X < M[i] then
        Min := i
      else
        Max := i;
    end;
      result := Max
  end
  else
    result := 0;
end;
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
27.05.2014, 18:12
Помогаю со студенческими работами здесь

Удалить из a(1)...a(n) элемент с номером К (т.е. a(k)) вставить элемент равный P, так чтобы не нарушалась упорядоченность
Даны действительные числа a(1)....a(n), P, натуральное К (a(1)&lt;=a(2)&lt;=.......&lt;=a(n)). Удалить из a(1)...a(n) элемент с номером К (т.е....

Удалить из массива элемент и вставить на нужное место элемент q, так, чтобы не нарушалась упорядоченность
Здравствуйте! Вот сама задача Заданы целочисленный массив а1,а2...аn упорядоченный по не возрастанию элементов и целочисленные переменные...

Списки. Вставить в упорядоченный список новый элемент так, чтобы сохранилась упорядоченность
Вставить в непустой список L, элементы которого упорядочены по неубыванию, новый элемент E так, чтобы сохранилась упорядоченность.

В список, упорядоченный по возрастанию, вставить новый элемент так, чтобы упорядоченность сохранилась
Нужна помощь. В список, упорядоченный по возрастанию, вставить новый элемент так, чтобы упорядоченность сохранилась. Нужно реализовать...

Вставить в упорядоченный по неубыванию список элемент с заданным значением так, чтобы не нарушить упорядоченность
Кто сможет помочь с программкой. Вставить в упорядоченный по неубыванию список элемент с заданным значением так, чтобы не нарушить...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Новые блоги и статьи
Воспроизведение звукового файла с помощью SDL3_mixer при касании экрана Android
8Observer8 26.01.2026
Содержание блога SDL3_mixer - это библиотека я для воспроизведения аудио. В отличие от инструкции по добавлению текста код по проигрыванию звука уже содержится в шаблоне примера. Нужно только. . .
Установка Android SDK, NDK, JDK, CMake и т.д.
8Observer8 25.01.2026
Содержание блога Перейдите по ссылке: https:/ / developer. android. com/ studio и в самом низу страницы кликните по архиву "commandlinetools-win-xxxxxx_latest. zip" Извлеките архив и вы увидите. . .
Вывод текста со шрифтом TTF на Android с помощью библиотеки SDL3_ttf
8Observer8 25.01.2026
Содержание блога Если у вас не установлены Android SDK, NDK, JDK, и т. д. то сделайте это по следующей инструкции: Установка Android SDK, NDK, JDK, CMake и т. д. Сборка примера Скачайте. . .
Использование SDL3-callbacks вместо функции main() на Android, Desktop и WebAssembly
8Observer8 24.01.2026
Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
моя боль
iceja 24.01.2026
Выложила интерполяцию кубическими сплайнами www. iceja. net REST сервисы временно не работают, только через Web. Написала за 56 рабочих часов этот сайт с нуля. При помощи perplexity. ai PRO , при. . .
Модель сукцессии микоризы
anaschu 24.01.2026
Решили писать научную статью с неким РОманом
http://iceja.net/ математические сервисы
iceja 20.01.2026
Обновила свой сайт http:/ / iceja. net/ , приделала Fast Fourier Transform экстраполяцию сигналов. Однако предсказывает далеко не каждый сигнал (см ограничения http:/ / iceja. net/ fourier/ docs ). Также. . .
http://iceja.net/ сервер решения полиномов
iceja 18.01.2026
Выкатила http:/ / iceja. net/ сервер решения полиномов (находит действительные корни полиномов методом Штурма). На сайте документация по API, но скажу прямо VPS слабенький и 200 000 полиномов. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru