Здравствуйте не могу разобраться с текстовыми файлами в Pascal ABC...

Есть такая проблема, делаю просто просто для себя, и не могу понять как правильно считывать данные с текстового файла.
Смысл такой, есть выбор из 5 вариантов развития события, и в зависимости от ввода цифры должны браться данные у определённого текстового файла...

uses crt;
var
f: Text;
temp,temp2: string;
a: integer;
begin

SetWindowCaption('');

writeln ('');
writeln ('-------------------------------------');
writeln ('');
writeln ('');
writeln ('');
writeln ('');
writeln ('');

if a = 1 then writeln(temp);
if a = 2 then writeln(temp);
if a = 3 then writeln(temp);
if a = 4 then writeln(temp);
if a = 5 then writeln(temp);
readln (a);
Clrscr;

begin
assign (f,'C:\PABCWork.NET\Текстовые файлы\HereHell.txt');
reset (f);
Readln (f,temp);
Writeln (temp);
close(f);
end;
end.
Я пытаюсь вывести, выводит только 1 строчку файла, и всё. Если добавляю ещё несколько Readln (f,temp); то выводит ту строчку, которая равна количеству Readln (f,temp);...
Помогите как можно реализовать это нормально если кто-то знает...