Файлы, зазрешите спор Опции

[Романтик]

Я тут с одноклассником поспорил, что вот эта прога работает всегда и стабильно.
Сначала я читаю изфайла и вывожу 1 и 3 строки.

Код

var
pas:text;
a,c,b:string;
begin
assign(pas,'C:\windowr\pase');
reset(pas);
readln(pas,a);
readln(pas,b);
readln(pas,c);
close(pas);
writeln(a);
writeln(c);
end.

по-моему здесь все правильно.