Форум программистов, компьютерный форум, киберфорум
Наши страницы
Free Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.60/5: Рейтинг темы: голосов - 5, средняя оценка - 4.60
_Maxim_
0 / 0 / 0
Регистрация: 18.04.2014
Сообщений: 4
1

Расположить элементы одномерного массива в обратном порядке

12.11.2015, 17:37. Просмотров 876. Ответов 2
Метки нет (Все метки)

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

Расположить элементы массива обратном порядке
2.Дан массив x из n элементов. Расположить его элементы в обратном порядке.

Расположить элементы массива в обратном порядке
Расположить элементы данного массива в обратном порядке,(первый элемент меняется с последним,второй...

Расположить элементы матрицы в обратном порядке
Дан массив x из n элементов. a) Расположить его элементы в обратном порядке. b) Циклически...

Переставить элементы массива в обратном порядке
Дан массив из N целых чисел. Переставить элементы массива в обратном порядке, т.е первый на место...

Переставить элементы массива в обратном порядке
Дан массив целых чисел размерности n. Переставить элементы массива в обратном порядке

2
BLOODland
5 / 5 / 4
Регистрация: 30.06.2015
Сообщений: 20
12.11.2015, 21:47 2
Лучший ответ Сообщение было отмечено _Maxim_ как решение

Решение

Предупреждаю, написано без запуска, т. к. компилятор категорически отказался работать. Будут ошибки - извиняйте...

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
Program Kek1;
Uses crt;
Type
mass = array [1..10] of integer;
End;
Function ReCange(a: mass;): mass;
Var b, x: integer;
Begin
b:= 1;
Repeat
x:= a[10-b];
a[10-b]:= a[b];
a[b]:= x;
b:= b+1;
Until b>5;
For b:= 1 to 10 do
Write(a[b], ' ');
End;
Var a: mass;
      b: integer;
Begin
For b:= 1 to 10 do
Begin
Read(a[b]);
Write(' ');
End;
ReCange(a[b]);
End.
1
ZX Spectrum-128
Модератор
Эксперт Pascal/Delphi
4042 / 2962 / 3701
Регистрация: 05.06.2014
Сообщений: 14,675
13.11.2015, 11:32 3
В одномерном массиве первый элемент поменять местами с последним элементом, второй элемент с предпоследним элементом и так далее
Под свое задание оформите самостоятельно.
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
13.11.2015, 11:32

Переписать элементы массива А, кратные 3, в массив В в обратном порядке
очень нужна помощь Задача 11 Заполнить массив А из 10 элементов целыми числами, ладанными...

Переписать в массив Y элементы массива (x1,x2 ,.x30 )в обратном порядке
Переписать в массив Y элементы массива (x1,x2 ,...x30 )в обратном порядке.

Скопируйте отрицательные и положительные элементы массива А в массив В в обратном порядке
Скопируйте отрицательные и положительные кратные заданному числу элементы массива А в массив В в...


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

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

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