* power functions added

git-svn-id: trunk@19900 -
This commit is contained in:
marco 2011-12-28 18:11:45 +00:00
parent a710a7cf7f
commit 881caba4c3

View File

@ -57,6 +57,8 @@ Procedure SetLength(Var S : AStringType; Len : Integer);
Procedure SetLength(Var A : DynArrayType; Len : Integer);
Function Length(S : AStringType) : Integer;
Function Length(A : DynArrayType) : Integer;
Function Power(Base:double;expon:double):double;
Function Power(Base:Longint;expon:Longint):Longint;
Procedure WriteStr(Out S : String; Args : Arguments);
Procedure ReadStr(Const S : String; Args : Arguments);
Procedure Pack(Const A : UnpackedArrayType; StartIndex : TIndexType; Out Z : PackedArrayType);