All pascal code made during hands on lab