program factor;
var i,n,f:integer;

function fact(a:integer):integer;
var b,d5:integer;
begin
  b:=a;d5:=0;
  while b div 5>0 do begin
    b:=b div 5;inc(d5,b);
  end;
  fact:=d5;
end;

Begin
  readln(n);
  for i:=1 to n do begin
    readln(f);
    writeln(fact(f));
  end;
end.