program u411;

var state,sum,number:integer;

    input_file:text;

begin

assign(input_file,'u411.txt');

reset(input_file);

read(input_file, number);

state:=0; {looking for first one}

sum:=0;

while(number<>-1) do begin;

  if (state=0) and (number=2) then begin

    state:=1

  end

  else

  if (state=1) and (number<>5) then begin

    sum:=sum+number;

  end

  else

  if (state=1) and (number=5) then begin

    state:=2;

  end;

  read(input_file,number);

end;

write('the sum of all numbers ');

write ('between the first two and the first five is ',sum);

writeln;

end.