摇曳百合吧 关注:59,350贴子:974,331

吧里配CP如何?

取消只看楼主收藏回复

已经是CP的要来参加也无所谓…只要另一半同意就好…因为叹单身的新人不少…所以开个帖试试…
规则如下:
今日结束前,所有楼层的客户均可参加活动。
CP产生方式:由计算机随机产生两个数字,若着两个数字所对应的楼层有效且不为同一人,则将两人配为CP,之后这两楼客户的所有楼层视为无效。直至没有楼层或只有一位客户的楼层有效。
如果大家没意见我会在明日1点之前发布最后的结果…


IP属地:上海来自手机贴吧1楼2012-05-06 18:49回复
    小眠报名了呢~想找一个什么样的?嘿嘿~~


    IP属地:上海来自手机贴吧4楼2012-05-06 18:52
    回复
      多占几楼可以降低自己akari~n的概率~~(我一人占了仨了…/自踹


      IP属地:上海来自手机贴吧10楼2012-05-06 18:55
      回复
        糟糕…被老鼠酱看穿了…本来想吐槽一下的…发现老鼠傻傻都来了……


        IP属地:上海来自手机贴吧12楼2012-05-06 18:56
        回复
          期待小井的十连抽…


          IP属地:上海来自手机贴吧20楼2012-05-06 18:58
          回复
            诶?我说的是直接按楼看哦~~回复=报名哦~~~


            IP属地:上海来自手机贴吧21楼2012-05-06 18:59
            回复
              比如说计算机产生的两个随机数是“1,2”那么我和小眠就被配成了CP,之后再抽到我或小眠就被视为无效~~


              IP属地:上海来自手机贴吧32楼2012-05-06 19:02
              回复
                用Pascal编个程序就好了~~超简单~~


                IP属地:上海来自手机贴吧41楼2012-05-06 19:06
                回复
                  random是随机数函数……


                  IP属地:上海来自手机贴吧43楼2012-05-06 19:07
                  回复
                    …宇宙君的是C语言吧?


                    IP属地:上海来自手机贴吧53楼2012-05-06 19:16
                    回复
                      仔细看来老鼠酱占了好多楼呢~~看来很有想法啊~~


                      IP属地:上海来自手机贴吧54楼2012-05-06 19:19
                      回复
                        楼多一点会更有意思一点哦~~(结果占了最多楼的一位却没分到CP的去让度娘把存在感吐出来…


                        IP属地:上海来自手机贴吧59楼2012-05-06 19:24
                        回复
                          手机实在懒得打程序…宇宙君辛苦了~


                          IP属地:上海来自手机贴吧62楼2012-05-06 19:26
                          回复
                            只要接受结果就好了小眠~不过我编的是Pascal…所以会有点不一样…


                            IP属地:上海来自手机贴吧64楼2012-05-06 19:28
                            回复
                              var
                              a:array[1..500]of boolean;
                              b:array[1..500]of string;
                              i,j,n,k,l:integer;
                              begin
                              randomize;
                              readln(n);
                              k:=n;
                              for l:=1 to n do
                              read(b[l]);
                              fillchar(a,sizeof(a),true);
                              repeat
                              i:=random(n);
                              j:=random(n);
                              if (b[i]<>b[j])and a[i] and a[j] then begin
                              writeln(b[i],' ',b[j]);
                              for l:=1 to n do
                              if (b[l]=b[i])or(b[j]=b[l]) then a[l]:=false;
                              dec(k);
                              end;
                              until k<2;
                              end.


                              IP属地:上海来自手机贴吧77楼2012-05-06 19:46
                              回复