Для каждой строки двумерного массивa найти номер первого отрицательного элемента и записать в новый массив

@Хендехох · Регистрация: 17.01.2012

Студворк — интернет-сервис помощи студентам

Дан массив размером nxn, элементы которого целые числа. Для каждой строки найти номер первого отрицательного элемента и записать данные в новый массив.

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

@CodeR · 01.06.2014, 13:56

Pascal

Var A:array[1..20,1..20] of integer;
    B:array[1..20] of integer;
    i,j,n:byte;
Begin
    Randomize;
    write('N: ');readln(n);
    For i:=1 to n do
    Begin
      For j:=1 to n do
      Begin
        A[i,j]:=random(31)-15;
        if (A[i,j]<0)and(B[i]=0) then B[i]:=j;
        write(A[i,j]:4);
      End;
      writeln;
    End;
    writeln('Полученный массив');
    For i:=1 to n do
     write(B[i]:4);
    readln;
End.

@Svager · 01.06.2014, 16:31

Pascal

(B[i]=0)

можно пояснение?

@Puporev · 01.06.2014, 16:38

Просто нужно инициировать массив В

Pascal

1 2	write('N: ');readln(n); for i:=1 to n so b[i]:=0;

@Svager · 01.06.2014, 16:53

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

Просто нужно инициировать массив В

аа понял.

@Хендехох · 02.06.2014, 19:16 **[ТС]**

Большое спасибо! Вроде все работает..

@Хендехох 0 / 0 / 0 Регистрация: 17.01.2012 Сообщений: 4
		1
	Для каждой строки двумерного массивa найти номер первого отрицательного элемента и записать в новый массив 01.06.2014, 10:19. Показов 1616. Ответов 5 Метки нет (Все метки) Дан массив размером nxn, элементы которого целые числа. Для каждой строки найти номер первого отрицательного элемента и записать данные в новый массив. Пробовал сам, но не очень получается, думаю задача несложная, но сам я учил только Бейсик и то 25 лет назад. 0

@Svager 399 / 378 / 408 Регистрация: 14.09.2013 Сообщений: 1,204
	01.06.2014, 16:53	5
	Сообщение от Puporev Просто нужно инициировать массив В аа понял. 0

@Хендехох 0 / 0 / 0 Регистрация: 17.01.2012 Сообщений: 4
	02.06.2014, 19:16 [ТС]	6
	Большое спасибо! Вроде все работает.. 0

Опции темы

Для каждой строки двумерного массивa найти номер первого отрицательного элемента и записать в новый массив

Решение