讨论 - 这样就过了，水水水水水水水水水水！！

讨论 / 这样就过了，水水水水水水水水水水！！

zhzq1865 2011-03-14 05:56:00

点我顶贴收藏删除

var

m,a,b:longint;

begin

readln(m);

for a:=1 to m div 2 do

for b:=1 to m div 2+1 do

if (((a+b)*(b-a+1))div 2=m)and(a<b)then writeln(a,' ',b);

end.

查看更多回复

拥有 RQNOJ 账号，您可以：

提交回复

  快速帮助 | 运行状态 | 反馈举报 | 关于我们 | 免责声明 | 浙ICP备11060257号

    Processed in 0.0036	Second(s)
    Copyright (C) RQNOJ 2007-2019. All Rights Reserved.