PersonalCorpus 版 (精华区)

寄信人: sino (蚱蜢舟)
标  题: 1200
发信站: 哈工大紫丁香 (2002年04月13日22:16:00 星期六)
来  源: 202.118.239.224 

184872  14:18:22    13 Apr 2002
Bozhang,HIT,P.R.China 1200 Pascal Accepted 0.02 sec 53K

var
    k,x,y,best_x,best_y:integer;
    a,b,c,best:extended;
begin
    readln(a,b);
    readln(k);
    best:=0; best_x:=0; best_y:=0;
    for x:=0 to k do begin
        if b<0 then y:=0 else begin
            y:=k-x;
            if y>trunc(b/2) then y:=trunc(b/2);
        end;
        c:=(a-x)*x+(b-y)*y;
        if c>best then begin
            best_x:=x;
            best_y:=y;
            best:=c;
        end;
    end;
    writeln(best:0:2);
    writeln(best_x,' ',best_y);
end.

--
    我一直认为马佩军是西电编程第一高手,他编程的时候根本不是人,是指针。

                                             --《阳光男孩之大学十年》

※ 来源:·哈工大紫丁香 bbs.hit.edu.cn·[FROM: 202.118.239.224]
[百宝箱] [返回首页] [上级目录] [根目录] [返回顶部] [刷新] [返回]
Powered by KBS BBS 2.0 (http://dev.kcn.cn)
页面执行时间:2.537毫秒