编写VB程序,求Sn=a+aa+aaa+…(n个a)的值,其中n是表示a的个数,a是【1,9】之间的随机正整数
来源:学生作业帮 编辑:大师作文网作业帮 分类:综合作业 时间:2024/09/20 14:20:47
编写VB程序,求Sn=a+aa+aaa+…(n个a)的值,其中n是表示a的个数,a是【1,9】之间的随机正整数
Private Sub Command1_Click()
Dim a%,n%,i%,Sn$
n = InputBox(请输入n的值)
Randomize
a = Int(9 * Rnd + 1)
Print Tab(30); "n=" & n," a = " & a; ""
Temp = a
Picture1.Print "Sn="; a;
For i = 1 To n - 1
Temp = Temp * 10 + a
Picture1.Print "+"; Temp;
Next
Print
End Sub
(这样比较合适吧)
Dim a%,n%,i%,Sn$
n = InputBox(请输入n的值)
Randomize
a = Int(9 * Rnd + 1)
Print Tab(30); "n=" & n," a = " & a; ""
Temp = a
Picture1.Print "Sn="; a;
For i = 1 To n - 1
Temp = Temp * 10 + a
Picture1.Print "+"; Temp;
Next
End Sub
(这样比较合适吧)
编写VB程序,求Sn=a+aa+aaa+…(n个a)的值,其中n是表示a的个数,a是【1,9】之间的随机正整数
编写程序,求Sn=a+aa+aaa+…(n个a)的值,其中n是表示a的个数,a是【1,9】之间的随机正整数.
1、编写程序,求 Sn=a+aa+aaa+...+aaaa...aaa(n个a)的值,其中a是一个数字,例如,a=2,n
用vb编写程序:求s=aa…aa-…-aaa-aa-a(此处aa…aa表示n个a,a和n的值在1至9之间)
编写程序,求 Sn=a+aa+aaa+...+aaaa...aaa(n个a)的值,其中a是一个数字,
求Sn=a+aa+aaa+...+aaa...(n个a)之值,其中a是一个数字,n表示a的位数
求Sn=a+aa+aaa+...+aa...a(n个a)之值,其中a是一个数字,n表示a的位数,例如:2+22+222+
求S=a+aa+aaa+….+aaaa…a其中,a是1-9的一个数字,n表示的位数,程序要求输入a和n.
用数组做题.求sn =a+aa+aaa+……+aa…aa之值,其中a是一个数字,n表示a的位数,
编写程序,求sn=a+aa+aaa+.+a...aaa(n个)的值.结果不对,求问哪里错了?
vb,3.求Sn=a+aa+aaa+aaaa+…+aa…aaa(n个a),
VB求助:求Sn=a+aa+aaa+aaaa+…+aa…aaa(n个a),