Оказалось что я в файл execute.dat просто через блокнот ввел данные) а нужно интерпретировать чтобы pascal понял)

Я осуществил ввод через программу и все заработало:

Program z472v;
Uses crt;
Var f:file of integer;
i,n,v,k,max:integer;
s:string;
Begin
clrscr;
Assign(f,'execute.dat');

write('create[C] a new or use(any key) an existing file? - ');
readln(s);

if (s='c') or (s='C') then
begin
Rewrite(f);

Write('enter n - ');
Readln(n);

for i:=1 to n do
begin
readln(v);
write(f,v);
end;

end;

Reset(f);
max:=0;

while not eof(f) do
begin
read(f,v);
writeln(v:0);
k:=k+1;
if (k mod 2<>0) and (abs(v)>max) then max:=abs(v);
end;
close(f);
writeln('naibolshii modul komponent s necetnim nomerom - ',max:0);
readln;
end.