這個題目只要會任何一門計算機語言就可以很簡單的寫兩個迴圈語句得出答案。下面以VB為例計算。

我們建一個窗體，在上面新增CommandButton1和TextBox1兩個控制元件，然後雙擊CommandButton1，輸入程式程式碼：

Private Sub CommandButton1_Click()

For b = 1 To 12 "月迴圈

For c = 1 To 31 "日迴圈

If Int(221872 / b / c) = 221872 / b / c Then "判斷是否整除

rq = 221872 / b / c & "年" & b & "月" & c & "日" "把得到的年月日寫入變數rq

If IsDate(rq) Then "判斷這個日期是否正確，排除類似2月30日、4月31日的結果

TextBox1 = TextBox1 & rq & vbCrLf "符合條件的日期在textbox1中顯示

End If

End If

Next c

Next b

End Sub

共得到14個解：

7924年1月28日

7924年2月14日

3962年2月28日

7924年4月7日

3962年4月14日

1981年4月28日

7924年7月4日

4528年7月7日

3962年7月8日

2264年7月14日

1981年7月16日

1132年7月28日

3962年8月7日

1981年8月14日