int i = 0;
            //for (int i = 0; i < A1.Count-1; i++)
            while (i<A1.Count-1)
            {

                int[] B = new int[A1.Count];
                A1.CopyTo(B);
                if ((((B[i] > 0) & (B[i + 1] > 0)) ^ ((B[i] < 0) & (B[i + 1] < 0)))==false) // проверка на равность iтого числа к i+1 числу по знаку
                {

                    A1.Clear();
                    for (int j = 0; j <= i; j++) A1.Add(B[j]); //  добавляются числа в массив А1 до iтого элемента включительно


                    A1.Add(k); // вставляется число К

                    for (int p = i+1; p < B.Length; p++) A1.Add(B[p]); // добавляются оставшиеся числа  в Массив А1 , начиная с i+1 элемента.
                    i ++;
                }
                i++;

            }

            for (int t = 0; t < A1.Count; t++) textBox5.Text += String.Format("{0}", A1[t]) + "   ";