4.1用計算機(jī)程序解決問題77812

4.1 編制計算機(jī)程序解決問題 第四章 信息的加工與表達(dá)（下） 在印度，有這么一個古老的傳說：在世界中心貝拿勒斯（在印度北部）的圣廟里，一塊黃銅板上插著三根寶石針。印度教的主神在創(chuàng)造世界的時候，在其中一根針上從下到上穿好了由大到小的 片金片，這就是所謂的漢諾塔。不論白天黑夜，總有一個僧侶在按照下面的法則移動這些金片。 一次只移動一片 ，不管在哪根針上， 小片必在大片上面 。當(dāng)所有的金片都從穿好的那根針上移到另外一根針上時，世界就將在一聲霹靂中消滅，梵塔、廟宇和眾生都將同歸于盡。 漢諾塔的傳說 不管這個傳說的可信度有多大，如果考慮一下把片金片，由一根針上移到另一根針上，并且始終保持上小下大的順序。這需要多少次移動呢 ? 運(yùn)用數(shù)學(xué)中的方法，得出 : f(n)=2n-1。當(dāng) n=64時， f(64)= 264-1=18446744073709551615 假如每秒鐘一次，共需多長時間呢？一年大約有 31536926 秒，計算表明移完這些金片需要 多億年 ，比地球壽命還要長，事實(shí)上，世界、梵塔、廟宇和眾生都已經(jīng)灰飛煙滅。 漢諾塔 程序體驗(yàn) 請同學(xué)們運(yùn)行 漢諾塔程序 ，移動 3個盤子，最少需要移動幾次？ 用計算機(jī)可以快速地解決一些人力所無法的問題，這是計算機(jī)的優(yōu)勢。 在學(xué)習(xí)編制計算機(jī)程序解決問題之前，我們先來進(jìn)一步認(rèn)識一下計算機(jī)和程序。 如果是移動 9個，或者是更多呢？ 計算機(jī) 計算機(jī)程序 上 Q、玩游戲 聽音樂、看電影 （一）認(rèn)識一下計算機(jī)和程序 （一）認(rèn)識一下計算機(jī)和程序 計算機(jī)各部件配合工作 計算機(jī) 逐條順序執(zhí)行預(yù)先存放在存貯器中指令 輸入設(shè)備 輸出設(shè)備 存儲器 預(yù)先將程序輸入存儲器 運(yùn)算器、控制器 中央處理器 內(nèi)存 外存 1 0100010001 01101010101 1000 0100010001 01101010111 1001 0100010011 01101010101 01101010111 Mov ax,8 Mov bx,10 Add ax,bx Y=8 X=Y+10 （一）認(rèn)識一下計算機(jī)和程序 計算機(jī)程序語言的發(fā)展 程序 高級語言 匯編語言 機(jī)器語言 2 （一）認(rèn)識一下計算機(jī)和程序 高級編程語言有： BASIC, PASCAL, C, VISUAL BASIC 計算機(jī)高級語言程序 計算機(jī)機(jī)器語言程序 計算機(jī) 人 計算機(jī)語言系統(tǒng) 翻譯程序 編寫 執(zhí)行 1、隱藏文件 2、修改擴(kuò)展名 3、設(shè)置打開文件的密碼 4、使用加密軟件工具 （二）體驗(yàn)程序的運(yùn)行過程 加密軟件 加密前的文件 （明文） 加密后的文件 （密文） 加密程序 解密程序 運(yùn)行過程 在加密時，計算機(jī)按照我們所編的加密程序自動執(zhí)行操作，實(shí)現(xiàn)加密 在解密時，計算機(jī)按照我們所編的解密程序自動執(zhí)行操作，實(shí)現(xiàn)解密 加密前的文件 （明文） 加密后的文件 （密文） 加密程序 解密程序 （二）體驗(yàn)程序的運(yùn)行過程 根據(jù)所給的代碼，用 VB做一個加密和解密程序，并將其生成 exe文件，加密后 qq.txt 前面我們演示操作的加解密程序和漢諾塔程序都是用計算機(jī)程序設(shè)計語言 VB編寫的，下面我們就來看看這幾段程序的具體內(nèi)容。 探究加密程序，如何加密？ 打開任務(wù) 2源代碼 :工程 1.vbp,閱讀代碼 秘密：把每個字符的編號（ ASC碼） +3， 算法 : 顯示出新編號相對應(yīng)的字符 a-d A-D o-r before$ = InputBox(“請輸入 加 密前的文本內(nèi)容 ) after$ = n = Len(before$) 用函數(shù) len()計算 before$中存儲的字符個數(shù) For i = 1 To n b$ = Mid$(before$, i, 1) 用函數(shù) mid()讀取出 before$中的第 i個字符 c$ = Chr(Asc(b$) +3) 用函數(shù) asc()計算出字符的編號， 加 3得到新編號， 再用 chr()轉(zhuǎn)換成對應(yīng)的字符 after$ = after$ & c$ 把新字符連接成新文本串 Next i M