../../Task/Substring/Free-Pascal