心梦无痕 发表于 2010-6-20 12:52:38

数学问题

有5个数字为一组数组,如何求得任意三个数之中是否有被10整除的和`````

netegg 发表于 2010-6-20 14:12:56

lz的语言太深奥，没看明白

foboy 发表于 2010-6-20 16:17:21

函数

本帖最后由 foboy 于 2010-6-20 16:19 编辑

楼主意思是从5个数理任意拿出三个数来，看他们的和是不是能被10整除吗？
如果是这个意思的话，我写的这个函数可以满足你：
这个函数可以检查任意多个数中是不是有三个的和能被10整除。有的话就会返回一个包含这三个数的数组。没有的话返回空字符串，并且设置@error为1


Func _check_data($_data)
        For $_i_a = 0 To UBound($_data) - 1
                For $_i_b = 0 To UBound($_data) - 1
                        If $_i_b == $_i_a Then ContinueLoop
                        For $_i_c = 0 To UBound($_data) - 1
                                If $_i_c == $_i_a Or $_i_c == $_i_b Then ContinueLoop
                                If Mod($_data[$_i_a] + $_data[$_i_b] + $_data[$_i_c], 10) == 0 Then
                                        Local $_nums = [$_data[$_i_a], $_data[$_i_b], $_data[$_i_c]]
                                        Return $_nums
                                EndIf
                        Next
                Next
        Next
        Return SetError(1, 0, "no data")
EndFunc   ;==>_check_data

使用例子：
Global $data =
_check_data($data)

3mile 发表于 2010-6-20 21:36:00

3数之和求模

Hen5ei 发表于 2010-6-20 22:12:30

去试一下3楼大大的.,应该是你想要的

心梦无痕 发表于 2010-6-21 13:31:56

谢3楼的大大了``````
页: [1]
查看完整版本: 数学问题