Ezt hogyan kellene megcsinálni free pascalban? A BE. TXT szöveges fájl egész számokat tartalmaz szóközzel elválasztva. Írja ki a képernyőre a páros számok számát!

Melyik rész nem megy? Megnyitod a BE.TXT-t olvasásra, beolvasod egy változóba fájl végéig, olvasás közbe megnézed hogy páros e, ha páros akkor egy 0-ra inicializált változót növelsz 1-el, ha fájl végére értél akkor kiírod a változó értékét.

Kell egy text változó amihez hozzérendeled.

mondjuk t text változó

assign(t,'be.txt);

reset(t); olvasásra megnyitod

eof(t) fájl vége van e

odd(szam) szam páratlan e

close(t) lezárod a t fájt

read(t,szam) t-hez hozzárendelt fájlból szam-ba írja az aktuális számot

Mindent itt van ami kell hozzá.

Sikerült?