作业帮关于VB的编程题、、、求一个实数的平方根,平方,立方,立方根,每个数保留3位小数 谢谢啦
来源：学生作业帮助网 编辑：作业帮 时间：2024/12/02 14:59:09
xSMKQ+9\ A ,|.qt5RQBeB4Ew34U
~w{d1 z:8=usV>{7ϨE?搞E mm
$ ݫjK,Sj^ ;1 WQ!cۛYBJJ<( VM(MqB QEqzw.+Q$V 1G)Dl۔jC9,TL)X&t P`,q+k A!_Tyr7UȢ,V"XZ1s-("""ӌ-,Z}Z冻g j%@RHT7~Y
关于VB的编程题、、、求一个实数的平方根,平方,立方,立方根,每个数保留3位小数 谢谢啦
关于VB的编程题、、、求一个实数的平方根,平方,立方,立方根,每个数保留3位小数 谢谢啦
关于VB的编程题、、、求一个实数的平方根,平方,立方,立方根,每个数保留3位小数 谢谢啦
Private Sub Form_Load()
q = 123
'平方
MsgBox c(q, 2)
'平方根
MsgBox c(q, 1 / 2) '求2次根一个数的1/2次方
'立方
MsgBox c(q, 3)
'立方根
MsgBox c(q, 1 / 3)
End Sub
Function c(d, e)
c = d ^ e
f = a(c)
c = Left(c, f + 3)
End Function
Function a(b)
b = b & ".000"
a = InStr(1, b, ".", 1)
End Function
'----------------------------------------------------------------
'更直接的方法
Private Sub Form_Load()
q = 123
'平方
MsgBox c(q, 2)
'平方根
MsgBox c(q, 1 / 2) '求2次根一个数的1/2次方
'立方
MsgBox c(q, 3)
'立方根
MsgBox c(q, 1 / 3)
End Sub
Function c(a, b)
c = Format(a ^ b, "0.000")
End Function
关于VB的编程题、、、求一个实数的平方根,平方,立方,立方根,每个数保留3位小数 谢谢啦
设计一个算法,求实数a的绝对值（VB编程）
用加减法求121的平方根 编程
用VB编程写一个圆柱体体积的函数过程
用VB编程求Fibonacci数列的第n项
vb编程,利用级数求函数的近似值（误差
VB编程题.输入一个整数判断他是否是5 的倍数
VB有一个三位数abc和a 的积为一个四位正整数baac,编程求这一个三位数
求VB计算长方形的周长和面积编程长方形的周长和面积编程
求VB编程：任意输入10个数,求奇数的个数,偶数的和,以及最后一个偶数.
高中信息技术（VB编程）一个三位数x,百位数 > 十位数 > 个位数,求所有的数的和.最好能用VB语境!= =急
关于VB的编程题.如何在Text1随机产生+、-、*、/四种符号,用什么函数? 谢谢啦
VB编程:判断任意正整数N是否为素数如题,要求是编程.完整的编程
A B C D - C D C _____________ A B C 求A、B、C、D的值.用VB编程完成ABCD-CDC=ABC,其中每个字母表示一个数字,请用VB编程解决,
vb编程题.随机产生10个【50,300】之间的整数,求最大的偶数和最小的奇数.
大学VB编程题：输出两位正整数中个位数是3的素数,并求这些素数的个数.
一个实数的平方根为a+3和2a+3,求这个实数
已知一个实数的平方根为3m+2和m-18,求这个实数