A:='тапир' ; writeln(copy(a,3,3))

Ошибочка, ответ должен быть на английском языке. Вместо этого вопроса, пожалуйста, задайте вопрос, связанный с образованием или учебой.