问几道VB的题目!6\x05"求方程8x-5y=3,在|x|

来源：学生作业帮编辑：作业帮分类：数学作业时间：2024/05/25 09:40:13

问几道VB的题目!
6\x05"
求方程8x-5y=3,在|x|

Private Sub Form_Click()
Dim x,y,z As Integer
For x = -150 To 150
For y = -100 To 100
If 8 * x - 5 * y = 3 Then
z = z + 1
End If
Next
Next
Print "答案共有"; z; "组"
End Sub
------------------
Private Sub Form_Click()
Dim i,j,k,l,m,n,Z As Long
For i = 1 To 9
For j = 0 To 9
For k = 0 To 9
For l = 0 To 9
For m = 0 To 9
If i * i + j * j + k * k + l * l + m * m = 110 Then
n = i * 10000 + j * 1000 + k * 100 + l * 10 + m
If n > Z Then
Z = n
End If
End If
Next
Next
Next
Next
Next
Print "最大的五位数是："; Z
End Sub
再问：谢谢，谢谢！冒昧的问句：还能帮帮忙吗？
再答：我晕，好吧 '所谓回文数是从左至右与从右至左读起来都是一样的数字，如：121是一个 '回文数。编写程序，求在500-900的范围内所有能被3整除的回文数的个数。 Private Sub Form_Click() Dim i, j, k, z As Integer For i = 5 To 8 For j = 0 To 9 z = i * 100 + j * 10 + i If z Mod 3 = 0 Then Print z k = k + 1 End If Next Next Print k End Sub '已知A，B为正整数, A

VB程序设计题目:求方程9X—9Y=1,在|X| 一道vb的题目.x=3:y=5:z=9 VB中求下面方程x+2y+3z=40的正整数解.的代码求方程x+2y-3x=4,3x-2y+x=6,3x+2y-5x=8的解 vb中举例有一个方程y=(x^3+2x)/(6x^2-2),这个方程很难反推成x关于y的方程,现在有y的值如何算x x1,x2是方程2x05-3x-5=0的两个根,不解方程,求下列代数式的值:⑴x1分之1+x2分之1 根据导数的几何意义,求函数y=√4-x05在x=1处的导数已知(x05+mx+n)(x05-3x+2)中,不含x05和x项,求m,n的值已知sina与cosa是方程3x05-2x-m=0的两个根,求m的值. 关于x的分式方程1/x-2+k/x+2=4/x05-4有增根,求k的值求曲线y=(x^2-3x+6)/x^2在横坐标x=3处的法线方程. VB编程问题用二分法求方程F(X)=X^3-X-1=0在区间[1,1.5]内的解要求∑=10^-2