PersonalCorpus 版 (精华区)

276888 11:27:28 14 Nov 2002 Big Guava
1214 Pascal Accepted 0.02 sec  49K

program p1214;

var
    m,n:integer;
begin

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

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