Климат каких территории Евразии изменился бы, если бы высота Гималаев была не более 1000 м?

VAR
   i, el, kol, n: Integer;
BEGIN
   Read(n);
   
   kol := 0;
   for i := 1 to n do begin   
      Read(el);
      if (el mod 3 = 0)and(el mod 5 <> 0) then Inc(kol);
   end;
   
   Write(kol);
END.