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

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

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

Восстановить пароль

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

Ответ
 
Опции темы Поиск в этой теме
Старый 28.05.2013, 17:45   #1
программирование
Форумчанин
 
Регистрация: 22.04.2013
Сообщений: 162
Восклицание поменять местами парные и непарные элементы массива Pascal ABC

добрый день, уважаемые программисты. НАПИШИТЕ, ПОЖАЛУЙСТА, ПРОГРАММУ НА PASCAL ABC!!!

сформировать одномерный массив с N элементов, где элементы массива - целые случайные числа в диапазоне от 1 до 60. Переставить элементы, которые стоят на непарных местах, с соответсвующими элементами на парных местах.

одномерный массив в котором элементы - целые случайные числа
Код:
Program zd_1;
  Uses crt;
  Var N,i:integer;
        A:array [1..60] of longint;
Begin
     Clrscr;
     Write ('введите элементы массива : ');
     Readln(N);
     For i:=1 to N do
        Begin
             A[i]:=random(60);
             Write(A[i]:5);
        End;
end.
но осталось дописать эту программу, чтобы поменять местами парные и непарные элементы массива.

Последний раз редактировалось Stilet; 28.05.2013 в 18:09.
программирование вне форума Ответить с цитированием
Старый 28.05.2013, 18:42   #2
s-andriano
Старожил
 
Аватар для s-andriano
 
Регистрация: 08.04.2012
Сообщений: 3,229
По умолчанию

По-русски это называется четные и нечетные.

В предлагаемом варианте решения ошибки:
- элементов массива 60, а должно быть - N.
- соответственно, если N окажется больше 60, программа вылетит по ошибке.
- в массив заносятся числа в диапазоне не от 1 до 60, а в диапазоне от 0 до 59.
- ну и в строке вывода пропущено слово "количество".

Последний раз редактировалось s-andriano; 28.05.2013 в 18:46.
s-andriano вне форума Ответить с цитированием
Старый 28.05.2013, 19:36   #3
программирование
Форумчанин
 
Регистрация: 22.04.2013
Сообщений: 162
По умолчанию поменять местами четные и нечетные элементы массива

замечания выше я учту, но как можно поменять местами четные и нечетные элементы массива? (возможно, нужно сделать это как-то через if).
программирование вне форума Ответить с цитированием
Старый 28.05.2013, 20:43   #4
s-andriano
Старожил
 
Аватар для s-andriano
 
Регистрация: 08.04.2012
Сообщений: 3,229
По умолчанию

Если нужно обменять значениями две ячейки памяти (не важно: элементы массива, просты переменные, элементы структуры...), вводится дополнительная переменная, куда заносится значение из первой ячейки, затем содержимое второй ячейки переписывется в первую и в заключение значение из временной переменной записывается во вторую ячейку.
s-andriano вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Найти минимальный и максимальный элементы массива Х и поменять их в массиве местами. Элементы массива вычисляются по формуле Xi=(( Милашечка Помощь студентам 0 26.05.2013 13:01
Поменять местами элементы массива Pascal olga_v95 Помощь студентам 2 19.03.2013 23:04
непарные и парные элементы масыва Truebus Помощь студентам 0 29.03.2012 14:44
задача Pascal - Поменять местами элементы массива 8 и 3 столбцов mefos Помощь студентам 4 03.02.2012 22:57