Niven Numbers (Long) in Pascal in Chars Play Hole

1^st in Pascal and 513^th overall.

Last tested a day ago.