问题标题: 1174

0
0

0
已采纳
黄俊博
黄俊博
资深光能
资深光能

pascal、会翻译吗

0
0
欧阳语聪
欧阳语聪
资深守护
资深守护
    for(i=1;i<=n;i++)
    {
        sum+=i;
        for(j=i;j>=1;j--)
        {
            if(sum-(j*2)==n)
            {
                flag=1;
                cout<<j<<" "<<i<<endl;
            }
        }
    }
    if(flag==0) cout<<"0"<<endl;
0
欧阳语聪
欧阳语聪
资深守护
资深守护
    for(i=1;i<=n;i++)
    {
        sum+=i;
        for(j=i;j>=1;j--)
        {
            if(sum-(j*2)==n)
            {
                flag=1;
                cout<<j<<" "<<i<<endl;
            }
        }
    }
    if(flag==0) cout<<"0"<<endl;
0
黄俊博
黄俊博
资深光能
资深光能
 for i:=1 to 10000 do a[i]:=i;
    repeat
        inc(count);
        s:=s+count;
        for i:=1 to count do
        begin
            if s-a[i]*2=n then
            begin
                writeln(i,' ',count);
                inc(total);
            end;
        end;
    until count=1000;
    if total=0 then writeln(0);
我要回答