Homework in Pascal