OberonCore

Загвоздка следующая:

Нужно двумерный массив из одной процедуры отправить в другую проце-дуру в качестве формального параметра, после обработки отправить в исходную процедуру другой двумерный массив.
Вобщем наверное это банально просто, но никак не получается.

Бвло бы хорошо получить простой примерчик.

MODULE TestArray;

TYPE
massiv1 = ARRAY 10, 10 OF INTEGER;
massiv2 = ARRAY 20, 20 OF INTEGER;


PROCEDURE test (IN a: massiv1; OUT b: massiv2);
BEGIN
END test;

PROCEDURE do*;
VAR a: massiv1; b: massiv2;
BEGIN
test (a, b);
END do;


END TestArray.

Век живи век учись