procedure InsertionSort
(
Var Data: tSortArray; { sort array elements FirstElmt.. LastElmt }
FirstElmt: Integer; { index of first element to sort }
LastElmt: Interger; { index of element of sort }
);
Pascal
Var
C
void StrinyCopy
(
char Target, / out; string to copy to */
char Source / in; string to Copy from */
);
...
C (*)