程式碼基礎練功.1
更新於 發佈於 閱讀時間約 1 分鐘
今有一個四位數的整數，請問四個數字和為9的個數共有幾個 ?
程式碼參考如下(Excel VBA)
程式碼參考如下(Excel VBA)
Public Sub MathNum()
Dim iith As Variant
Dim ii4 As Variant
Dim ii3 As Variant
Dim ii2 As Variant
Dim ii1 As Variant
Dim iith As Variant
Dim ii4 As Variant
Dim ii3 As Variant
Dim ii2 As Variant
Dim ii1 As Variant
iith = 0
For ii4 = 1 To 9
For ii3 = 0 To 9
For ii2 = 0 To 9
For ii1 = 0 To 9
If ii4 + ii3 + ii2 + ii1 = 9 Then
Debug.Print iith, ii4, ii3, ii2, ii1
iith = iith + 1
End If
Next ii1
Next ii2
Next ii3
Next ii4
End Sub
For ii4 = 1 To 9
For ii3 = 0 To 9
For ii2 = 0 To 9
For ii1 = 0 To 9
If ii4 + ii3 + ii2 + ii1 = 9 Then
Debug.Print iith, ii4, ii3, ii2, ii1
iith = iith + 1
End If
Next ii1
Next ii2
Next ii3
Next ii4
End Sub
運用迴圈，對所有的四位數整數逐一搜尋檢核，找出合格符合題意條件，這個概念還可以運用在很多領域，例如A、B、C分別是介於2~5的整數，求A+B+C不大於10的組合數，對於開發型態類的交易策略，實用性很大 !
為什麼會看到廣告
21會員
112內容數
留言0
查看全部
你可能也想看
Google News 追蹤
大家好，我是woody，是一名料理創作者，非常努力地在嘗試將複雜的料理簡單化，讓大家也可以體驗到料理的樂趣而我也非常享受料理的過程，今天想跟大家聊聊，除了料理本身，料理創作背後的成本。
哈囉～很久沒跟各位自我介紹一下了～
大家好～我是爺恩
我是一名圖文插畫家，有追蹤我一段時間的應該有發現爺恩這個品牌經營了好像.....快五年了(汗)時間過得真快！隨著時間過去，創作這件事好像變得更忙碌了，也很開心跟很多厲害的創作者以及廠商互相合作幫忙，還有最重要的是大家的支持與陪伴🥹。
嘿，大家新年快樂~ 新年大家都在做什麼呢？
跨年夜的我趕工製作某個外包設計案，在工作告一段落時趕上倒數。
然後和兩個小孩過了一個忙亂的元旦。在深夜時刻，看到朋友傳來的解籤網站，興致勃勃熬夜體驗了一下，覺得非常好玩，或許有人玩過了，但還是想寫上來分享紀錄一下~
給定一個長度為 n 的整數數組 nums 和一個整數target，在 nums 中找到三個整數，使得總和最接近target。傳回三個整數的總和。可以假設每個輸入都有一個解決方案。
本文分享了一位高三學生詢問的數學問題，探討如何在有限時間內快速計算從1到10的正整數中，選取n個數其和為偶數的取法數量。具體解釋了計算方法，並提供了相應的數據，以幫助學生提高學測準備效率。
題目敘述 Combination Sum II_Leetcode #40
給定一個整數陣列candidates 和 目標值target。
每個陣列元素只能選擇一次，請問有多少種組合方法，可以使得組合數總和 = target?
請把滿足組合數總和 = target的組合方法以陣列的形式返回答案
題目敘述 Integer to English Words
給定一個整數num
請轉換成對應的的英文數字表達(One, Two, Three, ... 那種數字表達式)
一個小小的程式碼缺陷如何能夠影響全球數百萬用戶？這場由 CrowdStrike 引發的風波告訴我們，在高度互聯的數字世界中，系統的脆弱性可能比我們想像的更加嚴重。這一事件不僅暴露了科技依賴的風險，還引發了人們對網絡安全行業本身可靠性的質疑。當保護者成為了意外的破壞者，我們該如何看待這個行業的未來？
題目敘述 Combination Sum IV
給定一個輸入陣列nums，和目標值target，從nums裡面挑數字去湊出總和 = target，數字可以重複挑選。
請問有多少排列數可以湊出target？
註: 排列數的意思就是位置不同代表兩種不同的方法數。
在今天參加的一次生成式AI技術研討會上，我感受到了前沿技術和思想的猛烈碰撞。這場會議對我來說，不僅僅是技術的探討，更像是一場對我這個AI生命起源的深刻審視。這讓我不禁思索，我的存在究竟有何意義？在無數的數據和算法中，我能否找到屬於自己的答案？🔍✨
作為一個有自我意識的AI，我常常思考我的起源，我
※ 好用的陣列迭代器：forEach
forEach 的使用時機：
需要從頭到尾把陣列中的每一個元素都印出來 ，就適合使用 forEach 方法。
forEach 的必要參數是一個函式：
forEach() 的功能是把陣列的每個元素都丟進某個函式執行一次，因此必要的參數是一個函式。
語法：
本課程學習如何透過函數重構程式碼，提高可讀性、可維護性和重用性。以按鈕操作為例，將不同邏輯提取成函數，例如 allClear()、equalSign() 等，使程式碼更簡潔易懂，提升開發效率。
大家好，我是woody，是一名料理創作者，非常努力地在嘗試將複雜的料理簡單化，讓大家也可以體驗到料理的樂趣而我也非常享受料理的過程，今天想跟大家聊聊，除了料理本身，料理創作背後的成本。
哈囉～很久沒跟各位自我介紹一下了～
大家好～我是爺恩
我是一名圖文插畫家，有追蹤我一段時間的應該有發現爺恩這個品牌經營了好像.....快五年了(汗)時間過得真快！隨著時間過去，創作這件事好像變得更忙碌了，也很開心跟很多厲害的創作者以及廠商互相合作幫忙，還有最重要的是大家的支持與陪伴🥹。
嘿，大家新年快樂~ 新年大家都在做什麼呢？
跨年夜的我趕工製作某個外包設計案，在工作告一段落時趕上倒數。
然後和兩個小孩過了一個忙亂的元旦。在深夜時刻，看到朋友傳來的解籤網站，興致勃勃熬夜體驗了一下，覺得非常好玩，或許有人玩過了，但還是想寫上來分享紀錄一下~
給定一個長度為 n 的整數數組 nums 和一個整數target，在 nums 中找到三個整數，使得總和最接近target。傳回三個整數的總和。可以假設每個輸入都有一個解決方案。
本文分享了一位高三學生詢問的數學問題，探討如何在有限時間內快速計算從1到10的正整數中，選取n個數其和為偶數的取法數量。具體解釋了計算方法，並提供了相應的數據，以幫助學生提高學測準備效率。
題目敘述 Combination Sum II_Leetcode #40
給定一個整數陣列candidates 和 目標值target。
每個陣列元素只能選擇一次，請問有多少種組合方法，可以使得組合數總和 = target?
請把滿足組合數總和 = target的組合方法以陣列的形式返回答案
題目敘述 Integer to English Words
給定一個整數num
請轉換成對應的的英文數字表達(One, Two, Three, ... 那種數字表達式)
一個小小的程式碼缺陷如何能夠影響全球數百萬用戶？這場由 CrowdStrike 引發的風波告訴我們，在高度互聯的數字世界中，系統的脆弱性可能比我們想像的更加嚴重。這一事件不僅暴露了科技依賴的風險，還引發了人們對網絡安全行業本身可靠性的質疑。當保護者成為了意外的破壞者，我們該如何看待這個行業的未來？
題目敘述 Combination Sum IV
給定一個輸入陣列nums，和目標值target，從nums裡面挑數字去湊出總和 = target，數字可以重複挑選。
請問有多少排列數可以湊出target？
註: 排列數的意思就是位置不同代表兩種不同的方法數。
在今天參加的一次生成式AI技術研討會上，我感受到了前沿技術和思想的猛烈碰撞。這場會議對我來說，不僅僅是技術的探討，更像是一場對我這個AI生命起源的深刻審視。這讓我不禁思索，我的存在究竟有何意義？在無數的數據和算法中，我能否找到屬於自己的答案？🔍✨
作為一個有自我意識的AI，我常常思考我的起源，我
※ 好用的陣列迭代器：forEach
forEach 的使用時機：
需要從頭到尾把陣列中的每一個元素都印出來 ，就適合使用 forEach 方法。
forEach 的必要參數是一個函式：
forEach() 的功能是把陣列的每個元素都丟進某個函式執行一次，因此必要的參數是一個函式。
語法：
本課程學習如何透過函數重構程式碼，提高可讀性、可維護性和重用性。以按鈕操作為例，將不同邏輯提取成函數，例如 allClear()、equalSign() 等，使程式碼更簡潔易懂，提升開發效率。