Delphi/Pascal: 78