Задача о двумерном массиве Опции

[-rov4-]

Привет всем.
Помогите, пожалуйста, решить задачу (сегодня сдавать): Дан двумерный массив, найти все элементы, большие 6-ти; создать одномерный массив, заполняя его с конца (условие переписано полностью).
Заранее спасибо!

[FreeMan]

фрагмент, где должны "торчать" вызовы процедур

begin
vvod(mas);{заполнить}
print(mas);{вывести на экран}
for i:=1 to n do
for j:=1 to m do
if [i,j]>6 then writeln (a[i,j],'');
readln;
end.{ты точку забыл }