Implementation of Support Vector Machine Pascal Code Based on SMO Method