- 285 名前：１３２人目の素数さん mailto:sage [2024/10/31(木) 16:17:56.45 ID:grkcalAP.net]
- Wolfram Language 14.0.0 Engine for Microsoft Windows (64-bit)
Copyright 1988-2023 Wolfram Research, Inc.
In[1]:= Table[QuotientRemainder[10,b],{b,-9,-1}]
Out[1]= {{-2, -8}, {-2, -6}, {-2, -4}, {-2, -2}, {-2, 0}, {-3, -2}, {-4, -2}, {-5, 0}, {-10, 0}}
In[2]:= Table[QuotientRemainder[10,b],{b,1,9}]
Out[2]= {{10, 0}, {5, 0}, {3, 1}, {2, 2}, {2, 0}, {1, 4}, {1, 3}, {1, 2}, {1, 1}}
