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

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