Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.80/15: Рейтинг темы: голосов - 15, средняя оценка - 4.80
0 / 0 / 0
Регистрация: 24.10.2010
Сообщений: 15
1

Дан массив размера 10.Переставить в обратном порядке элементы массива , рассположенные между его минимальным и максимальным элементами.

24.10.2010, 18:56. Показов 2843. Ответов 1
Метки нет (Все метки)

помогите

Дан массив размера 10.Переставить в обратном порядке элементы массива , рассположенные между его минимальным и максимальным элементами.
__________________
Помощь в написании контрольных, курсовых и дипломных работ здесь
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
24.10.2010, 18:56
Ответы с готовыми решениями:

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

Переставить в обратном порядке элементы массива, расположенные между его первым и вторым нулевыми элементами
Дан массив размера 10. Переставить в обратном порядке элементы массива, расположенные между его...

Переставить в обратном порядке: элементы, расположенные между k-м и s-м элементами массива
Дан одномерный массив из 15 элементов. Переставить в обратном порядке: элементы, расположенные...

Переставить в обратном порядке элементы массива, расположенные между заданными элементами, не включая эти элементы
Дан массив А размера N и целые числа K и L (K≤L≤N). Переставить в обратном порядке элементы...

1
13074 / 5859 / 1706
Регистрация: 19.09.2009
Сообщений: 8,807
24.10.2010, 20:51 2
Лучший ответ Сообщение было отмечено sevenone как решение

Решение

В массиве может быть несколько элементов с минимальныи или максимальным значением. В коде выбирается отрезок, ближайший относительно начала массива.
Pascal
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
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
program Project1;
 
function Min(const A, B : Integer) : Integer;
begin
  if A < B then
    Min := A
  else
    Min := B
  ;
end;
 
function Max(const A, B : Integer) : Integer;
begin
  if A > B then
    Max := A
  else
    Max := B
  ;
end;
 
const
  N = 10;
var
  Arr : array[1..N] of Integer;
  i, j, IMax, IMin, I1, I2, Num : Integer;
begin
  (*Формируем исходный массив и распечатываем его.*)
  Randomize;
  Writeln('Исходный массив:');
  for i := 1 to N do begin
    Arr[i] := Random(11); (*0..10*)
    if i > 1 then Write(', ');
    Write(Arr[i]);
  end;
  Writeln;
 
  (*Поиск индексов минимального и максимального элементов.*)
  IMin := 1;
  IMax := 1;
  for i := 1 + 1 to N do begin
    if Arr[i] < Arr[IMin] then
      IMin := i
    ;
    if Arr[i] > Arr[IMax] then
      IMax := i
    ;
  end;
 
  (*Перестановка.*)
  (*Меньший индекс.*)
  I1 := Min(IMin, IMax);
  (*Больший индекс.*)
  I2 := Max(IMin, IMax);
  j := I2;
  for i := I1 to (I1 + I2) div 2 do begin
    Num := Arr[i];
    Arr[i] := Arr[j];
    Arr[j] := Num;
    j := j - 1;
  end;
 
  (*Показываем обработанный массив.*)
  Writeln('Полученный массив:');
  for i := 1 to N do begin
    if i > 1 then Write(', ');
    Write(Arr[i]);
  end;
  Writeln;
  
  Readln;
end.
В этом коде перестановке подвергаются также сами минимальный и максимальный элелменты. Если их переставлять не надо, тогда код надо изменить так:
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
...
  (*Перестановка.*)
  (*Меньший индекс.*)
  I1 := Min(IMin, IMax);
  (*Больший индекс.*)
  I2 := Max(IMin, IMax);
  j := I2 - 1;
  for i := I1 + 1 to (I1 + I2) div 2 do begin
    Num := Arr[i];
    Arr[i] := Arr[j];
    Arr[j] := Num;
    j := j - 1;
  end;
...
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
24.10.2010, 20:51

Переставить в обратном порядке элементы массива, расположенные между заданными элементами, включая эти элементы
Дан массив А размера N и целые числа K и L (K≤L≤N). Переставить в обратном порядке элементы...

Удалить элементы расположенные между максимальным и минимальным элементами массива Х. Элементы массива Х вычисляются по формуле Xi=((-1)^i)*((i^2)-3*i), где i=1,2,...,10.
Удалить элементы расположенные между максимальным и минимальным элементами массива Х. Элементы...

Удалить из массива положительные элементы между максимальным и минимальным элементами
1 задача расчитать элементы массива по формуле 2 удалить из полученного массива все положительные...

Удалить из одномерного массива все элементы расположенные между максимальным и минимальным элементами массива
Удалить из одномерного массива все элементы расположенные между максимальным и минимальным...


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.