编程C,C ++,Java,PHP,Ruby,图灵,VB
计算机科学加拿大 
编程C,C ++,Java,PHP,Ruby,图灵,VB  

用户名:   Password: 
 登记登记   
 我的解决方案
指数 -> 竞赛
转到页面 1, 2  下一页
查看上一个主题 可打印的版本下载主题订阅本主题私人信息刷新页面 查看下一个主题
作者 信息
JSBN.




邮政发布: 2003年2月25日星期二11:01  帖子主题:我的解决方案

好的,很多人可能今天做了比赛。这很容易(对我来说)直到我击中了诗歌问题,我没有芬兰。这是我对比赛的前3个问题的答案。我会尽力休息需要的东西:

问题1(三叉戟)

代码:
var t.: int
var s.: int
v v.: int


放"Enter tine length:"
得到
放"Enter tine spacing:"
得到
放"Enter handle lenght:"
得到H.


为了i1 : 1 .. t

    for i2 : 1 .. 3
        put "*" ..

        for i3 : 1 .. s
            put " " ..
        end for

    end for

    put ""

结束

如果s = 0则
别的
    for i4 : 1 .. (5 + s * 2) - 2
        put "*" ..
    end for
    put ""
万一

为了i5 : 1 .. h
    for i6 : 1 .. s + 1
        put " " ..
    end for
    put "*"
结束


问题2(图片)

代码:
%较大的照片将需要更多的计算时间
var c.: int
v z.: int
var t2.: int
var d1: int
var d2: int

环形

    put "输入图片数量"
    get C
    t2 := 65000
    exit when C = 0
    for i1 : 1 .. C
        for i2 : 1 .. C
            z := i1 * i2

            if z = C then
                if (i1 + i2) * 2 <= t2 then
                    t2 := (i1 + i2) * 2
                    d1 := i1
                    d2 := i2

                    exit
                end if
            end if
        end for
    end for
    put "最小周长是", t2, "尺寸", d1, " X ", d2
    put ""
结束循环


问题3(蛇和梯子)

代码:

var sum: int
var loca.: int := 1

环形
    put "Enter sum of dice:"
    get sum

    if sum = 0 then
        put "You Quit!"
        quit
    end if
    if loca + sum > 100 then
    else
        loca := loca + sum
    end if
    if loca = 9 then
        loca := 34
   Elsif Loca = 40那么
        loca := 64
   elsif loca = 67然后
        loca := 86
   elsif loca = 99然后
        loca := 77
   elsif loca = 90然后
        loca := 48
   elsif loca = 54那么
        loca := 19
    end if



    put "你现在在广场上", loca
   当Loca = 100时退出
结束循环
放"You Win!"
赞助
赞助
赞助
赞助
托尼




邮政发布: 2月25日,2003年11:28 AM  帖子主题:(没有主题)

很好,那是3 * 15 = 45? id说更好的一半人。

当我获得确认的时候,我会上载诗歌,地板,子,那些他们是正确的。不幸的是,我无法在剩下的30分钟内解决S5卡车,我会踢自己......但大多数是我的老师,如果这将花费我我的第2阶段 邪恶或非常疯狂

现在我的得分悬as为60。 使困惑

有人可以发布卡车问题的解决方案吗?!
最新来自compsci.ca/blog: Tony's 编程博客。 DWite - A. 编程竞赛.
asok.




邮政发布: 星期二25,2003 12:06 PM  帖子主题:(没有主题)

为了娱乐目的,请仔细看看我的J2版本的更长(仍然有效):
代码:

var picnum: int
var x,y: real
var柜台: int := 0
x := 10
y := 1
环形
    put "输入图片数量:"
    get picnum
    if picnum = 0 then
        exit
    end if
    counter := 0
    var total :阵列1 ..帕纳姆真实
    var integers :阵列1 .. int的picnum
    var finished :阵列1 ..帕纳姆真实
    var perimeter :阵列0 ..帕纳姆真实
    var smallest : real := 999999
    for i : 1 .. picnum
        integers (i) := i
    end for
    for i : 1 .. picnum
        total (i) := picnum / i
        for k : 1 .. picnum
            if total (i) = integers (k) then
            counter := counter + 1
                finished (counter) := total (i)
            end if
        end for
    end for
    for l : 1 .. counter
        perimeter (l) := finished (l) * 2 + finished (counter - l+1) * 2
       if perimeter (l) < smallest then
             smallest := perimeter (l)
             x:= finished (l)
             y:= finished (counter - l+1)
        end if
    end for
    put "最小周长是", smallest, " with dimensions ", y, " x ", x
    put " "
