---

begin 
  var k,l,m,n,d: integer ;
  var i, count: integer;
  begin
    readln(k);
    readln(l);
    readln(m);
    readln(n);
    readln(d);
    count := 0;
    for i := 1 to d do
    begin
      if ( i mod k = 0) or (i mod l = 0) or (i mod m = 0) or (i mod n = 0) then
        inc(count);
    end;
    writeln(count);
  end;
end.