Odious Numbers (Long) in Pascal in Chars Play Hole

1^st in Pascal and 443^rd overall.

Last tested 4 days ago.