结束循环


和JSBN,你的J3是不正确的,你错过了:
代码:
如果滚动>=2 and roll <=12 then

这样的方式2个骰子的总和在2到12之间,你可以在你的比赛中做到这一点,在场景中是不可能的。





邮政发布: 2月25日,2003年1:36下午1:36   Post subject: ccc

我完成了所有关于J LVL的问题,但是5,大坝地板!我没时间了 伤心

我会尽快发布我的刺客,我在学校留下了我的磁盘 笑
计算机科学加拿大 帮助在C,C ++,Java,PHP,Ruby,图灵,VB等内容中进行编程!
托尼




邮政发布: 2月25日星期二:下午2:40  帖子主题:(没有主题)

雅,地板是诡计 眨眼

据我所知,今年持续时间更加困难。

此外,ASOK ...问题没有要求验证总和,所以您假设正确的输入。也许我正在玩“特殊”骰子? 很高兴
最新来自compsci.ca/blog: Tony's 编程博客。 DWite - A. 编程竞赛.
asok.




邮政发布: 2月25日星期二:2003年9:47 PM  帖子主题:(没有主题)

没有问题具体说,卷是2-12的2骰子的总和,我今天会仔细检查,但我很确定。它也使得Sence更多,在他们从不使用12以上的数字。
托尼




邮政发布: 2003年2月26日星期三上午2:30  帖子主题:(没有主题)

完全......输入是2-12或0,你不需要仔细检查,虽然我在第一次移动并赢得游戏时,我会看到你的汇款99。但由于该计划旨在帮助“可视化”在较大的屏幕上的游戏中的游戏,因此我们假设正确的输入。

我不是说你错了,它实际上很好你想到这些细节......但我只是说程序没有那个 眨眼
最新来自compsci.ca/blog: Tony's 编程博客。 DWite - A. 编程竞赛.
三角洲




邮政发布: 星期四:2003年3月7:14 PM  帖子主题:??????????????????

这是什么测试,我可以在哪里收到这些问题,以便我可以回答他们并测试我的技能。如果有人能把他们寄给我,我就会欣赏它。 thnx。 :D.
赞助
赞助
赞助
赞助
asok.




邮政发布: 星期五,2003年3月21日11:56 AM  帖子主题:(没有主题)

这是加拿大计算竞争,可悲的是,他们的网站尚未更新,以发布这些问题,但您可以在此处查看以前的竞赛的其他问题: http://www.cmc.uwaterloo.ca/ccc/index.html
Bugzpodder.




邮政发布: 2003年5月24日星期六晚上10:42 AM  帖子主题:(没有主题)

你不介意C ++右托尼的卡车问题吗?我想你仍然想在3个月后看到它 眨眼 我不想在下周2阶段之前触摸图灵。 anwyazy我现在正在运作卡车运输。
Bugzpodder.




邮政发布: 2003年5月24日星期六12:07 PM  帖子主题:(没有主题)

无论如何,这是我的卡车解决方案。它适用于3个测试用例,所以显而易见的是它有一个错误。这在理论上为我工作,但我不知道为什么它不适用于测试案例4和5.我花了大约一个小时调试它。任何可以捕获错误的人都会得到bits(我从未捐出BIT B4,但我想捐赠位函数工作?)

代码:

#包括<fstream>
使用命名空间std;
int c,r,d;
int city [1000] [1000]; //城市[i] [j] - 从i到j的最大重量
INT MAXW = 100000;     //卡车可以携带的最大重量

int min..(int a,int b){  //minimum
    if (a<b)返回一个;否则返回b;
}

空白流动(int dest){   //最大流量算法的一部分
     int flow[1000];   //流[i]城市0到城市的最大重量
     bool visited[1000];  //if visited
     int maxflow,maxloc,i,xyzzy; // maxflow - 最高未使用的路径
                                         // maxflow - 最高未使用路径的索引
     for (i=0;i<C;i++){    //initialize
         flow[i]=0;
         visited[i]=false;
     }
     flow[0]=maxw;


     while (true){
           maxflow=0;
           maxloc=-1;

         for (i=0;i<C;i++){ //找到最高的未使用的路径
             if (flow[i]>maxflow && !visited[i]){
                maxflow=flow[i];
                maxloc=i;
             }
         }
         if (maxloc == dest || maxloc == - 1) break;  //found, quit
         访问[maxloc] = true;  //visited
         for (i=0;i<C;i++)     
             if (city[maxloc][i]>0){ //更新所有邻居
                xyzzy=min(maxflow,city [maxloc] [i]);
                if (flow[i]<xyzzy)
                   flow[i]=xyzzy;
             }
     }

     maxw=min(maxw,flow[dest]); //找到Dest City的最大重量

}

