Program pianfen;
Var
 n:longint;
Begin
 assign(input,'cost.in');
 reset(input);
 readln(n);
 assign(output,'cost.out');
 rewrite(output);
 writeln(-1);
 close(input);
 close(output);
End.