pascal code for numerical computations