Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.83/6: Рейтинг темы: голосов - 6, средняя оценка - 4.83
alinochka121
0 / 0 / 0
Регистрация: 11.11.2013
Сообщений: 15
#1

Обмен пар чисел в одномерном массиве

20.11.2013, 14:13. Просмотров 1052. Ответов 1
Метки нет (Все метки)

Решить задачу:
Дан массив. Нужно поменять местами значения во всех парах. Пара – два соседних элемента, такие, что меньший номер имеет четное количество элементов. Или, иначе, два первых элемента – пара, элементы с номерами N и N+1 являются парой если парой являются элементы с номерами N-2 и N-1.

Input
Со стандартного устройства ввода вводится целое число, не превосходящее 1000 – N – количество пар чисел в массиве, в следующей строке – 2*N целых чисел – элементы массива.

Output
Нужно выдать на стандартное устройство 2*N целых чисел – новый массив, в котором произведен обмен значениями в парах. Числа разделяются пробелами. Пробел до и после всех чисел не выводить.

Sample Input
3
2 3 4 6 8 21

Sample Output
3 2 6 4 21 8

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
20.11.2013, 14:13
Ответы с готовыми решениями:

Замена чисел в одномерном массиве на последующее
Дан одномерный массив T номеров равных только 0,1,2,3, где n<100. Создать...

В одномерном массиве найти количество отрицательных чисел
1. Одномерные массивы. 2.Оператор выбора CASE. 3.В одномерном массиве найти...

Число инверсий в одномерном массиве произвольных чисел
Определить число инверсий в одномерном массиве произвольных чисел. Инверсия –...

В одномерном массиве вычислить количество чисел, которые кратны 3
В одномерном массиве вычислить количество чисел, которые кратны 3. Напишите...

В одномерном массиве определить процент четных положительных чисел
В одномерном массиве определить процент четных положительных чисел. одномерный...

1
Derendaet
31 / 36 / 47
Регистрация: 14.10.2013
Сообщений: 108
20.11.2013, 17:56 #2
Лучший ответ Сообщение было отмечено alinochka121 как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
var a:array [1..100] of integer;
    i,n,c:integer;
begin
writeln('Ââåäèòå êîëè÷åñòâî Г§Г*Г*Г·ГҐГ*ГЁГ©: '); readln(n);
for i:=1 to n do begin
write('Ââåäèòå ',i,'-ГҐ Г§Г*Г*Г·ГҐГ*ГЁГҐ: '); readln(a[i]);
end;
for i:=1 to n do write(a[i]:3);
writeln;
for i:=1 to n do
if i mod 2=0 then begin
c:=a[i];
a[i]:=a[i-1];
a[i-1]:=c;
end;
for i:=1 to n do write(a[i]:3);
writeln;
end.
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
20.11.2013, 17:56

Определить число инверсий в одномерном массиве произвольных чисел
Определить число инверсий в одномерном массиве произвольных чисел. Инверсия –...

Определите, сколько различных чисел содержится в одномерном массиве
Определите, сколько различных чисел содержится в одномерном массиве.

Нахождение в одномерном массиве суммы всех отрицательных чисел.
Нахождения в одномерном массиве суммы всех отрицательных чисел. Массив из 8...


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

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

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