Можно ли в паскале считывать данные из файла дважды?

Во-первых, даже если ты умеешь только открывать, читать и закрывать, тебе никто не может запретить сделать это дважды.
А во-вторых,
http://pascalabc.net/downloads/pabcnethelp/LangGuide/StandardProcFunc/stand_file.htm
В частности, функция Seek.

Можно. Например так: закрыть-открыть:

var
f:text;
n,m:integer;
begin
assign(f,'input.txt');reset(f);
read(f,n);
write(n,' ');

close(f);assign(f,'input.txt');reset(f);
read(f,m);
write(m);
close(f);
end.