求"黑色星期五的算法"

求“黑色星期五的算法”就是用程序列举出，*年*月*日是“黑色星期五”（某个月的十三日又恰逢星期五就叫“黑色星期五”） ！   年份是四位数。