Hogyan lehet ezt megcsinálni pascalban?

A fájlkezelésnek nézz utánna Google-el. Előreláthatólag a követezőkre lesz szükség:

assign, reset, readkey, readln, writeln

A több sort ciklussal tudod feldolgozni:

while not eof(fájl) do

Hogyan csinálnád? Meg kell várni a megfelelő betűt, ekkor megnyitni olvasásra a fájt majd soronként beolvasni-kiírni a képernyőre.

readkey(ch);

case ch of

'1': assign(f,'elso.txt');

'2': assign(f,'masodik.txt');

...

end;

Drága husom. Azt mondtad, nem az a lényeg hogy kiírja, mert azt te már perfektül tudod, kisujjból menni fog. Ezért persze hogy nem fogom leírni neked a kiírást, mert 1. tudod, 2. leírtam előbb vázlatpontokban 3. "csak hogy hogyan csinálnám meg"

Úgy érzem megtettem mindent, innentől rajtad múlik hogy felhasználod-e az interneten fellelhető egyébként hatalmas méretű információt.

Tessék: [link]

Ez egy teljes program. Kiírja neked a szövegfájl tartalmát a képernyőre. Menüben válogathatsz.