Работа с массивами (ДВУМЕРНЫЕ)

[Finn4ik]

1. Дан двумерный массив. Найти номера последних положительных элементов каждой строки.
2. Дан двумерный массив. Вставьте первую строку между средними строками.

[Niro]

Знаете, когда мне нужна чья-нибудь помощь, например одногруппника в решении какой-либо задачи, я подхожу к нему со примерно со следующими словами: Антон (вася, федя) ты не поможешь мне с задачкой? Чёт я сам не соображу...
Но не как не подхожу, кидая тетрадь с задачей на стол и уходя с гордо поднятой головой, ожидая незамедлительного решения

[Finn4ik]

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

Знаете, когда мне нужна чья-нибудь помощь, например одногруппника в решении какой-либо задачи, я подхожу к нему со примерно со следующими словами: Антон (вася, федя) ты не поможешь мне с задачкой? Чёт я сам не соображу...
Но не как не подхожу, кидая тетрадь с задачей на стол и уходя с гордо поднятой головой, ожидая незамедлительного решения

Извиняюсь конечно, но помощь действительно очень нужна

[Niro]

Не проверял
1)

for i:=1 to n do
  for j:=m to 1 do
    if mas[i,j]>0 then begin k:=k+1;
                                    mas2[k]:=j;
                            end;

[Hacker19_90]

for i := 1 to n do
begin
    for j := m downto 1 do
        if massiv[i,j] > 0 then
            writeln ('В ', i, '-й строке номер последнего положительного элемента равен', j);
end;

[Finn4ik]

Спасибо огромное!!!