В массиве поменять местами соседние элементы, стоящие на нечетных местах со стоящими на четных - Pascal

Узнай цену своей работы

Формулировка задачи:

уважаемые программисты помогите решить пару детских задач : 1`) Дан массив положительных чисел. Среди них есть равные. Найти вторые равные элементы массива и заменить их на элемент с противоположным знаком ??? 2). В заданном одномерном массиве поменять местами соседние элементы, стоящие на нечетных местах, с элементами, стоящи¬ми на четных.????????? 3) Дана последовательность целых чисел a1, a2, ..., an. Выяс¬нить, какое число встречается раньше — положительное или отрицательное??? 4) Дан массив, состоящий из n натуральных чисел. Образовать новый массив, элементами которого будут элементы исходно¬го, оканчивающиеся на цифру k.???

Решение задачи: «В массиве поменять местами соседние элементы, стоящие на нечетных местах со стоящими на четных»

textual
Листинг программы
t:=0;
for i:=1 to n do 
if arr[i] mod 10=k then
begin
inc(t);
b[t]:=arr[i];
end;

Оцени полезность:

9   голосов , оценка 3.444 из 5
Похожие ответы