用VB求解 已知A,B为正整数,A
来源:学生作业帮 编辑:百度作业网作业帮 分类:数学作业 时间:2024/08/08 04:43:11
用VB求解 已知A,B为正整数,A
![用VB求解 已知A,B为正整数,A](/uploads/image/z/20061913-49-3.jpg?t=%E7%94%A8VB%E6%B1%82%E8%A7%A3+%E5%B7%B2%E7%9F%A5A%2CB%E4%B8%BA%E6%AD%A3%E6%95%B4%E6%95%B0%2CA)
这个不难,你只要好好分析下就会做了
Private Sub Form_Load()
Dim tempA As Integer
Dim tempB As Integer
Dim B As Integer
Dim sum As Integer
Dim little As Integer
little = 2698
For tempA = 1 To 2698
tempB = 2698 / tempA
If tempA < tempB And 2698 Mod tempA = 0 Then
sum = tempA + tempB
End If
If sum < little Then
little = sum
B = tempB
End If
Next tempA
MsgBox B
End Su
Private Sub Form_Load()
Dim tempA As Integer
Dim tempB As Integer
Dim B As Integer
Dim sum As Integer
Dim little As Integer
little = 2698
For tempA = 1 To 2698
tempB = 2698 / tempA
If tempA < tempB And 2698 Mod tempA = 0 Then
sum = tempA + tempB
End If
If sum < little Then
little = sum
B = tempB
End If
Next tempA
MsgBox B
End Su
已知a,b为正整数,且满足a+ba
用VB编程,查找介于正整数A,B之间只有两个数字相同的完全平方数.所谓完全平方数是指其平方根为整数的数.
已知正整数a,b,c,a
已知:正整数a.b.c中,a
已知正整数a.b.c满足:a
已知1176a=b的四次方 a、b为正整数,求a最小值
已知a+b=ab,a为正整数,b为有限小数,求ab的最小值
a b c为正整数 且a
已知a,b为整型变量,下列VB表达式的值恒为False的是
已知1176×a=b4,a,b为正整数,求a的最小值.
1.已知;a,b为正整数,a=b-2005. 若关于x的方程
已知2a*3b*167c=2004,其中a,b,c为正整数.