Delphi/Pascal: 79