有趣的数论问题

qiaoyisi

谢谢把程序发上来看看。

tm__xk

qiaoyisi 发表于 2014-1-6 12:42
谢谢把程序发上来看看。

实在没啥值得一提的..

qiaoyisi

好的，谢谢！

tm__xk

qiaoyisi 发表于 2014-1-6 14:31
好的，谢谢！

你的程序不是大概这样的么..

qiaoyisi

我给你发消息留言了

qiaoyisi

using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Windows.Forms;

namespace Pai
{
    public partial class FormSort : Form
    {
        List<List<int>> lli = new List<List<int>>();
        public FormSort()
        {
            InitializeComponent();
        }

        private void FormSort_Load(object sender, EventArgs e)
        {
            lbMsg.Text = "";
            tCount.Enabled = false;
            bResult.Enabled = false;
        }

        private void bCalculate_Click(object sender, EventArgs e)
        {
            lli.Clear();

            lbMsg.Text = "";
            tResult.Clear();
            bResult.Enabled = false;
            tCount.Enabled = false;

            List<int> d = new List<int>();
            int len;
            int i = 0;

            try
            {
                if (string.IsNullOrEmpty(tNum.Text))
                {
                    MessageBox.Show("请输入数组。");
                    return;
                }

                string[] arrStr = tNum.Text.Split(',');
                foreach (string str in arrStr)
                {
                    int num = Convert.ToInt32(str);

                    if (d.Count == 0)
                        d.Add(num);
                    else
                    {
                        if (num < d[0])
                            d.Insert(0, num);
                        else if (num > d[d.Count - 1])
                            d.Add(num);
                        else
                        {
                            for (i = 0; i < d.Count - 1; i++)
                            {
                                if (num > d[i] && num < d[i + 1])
                                {
                                    d.Insert(i + 1, num);
                                    break;
                                }
                            }
                        }
                    }
                }
                len = d.Count;
            }
            catch (Exception ex)
            {
                MessageBox.Show(ex.Message);
                return;
            }

            List<int> tmp = new List<int>();
            List<int> t = new List<int>();

            for (i = 0; i < len; i++)
            {
                tmp.Add(0);
                t.Add(d[i]);
            }

            int strCount = 0;
            while (t.Count == d.Count)
            {
                bool bFound = false;

                if (t.Count > 1)
                {
                    for (i = 0; i < t.Count - 1; i++)
                    {
                        if (t[i] == 0 && Math.Abs(t[i + 1]) > 1 || t[i + 1] == 0 && Math.Abs(t[i]) > 1)
                        {
                            bFound = true;
                            break;
                        }
                        else if (t[i] - t[i + 1] < -1 || t[i] - t[i + 1] > 1)
                        {
                            if (gcd(t[i], t[i + 1]) > 1)
                            {
                                bFound = true;
                                break;
                            }
                        }
                    }
                }

                if (!bFound)
                {
                    //lli.Add(t);
                    strCount++;