PersonalCorpus 版 (精华区)

276678 08:31:18 14 Nov 2002 Big Guava
1224 Pascal Accepted 0.02 sec 53K

program p1224;

var
    m,n:extended;

begin

{$IFNDEF ONLINE_JUDGE}
    assign(input,'input1224.txt');reset(input);
    assign(output,'output1224.txt');rewrite(output);
{$ENDIF}

    readln(n,m);
    if (n>m) then writeln(m+m-1:0:0) else writeln(n+n-2:0:0);
end.
[百宝箱] [返回首页] [上级目录] [根目录] [返回顶部] [刷新] [返回]
Powered by KBS BBS 2.0 (http://dev.kcn.cn)
页面执行时间:1.954毫秒