将1~9这九个数填入下列算式的九个方格中,使算式成立
来源:学生作业帮 编辑:拍题作业网作业帮 分类:数学作业 时间:2024/04/28 08:09:23
将1~9这九个数填入下列算式的九个方格中,使算式成立
这个题目是( )( )( )*( )( )=( )( )*( )( )=5568
这个题目是( )( )( )*( )( )=( )( )*( )( )=5568
174*32=58*96
害我编代码算了半天
Option Explicit
Sub test()
Dim i, j, l, k
For i = 1 To 9
For j = 1 To 9
For l = 1 To 9
If i j And i l And j l Then
k = k + 1
Sheet1.Range("a" & k).Value = Val(i & j & l)
End If
Next l
Next j
Next i
End Sub
Sub test2()
Dim i, j, k
For i = 1 To 9
For j = 1 To 9
If i j Then
k = k + 1
Sheet1.Range("b" & k).Value = Val(i & j)
End If
Next j
Next i
End Sub
Sub test3()
Dim i As Integer, j As Integer
With Sheet1
For i = 1 To 504
For j = 1 To 72
If .Range("a" & i) * .Range("b" & j) = 5568 Then Debug.Print .Range("a" & i); .Range("b" & j)
Next j
Next i
End With
End Sub
Sub test4()
Dim i As Integer, j As Integer
With Sheet1
For i = 1 To 71
For j = i + 1 To 72
If .Range("b" & i) * .Range("b" & j) = 5568 Then Debug.Print .Range("b" & i); .Range("b" & j)
Next j
Next i
End With
End Su
害我编代码算了半天
Option Explicit
Sub test()
Dim i, j, l, k
For i = 1 To 9
For j = 1 To 9
For l = 1 To 9
If i j And i l And j l Then
k = k + 1
Sheet1.Range("a" & k).Value = Val(i & j & l)
End If
Next l
Next j
Next i
End Sub
Sub test2()
Dim i, j, k
For i = 1 To 9
For j = 1 To 9
If i j Then
k = k + 1
Sheet1.Range("b" & k).Value = Val(i & j)
End If
Next j
Next i
End Sub
Sub test3()
Dim i As Integer, j As Integer
With Sheet1
For i = 1 To 504
For j = 1 To 72
If .Range("a" & i) * .Range("b" & j) = 5568 Then Debug.Print .Range("a" & i); .Range("b" & j)
Next j
Next i
End With
End Sub
Sub test4()
Dim i As Integer, j As Integer
With Sheet1
For i = 1 To 71
For j = i + 1 To 72
If .Range("b" & i) * .Range("b" & j) = 5568 Then Debug.Print .Range("b" & i); .Range("b" & j)
Next j
Next i
End With
End Su
将1~9这九个数填入下列算式的九个方格中,使算式成立
将1—9这九个数字分别填入下列算式的方框内使等式成立
将1~9分别填入九个圆圈中,使右面三个算式成立 将1~9分别填入九个圆圈中,使右面三个算式成立.
将1——9这九个不同的数字分别填入下面九个圆圈中,使三个算式都成立.
将1到9这九个数字分别填入下面算式的方格中,使等式成立,那么请问填在最后一个方格的数字是什么?(注:等式第二、三项的方框
将1~9分别填入九个圆圈中,使下面三个算式成立
123456789这九个数字填入下面的九个方框中,用加法,使算式成立.
把1~9填入以下九个方格中、圆圈中填运算符号(+、—、*、/)使算式成立.
1~9这九个数字分别填入下面算式的空格中,每个空格只许填一个数字,使算式成立:
将1至9这九个数分别填入下面九个方框中,使等式成立
试把1~9这九个数分别填入下列九个括号中,使等式成立.
把1—9九个数字填入下面算式的九个圆圈内使等式成立