Text this: Problem solving using Pascal