Записать в массив У элементы массива А имеющие чётные индексы, а в массив С нечётные индексы

@Nick_891 · Регистрация: 12.02.2019

Массив:А(40). Записать в массив У элементы массива А, имеющие чётные индексы, а в массив С - нечётные индексы. В Pascal ABC.

@ZX Spectrum-128 · 13.02.2019, 13:34

@bormant · 13.02.2019, 15:44

ZX Spectrum-128,
жесть какая-то...

Pascal

1 2	for i:=1 to n div 2 do b[i]:=a[2i]; for i:=0 to (n-1) div 2 do c[i]:=a[2i+1];

Добавлено через 1 минуту
Это для массивов от 1.

@bormant · 07.03.2019, 18:56

или

Pascal

2	for i:=1 to (n+1) div 2 do c[i]:=a[2*i-1];

@Nick_891 0 / 0 / 0 Регистрация: 12.02.2019 Сообщений: 22
		1
	Записать в массив У элементы массива А имеющие чётные индексы, а в массив С нечётные индексы 13.02.2019, 12:53. Показов 1805. Ответов 3 Метки pascal abc (Все метки) Массив:А(40). Записать в массив У элементы массива А, имеющие чётные индексы, а в массив С - нечётные индексы. В Pascal ABC. 0

@ZX Spectrum-128 6810 / 4567 / 4819 Регистрация: 05.06.2014 Сообщений: 22,438
	13.02.2019, 13:34	2
	Сформировать два массива C и D, включая в первый элементы исходного массива с чётными индексами, а во второй – с нечетными 0

	07.03.2019, 18:56

Опции темы