OT - Prosim o radu s C

[Delphin]

> void test( int* );

> velikost pole soucasti typu = pascalfujovina ;o)

Tvurcum Delphi nezustalo ani "test ( int* )" svate, takze jestlize je "type 
t = array [0..2] of integer" pascalfujovina, potom "array of integer" musi 
byt jista pascalapokalypsa :-) :-) :-)
(Funkce Test zere jak staticke, tak dynamicke pole integeru libovolne 
velikosti, zmeni ho, vytvori nove dynamicke pole, naplni ho a vrati ho jako 
vysledek funkce).

type TPole=array of integer;

function Test(var A:array of integer):TPole;
var i:integer;
begin
 SetLength(Result,Length(A));
 for i:=Low(A) to High(A) do
 begin
  Result[i]:=A[i]*2;
  A[i]:=A[i]*5;
 end;
end;

var Pole:array [20..22] of integer;
      DynPole,RDP:TPole;
begin
 Pole[20]:=1;
 ...
 RDP:=Test(Pole);
 ...
 SetLength(DynPole,2);
 DynPole[0]:=2;
 ...
 RDP:=Test(DynPole);
  ...
end;