pascal-subsluts Tüp (0) 20