void sk(int A[], int B[], int & n, int  p)
{
  int iterpta = 0;
  int iterptaSiaIteracija = 0;
  int dydis = n;
    for(int i=0; i<dydis; i++)
    {
        iterptaSiaIteracija = 0;
        for(int j=0; j<p; j++)
        {
            if(B[j]%A[i + iterpta]==0)
            {
                int iterpimoIndeksas = i + iterpta + iterptaSiaIteracija+1;
                iterpk(A,n,B[j],iterpimoIndeksas);
                iterptaSiaIteracija++;
            }
        }
        iterpta += iterptaSiaIteracija;
    }
}