OJ Board

great thanks,
i didnt pay attention to this condition
sorry me for troubled you

can somebody give me some test with answers to thу 107th problem ?
thanks in advance

Sedefcho thank's for your answer, i know that reading somobodies code is ungrateful work.
but i can't agree with your observation. As it mentioned in the problem differences take all the values through 1 to N-1, so if the condition
(min - max <> N-1) isn't true the input demands will never carry ...

sorry, because of troubling you, but

Type Vector = array [1..3000]of LONGINT;
var n : integer;
Inp,Stt : Vector;
min,max :longint;
i :integer;
flag : boolean;
jolly : Vector;
jc : integer;
begin
jc :=0;
for i := 1 to 3000 do
begin
jolly :=0;
inp :=0;
stt :=0;
end;

while not eof ...