pascal-subsluts Κλιπ (0) 4