Очень срочно
Напишите программу которая находит минимальное и максимальное среди чётных положительных чисел, записенных в файле, и выводит результат в другой файл. Учтите что таких чисел может вообще не быть

Домой приду сделаю как лучший

Это как Вам будет угодно.

И в первой задаче ошибка где EOF. Пишет неверное количество фактических параметров

А ничего, что обе задачи я проверил на тестовых примерах?

const  lim=2000000;var  d,max,min:longint;  f:Text;begin  Assign(f,'input.txt'); Reset(f);  max:=-lim; min:=lim;  while not Eof(f) do begin    Readln(f,d);    if (d>0) and (d mod 2=0) then       if max<d then max:=d      else if min>d then min:=d;  end;  Close(f);  Assign(f,'output.txt'); Rewrite(f);  if min<>lim then Writeln(f,min,' ',max);  Close(f);end.