Обработка матриц и массивов
Добавлено: 18 апр 2009, 00:59
помогите решить задачу на Pascal
произвольно задать квадратную матрицу размером n на n
1)создать одномерный массив, в котором каждый элемент равен номеру последнего положительно элемента в каждом столбце матрицы
2)создать одномерный массив, в котором каждый элемент равен минимальному элементу среди отрицательных элементов, стоящих на четных местах в соответсвующим столбце матрицы.
заранее огромное спасибо
--------------------------------------------------------------------------------
Добавлено сообщение
--------------------------------------------------------------------------------
наработка 1 задания
я понимаю тут нужно еще обнулить значение когда условие не выполняется, но незнаю как это правильно сделать-(
произвольно задать квадратную матрицу размером n на n
1)создать одномерный массив, в котором каждый элемент равен номеру последнего положительно элемента в каждом столбце матрицы
2)создать одномерный массив, в котором каждый элемент равен минимальному элементу среди отрицательных элементов, стоящих на четных местах в соответсвующим столбце матрицы.
заранее огромное спасибо
--------------------------------------------------------------------------------
Добавлено сообщение
--------------------------------------------------------------------------------
наработка 1 задания
я понимаю тут нужно еще обнулить значение когда условие не выполняется, но незнаю как это правильно сделать-(
Код: Выделить всё
k:=0;
for j:=1 to n do begin
for i:=1 to n do
if m[i,j] >0 then begin
k:=k+1;
s[k]:=i;
end;
write(s[k], ' ');
end;
writeln;