Lab 4

Modify Lab 3 so that the IF statement calls a procedure to do the requested operations.

Write a Pascal program to display a menu and request from the user their choice.

If they enter an 'A' then call a procedure to request from the user the radius for a circle.
The procedure should calculate and print the circumference and the area of the circle.
Echo print the radius.

If they enter a 'B' then call a procedure to request from the user the two sides of a rectangle.
The program should calculate and print the perimeter and the area of the rectangle.  Echo print
the two sides.


SAMPLE:

A - Calculate the circumference and area of a circle
B - Calculate the perimeter and area of a rectangle
C - Exit

Enter your choice: