目前分類:中醫減肥 (8)

瀏覽方式: 標題列表 簡短摘要
攻頂 最年輕的金控專業經理人 林克孝非凡新聞e周刊(62)攻頂 最年輕的金控專業經理人 林克孝||~乙510q-6璘~[2007-06-24出版]~[dd982849] 作者:出版社:非凡出版出版日期:2007-06-24書籍條碼:97718194110042.露天拍賣 > 書刊、文具 > 雜誌 > 其他雜誌  .

bb111561 發表在 痞客邦 留言(0) 人氣()

花蓮友樂町日式火烤二吃位於前中華路福建街上上個月新開的大型日式燒烤店友樂町是經過民宿老闆推薦而來用餐~店家主打299吃到飽(服務費另加一成),而且是火鍋、燒烤二吃,當然一定要來試試囉!火鍋湯底(三選一),我們選擇麻辣+原味湯~五更腸旺及主食區~餐廳空間,坪數超大,約可容納上百人~食材區~食材區~章魚燒~壽司及鮭魚飯~壽司~即食區~飲料區及冰品區~烤海鮮中~青菜區~食材區~肉品區~海鮮區~海鮮區~沙拉、水果區~地址:花蓮縣花蓮市福建街471號.

bb111561 發表在 痞客邦 留言(0) 人氣()

全排列與迴文題目來源http://tw.group.knowledge.yahoo.com/students-1/message_board/view?tid=11題目 A迴文數目輸入檔: pa.in /輸出檔: pa.out所謂的「迴文」,就是指一個字串從頭開始唸跟倒著唸結果完全一樣。例如abccaaccba就是一個迴文字。而所謂的「全排列」,則是指一個字串裡的每個字母在經過順序的調換以後所能得到的各種排列。例如abcd的全排列就是:abcd abdc acbd acdb adbc adcbbacd badc bcad bcda bdac bdcacabd cadb cbad cbda cdab cdbadabc dacb dbac dbca dcab dcba請寫出一個程式,對於輸入的字串,算出在這個字串的全排列裡有多少個是迴文。例如aabb的全排列為:aabb abab abba baab baba bbaa其中abba和baab是迴文,因此aabb的全排列裡有2個迴文。輸入檔說明:輸入檔第一行是一個整數 N (1 ? N ? 50) 代表題目的數目。接下來N行輸入,每一行會有一個長度不超過40的字串,這個字串會完全由小寫的英文字母構成。﹝字串的長度最少是1﹞輸出檔說明:對每一行字串,請在每行輸出這個字串的全排列裡有幾個迴文﹝如果全排列裡一個迴文都沒有的話,就輸出0﹞。輸出的數字不會超過integer的大小。範例輸入:3aabbaabc範例輸出:210題目好長, 感覺比答案還長由於題目沒有要求列舉, 算出組合數就好了首先, 判斷傳入字串能否形成迴文迴文的定義是, 字串對半切開, 左右是對稱的所以決定了左邊, 右邊也就不能改變了又, 因為左右相同, 所以只有正中間的文字能是奇數個, 其他都是偶數個ex: abc,a,cba ; a:3個,b:2個,c:2個或是全部都是偶數個ex: abc,cba ; a:2個,b:2個,c:2個所以只需要統計字串中每個字母的數量檢查是否有兩個以上的字母有奇數個, 有的話就不能形成迴文若能形成迴文, 接下來就輪到算組合數剛剛說過迴文是左右對稱, 能決定排序的只有半邊, 另一半會隨著這半邊決定後跟著固定ex:abc,a,cba , 我們只需知道左半邊"abc"的全排列數量, 就知道迴文數量了之前已經統計過字串中每個字母的數量, 要算全排列數量的公式(不盡相異排列) = (字串長)! / (字母1數量)! (字母2數量)! (字母3數量)!...(字母n數量)! 因為只剩半邊, 全排列迴文數量 = (字串長\2)! / (字母1數量\2)! (字母2數量\2)! (字母3數量\2)!...(字母n數量\2)! ("\"為整除運算子, !是階層的意思 n! = n*(n-1)*(n-2)*...*3*2*1ex: abb,a,bba: a:3個 b:4個全排列迴文數量 = (7\2)! / (3\2)! (4\2)! = 3! / 1!2! = 3只有3種 列一下給大家看abb,a,bbabab,a,babbba,a,abb至此解說完畢, 以下為實作, 使用Collection做為統計字母用, 可能比較難懂, 可以自己改寫成用迴圈窮舉統計, 反正小寫英文字母也才26個  1: Option Explicit 2:   3: Private Sub Command1_Click() 4: Print "abccaccba"; PMTT("abccaccba") 5: Print "aabb"; PMTT("aabb") 6: Print "a"; PMTT("a") 7: Print "abc"; PMTT("abc") 8: Print "dfaeredafa"; PMTT("dfaeredafa") 9: Print "abccaaccba"; PMTT("abccaaccba") 10: End Sub 11:   12: Function PMTT(ByVal s As String) 13: Dim i As Long 14: Dim word As String 15: Dim col_word As New Collection 16: Dim col_index As New Collection 17: Dim wordcount() As Integer 18: Dim index As Integer 19: Dim str_Len As Long 20: Dim f_c As Double 21: Dim have_odd As Boolean 22: 23: str_Len = Len(s) 24: 25: If str_Len = 0 Then 26: PMTT = 0: Exit Function 27: ElseIf str_Len = 1 Then 28: PMTT = 1: Exit Function 29: End If 30: 31: For i = 1 To str_Len 32: word = Mid(s, i, 1) 33: On Error Resume Next 34: index = col_index.Item(word) 35: If Err.Number = 5 Then 36: Err.Clear 37: ReDim Preserve wordcount(col_word.Count) 38: wordcount(col_word.Count) = 1 39: col_word.ADD word, word 40: col_index.ADD col_index.Count, word 41: ElseIf Err.Number = 0 Then 42: wordcount(index) = wordcount(index) + 1 43: End If 44: Next 45: 46: f_c = factorial(Int(str_Len / 2)) 47: have_odd = False 48: For i = 1 To col_word.Count 49: If wordcount(col_index(i)) And 1 Then 50: If have_odd = True Then PMTT = 0: Exit Function 51: have_odd = True 52: End If 53: f_c = f_c / factorial(Int(wordcount(col_index(i)) / 2)) 54: Next 55: PMTT = f_c 56: End Function 57:   58: Function factorial(n As Integer) 59: Dim i As Integer 60: factorial = 1 61: For i = 2 To n 62: factorial = factorial * i 63: Next 64: End Function.

bb111561 發表在 痞客邦 留言(0) 人氣()

你心理的弱點在一個兇殺案現場,被謀害的是一位年輕女子,遇害時正好手中抓著一條斷裂的口紅,請用直覺推斷她遇害的原因。 A.強盜闖入家中劫財劫色 B.男友報復他移情別戀 C.暗戀他的變態狂形為 D.情敵下的毒手 A.你潛意識裡最大的弱點是疾病。你最感到戰慄的莫過於自己得了不治之症,受盡治療的折磨,最後狼狽而亡。你害怕身上苦痛和死亡的威脅。 B.你心裡的弱點是死亡。但不是你自己的死亡,而是你最親密的人的死亡。因為你的感情依賴度非常高,尤其對父母、配偶、兄弟姐妹。當不幸發生後,你將無法承受。 C.你最感到恐懼的是一切自然界無法解釋的現象,包括靈魂、報應之類。你潛意識裡躲藏著自己擬造的鬼魅,而在夢境或意識模糊的時候出現。這是你非常不易克服的弱點。 D.你心裡的弱點是背叛。你無法面對情人變心或親密的摯友出賣你。在他人惡意背叛你時,你會脆弱得失去所有反擊能力。不過這個弱點不易被察覺,非要到面臨困境時才會顯現。 .msgcontent .wsharing ul li { text-indent: 0; } 分享 Facebook Plurk YAHOO! .

bb111561 發表在 痞客邦 留言(0) 人氣()

代雇主到鹽埕區代買/寄男性衣飾NO.1012010/9/23 代雇主到鹽埕區代買/寄男性衣飾 9/22中秋夜,雇主來電尋詢問,要買男生穿的衣服,之前是在高雄鹽埕區買到! 雇主的朋友看到也很喜愛,但在北部的的商店問了好幾家都沒有販售?!所以想請我協助幫忙,若有買到的話!希望在明天9/23可以拿到物品!!!!!!!!!!!!!!!我向雇主詢問有這家商店詳細的地址或電話?! 雇主回答:只記得是好幾年前還住高雄時,去鹽埕區的衣飾店買到。我向雇主說:鹽埕區近年來因為高捷工程,附近的商店家大多已經搬遷!希望不大,我還是會幫你去尋找你所指定的衣服! 結果,當然就是順利買到雇主所指定要買的衣服,我才會來打日誌! 9/23當天騎車到鹽埕區,看到一大堆已經休業的商店,祈禱我要買的商店, 還有在營業!!(觀世音菩薩ˋ媽祖ˋ上帝ˋ阿拉真神....都好,拜託你們囉) 根據雇主所提供的資料,問好幾間商店都是搖頭沒賣?~?~?~?...好洩氣啊 我還是一步一腳印,一間間的詢問?!?!?! 我問到啦~我買到啦...啦.....啦.......啦 馬上向雇主回報佳績~再次確認所買的衣物的樣式ˋ尺寸當天,下午5:30左右雇主來電說已收到衣服啦!!謝謝我的幫忙 .msgcontent .wsharing ul li { text-indent: 0; } 分享 Facebook Plurk YAHOO! .

bb111561 發表在 痞客邦 留言(0) 人氣()

Goth Rock 歌德搖滾Goth Rock─歌德搖滾歌德一詞來自西洋文學史上維多利亞時期的歌德文學, 喜好以人性的黑暗、空虛面?題,並且對死亡亦有著濃烈的興趣。 歌德文學與搖滾的結合則是始於80年代的英國, 承襲自70年代的後龐克的低調與虛無。 歌德搖滾更是深度強調對人類心靈陰暗層面的探索, 音樂有時會運用電子節奏及鍵盤合成器營造出冰冷、闇黑之美感, 除此之外有些團會也帶上一些較中性的妝扮。 代表性樂團Siouxsie、The Damned、 Bauhaus、The Cure .msgcontent .wsharing ul li { text-indent: 0; } 分享 Facebook Plurk YAHOO! .

bb111561 發表在 痞客邦 留言(0) 人氣()

party彩妝這位美女妹妹是我的常客,幫他化了很久己經變成好姐妹,會分享生活工作上的不愉快!幫他化了這?久第一次幫他留念拍照,他真的超美的....美女妹妹是單眼皮,下次要請他來當我上課的模特兒,再幫他做美美的造型....到時可以讓我po化妝前的照片嗎? 哈......... 別這樣嘛.......

bb111561 發表在 痞客邦 留言(0) 人氣()

綺勻ㄉ....我們這一家........話說........上次跟綺勻一起出去吃吃喝喝時~~~他跟我說ㄌ一件他們家ㄉ真實故事.......勻 : 因為我姐姐跟媽媽都沒有在畫妝~~~~所以我ㄉ卸妝ㄉ東西用完ㄌ都沒得借.....有一次~~~~我洗臉ㄉ也沒ㄌ~~~~想說~~姐姐應該有吧~~所以就跟姐姐借~~~~結果姐姐說............用肥皂阿~~~我都用肥皂洗!!!!!勻 : ...................算ㄌ....我跟媽借好ㄌ............沒想到.............媽 : 用牙膏阿~~~~~我都用牙膏洗~~~~~~~勻 :.................... (最後.......他用ㄌ牙膏........心得是.........涼涼ㄉ..........  .msgcontent .wsharing ul li { text-indent: 0; } 分享 Facebook Plurk YAHOO! .

bb111561 發表在 痞客邦 留言(0) 人氣()