../../Task/Repeat-a-string/Free-Pascal