int main(){
    ifstream fin("truck4.in");
    ofstream fout("truck.out");
    fin>>C>>R>>D;
    int t1,t2,d,i,j;

    //Input
    for (i=0;i<R;i++) {
        fin>>t1>>t2>>d;
        city[--t1][--t2]=d;
        city[t2][t1]=d;
    }

    for (i=0;i<D;i++) {fin>>t1;flow(--t1);} //检查所有Dest城市
    fout<<maxw<<endl;  //output

    fin.close();
    fout.close();
    return 0;
}
asok.




邮政发布: 2003年5月24日星期六12:13 PM  帖子主题:(没有主题)

什么是5个测试用例,所以我可以尝试调试这一点。
Bugzpodder.




邮政发布: 2003年5月24日星期六12:26 PM  帖子主题:(没有主题)

以下是更大的测试用例的*更快的版本。而不是为每个目的地城市单独计算流量,而是在1000个目的地城市的情况下,我一下子会这样做,而我没有重复计算1000次的东西。

附加测试用例。 Truck.in,Truck.out是样本I / O.其余的是竞争I / O.它在Truck4和Truck5上失败了。

代码:

#包括<fstream>
使用命名空间std;
int c,r,d;
int city [1000] [1000];
int dest.[1000];
INT MAXW = 100000;

int min..(int a,int b){
    if (a<b)返回一个;否则返回b;
}

空白流动(){   //最大流量算法的一部分
     int flow[1000];
     bool visited[1000];
     int maxflow,maxloc,i,xyzzy;
     for (i=0;i<C;i++){
         flow[i]=0;
         visited[i]=false;
     }
     flow[0]=maxw;

     while (true){
           maxflow=0;
           maxloc=-1;

         for (i=0;i<C;i++){
             if (flow[i]>maxflow && !visited[i]){
                maxflow=flow[i];
                maxloc=i;
             }
         }
         if (maxloc==-1) break;
         访问[maxloc] = true;
         for (i=0;i<C;i++)
             if (city[maxloc][i]>0){
                xyzzy=min(maxflow,city [maxloc] [i]);
                if (flow[i]<xyzzy)
                   flow[i]=xyzzy;
             }
     }
//     cout<<maxw<<endl;
     for (i=0;i<D;i++)
         maxw=min(maxw,flow[dest[i]]);

}

int main(){
    ifstream fin("truck.in");
    ofstream fout("truck.out");
    fin>>C>>R>>D;
    int t1,t2,d,i,j;

    //Input
    for (i=0;i<R;i++) {
        fin>>t1>>t2>>d;
        city[--t1][--t2]=d;
        city[t2][t1]=d;
    }
    for (i=0;i<D;i++) {fin>>dest[i];dest[i]--;}
    flow();
    fout<<maxw<<endl;
    cout<<maxw<<endl;
    fin.close();
    fout.close();
    return 0;
}



Truck.zip.
 Description:

下载
 Filename:  truck.zip
 Filesize:  125.85 KB
 Downloaded:  328 Time(s)

托尼




邮政发布: 2003年5月24日星期六12:57 PM  帖子主题:(没有主题)

嘿bugz。请你将一些评论放入你的程序中......我有点迷失在那里,不太了解逻辑 伤心
最新来自compsci.ca/blog: Tony's 编程博客。 DWite - A. 编程竞赛.
Bugzpodder.




邮政发布: 2003年5月24日星期六1:23 PM  帖子主题:(没有主题)

我的第二个程序与第一个程序几乎相同。评论在第一个程序中都在那里(我认为我只改变了2-3行)
从上一个显示帖子:   
   指数 -> 竞赛
查看上一个主题 告诉一个朋友可打印的版本下载主题订阅本主题私人信息刷新页面 查看下一个主题

12  [ 18 Posts ]
转到页面 1, 2  下一页
跳到:   


Style:  
搜索: