91
 Print_Cursor_Array:
 for I in A'Range loop
    Put (Element (A (I)));  -- freq
    Put (' ');
    Put (Key (A (I)));  -- word
    New_Line;
 end loop Print_Cursor_Array;