pascal.y line1-19

note the format