9个回答
展开全部
2021的2022次方除以11的余数是9。
我是用EXCEL的 VBA进行2021的2022次方运算的:
Sub 宏1()
Application.ScreenUpdating = False
Application.DisplayAlerts = False
m = 2021 '从1起乘
n = 2022 'n次方
w = 955 '6683 / 7 '预算结果每7位数放1 个单元格,需用的单元格数
j = 2 '从第二行,乘下一个数
Cells(1, w) = m '放置基数
Do While j <= n '乘2022次
For i = w To 1 Step -1
Cells(j, i) = Cells(j - 1, i) * m
Next
For i = w To 2 Step -1 ‘进位处理
a = Int(Cells(j, i) / 10000000) '超7位数的进位到左侧单元格
b = Cells(j, i) - a * 10000000 '留在本单元格的7位数
Cells(j, i) = b
Cells(j, i - 1) = Cells(j, i - 1) + a
Next
j = j + 1
Loop
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub
结果用了955个单元格,每单元格放7位数的结果,然后从前向后逐单元格求11的余数,如
=MOD((B2023*10000000+C2022),11)
最后单元格得余数为9。
我是用EXCEL的 VBA进行2021的2022次方运算的:
Sub 宏1()
Application.ScreenUpdating = False
Application.DisplayAlerts = False
m = 2021 '从1起乘
n = 2022 'n次方
w = 955 '6683 / 7 '预算结果每7位数放1 个单元格,需用的单元格数
j = 2 '从第二行,乘下一个数
Cells(1, w) = m '放置基数
Do While j <= n '乘2022次
For i = w To 1 Step -1
Cells(j, i) = Cells(j - 1, i) * m
Next
For i = w To 2 Step -1 ‘进位处理
a = Int(Cells(j, i) / 10000000) '超7位数的进位到左侧单元格
b = Cells(j, i) - a * 10000000 '留在本单元格的7位数
Cells(j, i) = b
Cells(j, i - 1) = Cells(j, i - 1) + a
Next
j = j + 1
Loop
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub
结果用了955个单元格,每单元格放7位数的结果,然后从前向后逐单元格求11的余数,如
=MOD((B2023*10000000+C2022),11)
最后单元格得余数为9。
展开全部
2021的2022次方除以11的余数是9。
我是用EXCEL的 VBA进行2021的2022次方运算的:
Sub 宏1()
***.screenupdating = False
***.displayalerts = False
m = 2021 '从1起乘
n = 2022 'n次方
w = 955 '6683 / 7 '预算结果每7位数放1 个单元格,需用的单元格数
j = 2 '从第二行,乘下一个数
Cells(1, w) = m '放置基数
Do While j <= n '乘2022次
For i = w To 1 Step -1
Cells(j, i) = Cells(j - 1, i) * m
Next
For i = w To 2 Step -1 ‘进位处理
a = Int(Cells(j, i) / 10000000) '超7位数的进位到左侧单元格
b = Cells(j, i) - a * 10000000 '留在本单元格的7位数
Cells(j, i) = b
Cells(j, i - 1) = Cells(j, i - 1) + a
Next
j = j + 1
Loop
***.displayalerts = True
***.screenupdating = True
End Sub
结果用了955个单元格,每单元格放7位数的结果,然后从前向后逐单元格求11的余数,如
=MOD((B2023*10000000+C2022),11)
最后单元格得余数为9。
我是用EXCEL的 VBA进行2021的2022次方运算的:
Sub 宏1()
***.screenupdating = False
***.displayalerts = False
m = 2021 '从1起乘
n = 2022 'n次方
w = 955 '6683 / 7 '预算结果每7位数放1 个单元格,需用的单元格数
j = 2 '从第二行,乘下一个数
Cells(1, w) = m '放置基数
Do While j <= n '乘2022次
For i = w To 1 Step -1
Cells(j, i) = Cells(j - 1, i) * m
Next
For i = w To 2 Step -1 ‘进位处理
a = Int(Cells(j, i) / 10000000) '超7位数的进位到左侧单元格
b = Cells(j, i) - a * 10000000 '留在本单元格的7位数
Cells(j, i) = b
Cells(j, i - 1) = Cells(j, i - 1) + a
Next
j = j + 1
Loop
***.displayalerts = True
***.screenupdating = True
End Sub
结果用了955个单元格,每单元格放7位数的结果,然后从前向后逐单元格求11的余数,如
=MOD((B2023*10000000+C2022),11)
最后单元格得余数为9。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
2021的2022次方除以11的余数是9。
我是用EXCEL的 VBA进行2021的2022次方运算的:
Sub 宏1()
***.screenupdating = False
***.displayalerts = False
m = 2021 '从1起乘
n = 2022 'n次方
w = 955 '6683 / 7 '预算结果每7位数放1 个单元格,需用的单元格数
j = 2 '从第二行,乘下一个数
Cells(1, w) = m '放置基数
Do While j <= n '乘2022次
For i = w To 1 Step -1
Cells(j, i) = Cells(j - 1, i) * m
Next
For i = w To 2 Step -1 ‘进位处理
a = Int(Cells(j, i) / 10000000) '超7位数的进位到左侧单元格
b = Cells(j, i) - a * 10000000 '留在本单元格的7位数
Cells(j, i) = b
Cells(j, i - 1) = Cells(j, i - 1) + a
Next
j = j + 1
Loop
***.displayalerts = True
***.screenupdating = True
End Sub
结果用了955个单元格,每单元格放7位数的结果,然后从前向后逐单元格求11的余数,如
=MOD((B2023*10000000+C2022),11)
最后单元格得余数为9。
我是用EXCEL的 VBA进行2021的2022次方运算的:
Sub 宏1()
***.screenupdating = False
***.displayalerts = False
m = 2021 '从1起乘
n = 2022 'n次方
w = 955 '6683 / 7 '预算结果每7位数放1 个单元格,需用的单元格数
j = 2 '从第二行,乘下一个数
Cells(1, w) = m '放置基数
Do While j <= n '乘2022次
For i = w To 1 Step -1
Cells(j, i) = Cells(j - 1, i) * m
Next
For i = w To 2 Step -1 ‘进位处理
a = Int(Cells(j, i) / 10000000) '超7位数的进位到左侧单元格
b = Cells(j, i) - a * 10000000 '留在本单元格的7位数
Cells(j, i) = b
Cells(j, i - 1) = Cells(j, i - 1) + a
Next
j = j + 1
Loop
***.displayalerts = True
***.screenupdating = True
End Sub
结果用了955个单元格,每单元格放7位数的结果,然后从前向后逐单元格求11的余数,如
=MOD((B2023*10000000+C2022),11)
最后单元格得余数为9。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
2021的2022次方除以11的余数是9。
我是用EXCEL的 VBA进行2021的2022次方运算的:
Sub 宏1()
***.screenupdating = False
***.displayalerts = False
m = 2021 '从1起乘
n = 2022 'n次方
w = 955 '6683 / 7 '预算结果每7位数放1 个单元格,需用的单元格数
j = 2 '从第二行,乘下一个数
Cells(1, w) = m '放置基数
Do While j <= n '乘2022次
For i = w To 1 Step -1
Cells(j, i) = Cells(j - 1, i) * m
Next
For i = w To 2 Step -1 ‘进位处理
a = Int(Cells(j, i) / 10000000) '超7位数的进位到左侧单元格
b = Cells(j, i) - a * 10000000 '留在本单元格的7位数
Cells(j, i) = b
Cells(j, i - 1) = Cells(j, i - 1) + a
Next
j = j + 1
Loop
***.displayalerts = True
***.screenupdating = True
End Sub
结果用了955个单元格,每单元格放7位数的结果,然后从前向后逐单元格求11的余数,如
=MOD((B2023*10000000+C2022),11)
最后单元格得余数为9。
我是用EXCEL的 VBA进行2021的2022次方运算的:
Sub 宏1()
***.screenupdating = False
***.displayalerts = False
m = 2021 '从1起乘
n = 2022 'n次方
w = 955 '6683 / 7 '预算结果每7位数放1 个单元格,需用的单元格数
j = 2 '从第二行,乘下一个数
Cells(1, w) = m '放置基数
Do While j <= n '乘2022次
For i = w To 1 Step -1
Cells(j, i) = Cells(j - 1, i) * m
Next
For i = w To 2 Step -1 ‘进位处理
a = Int(Cells(j, i) / 10000000) '超7位数的进位到左侧单元格
b = Cells(j, i) - a * 10000000 '留在本单元格的7位数
Cells(j, i) = b
Cells(j, i - 1) = Cells(j, i - 1) + a
Next
j = j + 1
Loop
***.displayalerts = True
***.screenupdating = True
End Sub
结果用了955个单元格,每单元格放7位数的结果,然后从前向后逐单元格求11的余数,如
=MOD((B2023*10000000+C2022),11)
最后单元格得余数为9。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
2021的2022次方是4086462。次方最基本的定义是:设a为某数,n为正整数,a的n次方表示为a&319;,表示n个a连乘所得之结果,如2&308;=2×2×2×2=16。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询