SMS: Standard PASCAL :