## Код:
```
ПРОЦЕДУРА ДавайСтрокуЖиво* (такую: СТРОКА ИЗ ЛИТЕР): Описание;
ПЕРЕМЕННАЯ строку: Описание;
НАЧАЛО
   НОВУЮ(строку, ДЛИНУ(такую));
   строку^ := такую$;
   ВЕРНУТЬ строку
КОНЕЦ ДавайСтрокуЖиво;

...

список_живности [0]:= ПримерПтица.новая_птица(ДавайСтрокуЖиво("Ворона"));
```
