Opisanie pojęć TMember, TEMember

Witam potrzebuje aby mi któś pomógł to rozszyfrować
(A) Wyjaśnić składnię wierszy poniższego fragmentu programu.
(B) Podać potrzebne programowi definicje pojęć ?TEMember? i ?TMember?.

function SetMemberAdm( ind: Integer; //
mMem : array [1..20] of TEMember) //
: boolean; //
begin
if ind > 20 then
begin Result :=false; //
exit; //
end; //
mMem[ind].MMM:=?Warszawa?; //
mMem[ind].UUU.name:=?Administrator?; //
mMem[ind].UUU.num:=1; //
for i:=1 to 9 do
nMem[ind].UUU.rek[i]:=1.0; //
mMem[ind].UUU.rek[0]:=0.0; //
Result := true; //
end;

moj e-mail [email protected]</delphi>

(B)

type
    TUUU = record
        name : string;
        num : byte;
        rek : array of Real;
    end;

    TEMember = record
        MMM : string;
        UUU : TUUU;
    end;

Nie widzę po tym fragmencie, żeby było potrzebne coś takiego jak TMember.

(A) Składnia jak składnia, przypisywane są po prostu wartości poszczególnym polom tablicy rekordów.