VB程序设计有关数组的难题
随机产生20个两位整数,并统计不同的整数个数.这道题该怎么样编写代码?
Private Sub Command1_Click() Dim i As Integer, j As Integer Dim A(0 To 19) As Integer, B(0 To 19) As Integer Me。
Cls Randomize Print "产生20个两位随机数" For i = 0 To 19 A(i) = Rnd * 90 + 10 Next i For i = 0 To 9 Print A(i); Next Print For i = 10 To 19 Print A(i); Next Print For i = 0 To 19 For j = 0 To 19 If A(i) = A(j) Then B(i) = B(i) + 1 Next Next Print "不同整数的个数" For i = 0 To 19 For j = 0 To i - 1 If A(i) = A(j) Then GoTo e: Next Print A(i); Print B(i); Print "个" e: Next End Sub 。
答:C++描述 #include using namespace std; const MAX_SIZE=50; int main() { int Stack[M...详情>>
答:我建议你去--天下网吧联盟 这里面都是网吧业主和网管交流的论坛,你可以自己注册一个用户进去看看,你可以和他们交流也可以寻求他们的帮助,我想没有你解决不了的问题,...详情>>
答:格式化文本区域的段落标记,用于规定文本和层的属性和位置等。比如: 新浪网 用来规定 新浪网 这三个字居中显示。 文本中心(CENTER)、左(LEFT)或右(R...详情>>