Pascal input variable parse adding