Pascalban hogy kell leellenőrizni, hogy egy bekért szám valós-e? (s ha nem, akkor kérje be ujra)

Val függvénnyel.

Hátultesztelő ciklusban célszerű megadni feltételként a Code paraméter értékének vizsgálatát.

[link]

Sehogy, mivel felesleges, hacsak nem stringben kéred a számot. Ha azt mondod, hogy

var x:real;

readln(x);

akkor garantáltan valós az eredmény, mit kell ezen ellenőrizni?

A következő kód beolvas az a változóba, ami a te esetedben egy real. Nyilván, ha egy stringet írsz be neki, akkor kiakad a programod.

A 2. sor kikapcsolja az input ellenőrzést, a 3. sorban beolvas, akkor is ha hibás a bevitt adat, a 4. sor visszakapcsolja az input ellenőrzést. Ezután ha az IOresult=0, akkor sikeres volt a beolvasás...

repeat

{$i-}

readln(sz[i]);

{$i+}

until (IOresult=0);