记录编号	22326	评测结果	AAATTTTTTT
题目名称	八	最终得分	30
用户昵称	DeiTy	是否通过	未通过
代码语言	Pascal	运行时间	7.004 s
提交时间	2010-11-18 16:17:30	内存使用	0.11 MiB

program eight;
var
   n,l,r,i,j,m,k:longint;
   a:array[1..5] of longint;
begin
  assign(input,'eight.in');
  assign(output,'eight.out');
  reset(input);
  rewrite(output);
  readln(n);
  for i:=1 to n do read(a[i]);
  readln(l,r);
  j:=1;
  i:=l;
  while (i>=l)and(i<=r) do
        begin
         if i mod 8=0 then
                   begin
                        k:=0;
                        for j:=1 to n do
                           if i mod a[j]=0 then k:=1;
                        if k=0 then m:=m+1;
                   end;
       i:=i+1;
      end;
  writeln(m);
  close(input);
  close(output);
end.