В двухмерном массиве найти все элементы, сумма индексов столбца и строки

@dima3452 · Регистрация: 22.04.2013

Помогите написать программу,пожалуйста

Заранее спасибо!
Условие:
В двухмерном массиве найти все элементы, сумма индексов столбца и строки
которых нечетное число, и получить из них одномерный массив.

@Puporev · 30.06.2013, 19:30

Pascal

k:=0;
for i:=1 to m do
for j:=1 to n do
if odd(i+j) then
 begin
  k:=k+1;
  b[k]:=a[i,j]
 end;

@dima3452 · 01.07.2013, 11:47 **[ТС]**

Сообщение от Puporev

Pascal

k:=0;
for i:=1 to m do
for j:=1 to n do
if odd(i+j) then
 begin
  k:=k+1;
  b[k]:=a[i,j]
 end;

Какая-то маленькая программа получилась :S

@Puporev · 01.07.2013, 12:11

Это не вся программа, а основная ее часть. Ввод и вывод данных сам пиши.

@dima3452 · 01.07.2013, 15:17 **[ТС]**

Сообщение от Puporev

Это не вся программа, а основная ее часть. Ввод и вывод данных сам пиши.

Pascal

var a:array [1..100,1..100] of integer;
b:array[1..1000] of integer;
k,a,b,c,i,j,n,m,:integer;
begin
write('razmer ');
read(n,m);
writeln;
writeln('ishodniy:');
k:=0;
for i:=1 to m do
for j:=1 to n do
if odd(i+j) then
 begin
  k:=k+1;
  b[k]:=a[i,j]
 end;
writeln;
write('odnomerniy masiv');
end.

Что-то я запутался совсем,не запускается..может еще какие-то переменные дописать?

@Cyborg Drone · 01.07.2013, 15:32

dima3452, у Вас нет ни ввода значений элементов двумерного массива, ни вывода значений элементов одномерного массива.

@dima3452 · 01.07.2013, 16:14 **[ТС]**

Сообщение от Cyborg Drone

dima3452, у Вас нет ни ввода значений элементов двумерного массива, ни вывода значений элементов одномерного массива.

А как будет правильно? А то я думал что все написал.

@Cyborg Drone · 01.07.2013, 16:42

Нет, далеко не всё. Нужно сначала откуда-то взять значения элементов массива a: ввести с клавиатуры, прочитать из файла или сгенерировать случайно. Для этого нужно создать цикл в цикле (так как массив a двумерный) и в теле внутреннего цикла получить конкретные a[i, j]. В этом же месте также можно сформировать массив b (незачем программу раздувать: получил a[i, j], проверил сумму индексов, если нечётная, поместил a[i, j] в b[k], k := k+1). Далее нужно создать цикл, в котором элементы массива b будут куда-либо выводиться (на дисплей или в файл).

@dima3452 0 / 0 / 0 Регистрация: 22.04.2013 Сообщений: 25
		1
	В двухмерном массиве найти все элементы, сумма индексов столбца и строки 30.06.2013, 18:53. Показов 738. Ответов 7 Метки нет (Все метки) Помогите написать программу,пожалуйста Заранее спасибо! Условие: В двухмерном массиве найти все элементы, сумма индексов столбца и строки которых нечетное число, и получить из них одномерный массив. 0

@Puporev Почетный модератор 64275 / 47574 / 32739 Регистрация: 18.05.2008 Сообщений: 115,182
	01.07.2013, 12:11	4
	Это не вся программа, а основная ее часть. Ввод и вывод данных сам пиши. 0

@Cyborg Drone Модератор 9524 / 4855 / 3226 Регистрация: 17.08.2012 Сообщений: 15,187
	01.07.2013, 15:32	6
	dima3452, у Вас нет ни ввода значений элементов двумерного массива, ни вывода значений элементов одномерного массива. 0

@dima3452 0 / 0 / 0 Регистрация: 22.04.2013 Сообщений: 25
	01.07.2013, 16:14 [ТС]	7
	Сообщение от Cyborg Drone dima3452, у Вас нет ни ввода значений элементов двумерного массива, ни вывода значений элементов одномерного массива. А как будет правильно? А то я думал что все написал. 0

@Cyborg Drone Модератор 9524 / 4855 / 3226 Регистрация: 17.08.2012 Сообщений: 15,187
	01.07.2013, 16:42	8
	Нет, далеко не всё. Нужно сначала откуда-то взять значения элементов массива a: ввести с клавиатуры, прочитать из файла или сгенерировать случайно. Для этого нужно создать цикл в цикле (так как массив a двумерный) и в теле внутреннего цикла получить конкретные a[i, j]. В этом же месте также можно сформировать массив b (незачем программу раздувать: получил a[i, j], проверил сумму индексов, если нечётная, поместил a[i, j] в b[k], k := k+1). Далее нужно создать цикл, в котором элементы массива b будут куда-либо выводиться (на дисплей или в файл). 0

Опции темы