算法帖-大家都来试试

Siner

其实我挺喜欢这种题的。
楼主一段时间发些啊。嘿嘿。挺开心的。

茹枫

和你们这些年轻人真没得比。

系统崩溃

怎样才能找到高效率的算法呢？
拿最简单的第1题来说，要我做，只会老老实实地写成

        Dim Sn As Double = 0
        Dim n As Integer = 1
        While Sn <= Val(TB1.Text)
            Sn += 1 / n
            n += 1
        End While
        TB2.Text = n - 1

MathSlope

这个求和是死算法，提速想想语言层次的吧.

醉剑客

While Sn <= Val(TB1.Text)
            Sn += 1 / n
            n += 1
        End While
这样的编程格式不可取:
while sn<=val(tb1.text)
每次要先进行获得tb1的数据(字符类型)-->然后转换为val-->再判断条件-->进行循环

小神

信息学奥林匹克竞赛中的试题！
以前高中考这个时,学过,不过都忘记了.呵呵!
大家可以去买清华的绿皮版信息学奥林匹克竞赛看看,总共三本,已经很多年了,不知道还有卖不?

dreamerate

我来顶! 呵呵!

夜荷

第7题的程序
                static void Main(string[] args)
                {
                        //
                        // TODO: Add code to start application here
                        //
/*
                        System.IO.StreamReader sr = new System.IO.StreamReader("in.txt");
                        if (sr == null)
                        {
                                System.Console.Write("no find in.txt.");
                                return;
                        }

                        //        这里是对输入的文件进行数据转换
                        string t = sr.ReadLine();
                        int num = int.Parse(t);
                        t = sr.ReadLine();*/
                        int num = 4;
                        string t = "1 3 2 2";
                        string [] ar = t.Split(' ');
                        ArrayList apple = new ArrayList();

                        for(int i = 0; i < ar.Length; i++)
                                apple.Add(int.Parse(ar));

                        //        这里才是算法

                        int tl = 0;
                        for(int i = 0; i < num - 1; i++)
                        {
                                ArrayList newapp = new ArrayList();
                                int min1 = (int)apple[0];
                                int min2 = (int)apple[1];
                                for(int j = 2; j < apple.Count; j++)
                                {
                                        if ((int)apple[j] < min2)
                                        {
                                                newapp.Add(min2);
                                                min2 = (int)apple[j];
                                                if (min2 < min1)
                                                {
                                                        int tmp = min2;
                                                        min2 = min1;
                                                        min1 = tmp;
                                                }
                                        }
                                        else
                                                newapp.Add(apple[j]);
                                }
                                tl += min1 + min2;
                                newapp.Add(min1 + min2);
                                apple = newapp;
                        }

                        System.Console.WriteLine(tl);
                }

sandy_zc_1

今天把后面两道题发完。

大家做做啊，不要急着公布源代码，以后我会放测试数据的，你就可以看看你能得多少分了。

sandy_zc_1

lights: Re:算法帖-大家都来试试

这些题其实都是算法的基础啦，这话绝对没错的，即使不会做也不要紧，最起码知道自己少学了一点东西，以后补上就可以了。

话说回来，皇后限制12个我觉得已经好体谅了，我做的15皇后也只算了一分钟，12皇后1秒都不到，输出文件大到好几十兆。不过很遗憾不是vb的成绩，vb版的效率低了10倍以上。

是的，真的都是基础，考察的都是一些常用的算法（最前面几道超级Easy的除外），而且都很单一，同一道题中只主考一种算法。想学编程这些东西是绕不过去的。

皇后的问题，数据规模限制当然是考虑到时间的问题啦，算到一分钟绝对算严重超时了。