Fixed mistake in pascal
Submitted week 1 assignment