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

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

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 24.01.2022, 16:39   #1
Slcotix
Новичок
Джуниор
 
Регистрация: 24.01.2022
Сообщений: 4
Сообщение Помощь с решением задачи с массивом

Найти мин/макс число в массиве и сдвигом поставить в начало/конец

Вообщем нужно сделать рандомный массив от -50,50
После нужно найти мин значение и сдвигом поставить в начало массива.
Далее найти Макс элемент и так же сдвигом
поставить уже в конец.

Пример: 43 23 12 42 32
12 23 42 32 43

Последний раз редактировалось Slcotix; 24.01.2022 в 16:42.
Slcotix вне форума Ответить с цитированием
Старый 24.01.2022, 16:40   #2
ForenLi
Форумчанин
 
Регистрация: 02.06.2021
Сообщений: 515
По умолчанию

И в чем проблема?
ForenLi вне форума Ответить с цитированием
Старый 24.01.2022, 16:43   #3
Slcotix
Новичок
Джуниор
 
Регистрация: 24.01.2022
Сообщений: 4
По умолчанию

Не могу сдвинуть

Цитата:
Сообщение от ForenLi Посмотреть сообщение
И в чем проблема?
Не могу сдвиг сделать

Последний раз редактировалось BDA; 25.01.2022 в 04:07.
Slcotix вне форума Ответить с цитированием
Старый 24.01.2022, 16:46   #4
ForenLi
Форумчанин
 
Регистрация: 02.06.2021
Сообщений: 515
По умолчанию

цикл с номера до 1 поменять(элемент с номером номер, элемент с номером номер-1)
и охоже в другую сторону
ForenLi вне форума Ответить с цитированием
Старый 24.01.2022, 16:53   #5
Slcotix
Новичок
Джуниор
 
Регистрация: 24.01.2022
Сообщений: 4
По умолчанию

Цитата:
Сообщение от ForenLi Посмотреть сообщение
цикл с номера до 1 поменять(элемент с номером номер, элемент с номером номер-1)
и охоже в другую сторону
У меня представления этого в коде нет, вот было задание до этого поменять их местами я сделал, теперь попросили так, и у меня ступор
Slcotix вне форума Ответить с цитированием
Старый 24.01.2022, 16:54   #6
ForenLi
Форумчанин
 
Регистрация: 02.06.2021
Сообщений: 515
По умолчанию

А теперь добавить цикл и все.
ForenLi вне форума Ответить с цитированием
Старый 24.01.2022, 16:58   #7
Slcotix
Новичок
Джуниор
 
Регистрация: 24.01.2022
Сообщений: 4
По умолчанию

Цитата:
Сообщение от ForenLi Посмотреть сообщение
А теперь добавить цикл и все.
А как код этого цикла будет выглядеть
Slcotix вне форума Ответить с цитированием
Старый 24.01.2022, 16:59   #8
ForenLi
Форумчанин
 
Регистрация: 02.06.2021
Сообщений: 515
По умолчанию

Цитата:
Сообщение от ForenLi Посмотреть сообщение
цикл с номера до 1 поменять(элемент с номером номер, элемент с номером номер-1)
я ж уже написал, надо только операторы подставить
ForenLi вне форума Ответить с цитированием
Старый 30.01.2022, 10:19   #9
newerow1989
Я самый любопытный
Участник клуба
 
Аватар для newerow1989
 
Регистрация: 24.07.2012
Сообщений: 1,949
По умолчанию

Код:
var p: array[1..10] of integer;
    i, im, z: integer;
begin
   Randomize;
   for i:=1 to 10 do
   begin
      p[i]:=-50+Random(101);
      Write(p[i]:3, '  ');
   end;
   Writeln;
   Writeln;
   im:=1;
   for i:=2 to 10 do
      if p[im]>p[i] then
         im:=i;
   z:=p[im];
   for i:=im downto 2 do
      p[i]:=p[i-1];
   p[1]:=z;
   im:=1;
   for i:=2 to 10 do
      if p[im]<p[i] then
         im:=i;
   z:=p[im];
   for i:=im to 9 do
      p[i]:=p[i+1];
   p[10]:=z;
   for i:=1 to 10 do
      Write(p[i]:3, '  ');
   Writeln;
   Readln;
end.
С запрограммированным приветом, Неверов Евгений!
Сайт: http://newerow1989.ru
[Паскаль] [Delphi]
newerow1989 вне форума Ответить с цитированием
Старый 30.01.2022, 12:09   #10
digitalis
Старожил
 
Аватар для digitalis
 
Регистрация: 04.02.2011
Сообщений: 4,537
По умолчанию

Хорошо у них в заведении поставлено дело с секретностью: требуемый язык программирования и под пыткой не выдадут. Хорошо, что у newerow1989 дар: протелепал, что это Паскаль. А если нет? Всяко бывает - зима, морозы, помехи в телепать-канале...
digitalis на форуме Ответить с цитированием
Ответ


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

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

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


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
очень нужна помощь с решением задачи ognam Паскаль, Turbo Pascal, PascalABC.NET 2 19.11.2019 23:03
[C] Лабораторная работа: нужна помощь с решением задачи с матрицей. код написан, но есть ошибка - при печати матриц А и В печатаются одинаковые - максимальный элемент не находится gatherclouds Помощь студентам 0 31.10.2018 04:18
Нужна помощь с решением задачи. Динамическая память на паскале Loginnn Паскаль, Turbo Pascal, PascalABC.NET 3 09.12.2015 20:53
Нужна помощь с решением задачи! Тьягор Помощь студентам 5 27.09.2014 20:06