Se hai preso quella funzione da un esempio in C ricordati che in C il

return

restituisce il valore e termina la funzione.

In Pascal

bilanciato:=true

restituisce il valore ma NON termina la funzione.
Dovrai inserire una

exit

per farlo.

P.S. Ma che Pascal usi ...? Come mai quelle endif ?