会.NET的帮忙-->purana转移
是这样一个题: 求a+aa+aaa+aaaa+....+aaa..a(n个),其中a为1-9之间的整数.
例如:当 a=1, n=3 时,求1+11+111之合;
当 a=5, n=7时, 求5+55+555+5555+55555+555555+5555555之合.
我的代码如下;
Module Module1
Sub Main()
Dim n, i, h, k As Integer
Dim a, j As String
j = ""
a = Console.ReadLine()
n = CSng(a) + 2
For i = 1 To n
For k = 1 To n
j += CStr(k)
Next k
h = h + CInt(j)
Next i
Console.Write("您的答案是：" & h)
Console.ReadLine()
End Sub
End Module
他提示我h = h + CInt(j)有超出数据范围的可能性,有人回答我问题吗?
