Εννοείτε pascal while;