> -- Димыч писал(а):
> Теперь еще вопрос, как организовать инициализацию массивов в ВВ?В XDS достаточно просто...А в ВВ?Тоже достаточно просто:
TYPE
A = ARRAY 10 OF INTEGER;
VAR
a: A;
BEGIN
InitA(a, 0, 10, 20, ...);

PROCEDURE InitA (VAR a: A; a0, a1, a2, ...: INTEGER);
BEGIN
a[0] := a0; a[1] := a2; a[2] := a1; ...
END InitA;