{$mode objfpc}
{$apptype console}
{$M+}

type
    TRoosters = (GoldenRooster, Junglefowl, FightingCock, Fjalarr, Gullinkambi, GallicRooster, You);

Var
    s: string;

begin
   WriteStr(s, FightingCock);
   Writeln(s)
end.