Pascalban hogyan oldjam meg, ha egy ciklusban, fájlból történő beolvasásnál megváltozik a beolvasott elem típusa, akkor a program lépjen ki a ciklusból?

Én úgy csinálnám, hogy eleve a string-be olvasok be minden adatot, az egész olvasást egy hátultesztelős ciklusba tenném, a kiolvasás végén pedig a val(string, number, errorflag) függvénnyel megpróbálnám átalakítani, kiugrási feltételnek (a ciklusból való kilépéshez) pedig errorflag-et vizsgálnám meg, 0, lesz ha számok voltak, és sikerült az átalakítás, valami más, ha mnem sikerült (például karakterek voltak benne.

repeat

{a kiolvasás (s stringbe)}

until errorflag=0; {numberben lesz a szám, ha sikerült}