A Computer-based Approach using Mathematica® and Gaussian