program cogs108;
var
qu,chun,a,i:integer;
begin
assign(input,'save.in');reset(input);
assign(output,'save.out');rewrite(output);
for i:=1 to 12 do begin
read(a);
if qu+300<a then begin
{close(input);}write('-',i);
close(output);exit;end;
chun:=chun+100*((qu+300-a)div 100);
qu:=(qu+300-a) mod 100;
end;
write(chun*1.2+qu:0:0);
close(input);close(output);
end.