var
 a1,a2,a3,a4,a5,a6,i,j,ans:longint;
begin
 assign(input,'fmcz.in');reset(input);
 assign(output,'fmcz.out');rewrite(output);
 readln(a1,a2,a3,a4,a5,a6);
 for j:=1 to 1000 do
  begin
   i:=j;
   if (i>=a6*20) then i:=i-a6*20
    else i:=i mod 20;
   if (i>=a5*10) then i:=i-a5*10
    else i:=i mod 10;
   if (i>=a4*5) then i:=i-a4*5
    else i:=i mod 5;
   if (i>=a3*3) then i:=i-a3*3
    else i:=i mod 3;
   if (i>=a2*2) then i:=i-a2*2
    else i:=i mod 2;
   if i<=a1 then inc(ans);
  end;
 writeln(ans);
 close(input);
 close(output);
end.