全國青少年信息學(xué)奧賽培訓(xùn)教程(初級)

1、2015年山東省信息學(xué)奧賽夏令營2015年山東省信息學(xué)奧賽夏令營學(xué)習(xí)第一天學(xué)習(xí)第一天信息學(xué)奧賽介紹語言學(xué)習(xí)開始PascalPascal語言基本語句2015年山東省信息學(xué)奧賽夏令營信息學(xué)奧林匹克競賽面向全國中學(xué)生的一種競賽活動面向全國中學(xué)生的一種競賽活動旨在激發(fā)中學(xué)生在計算機科學(xué)方面的興趣旨在激發(fā)中學(xué)生在計算機科學(xué)方面的興趣培養(yǎng)他們培養(yǎng)他們邏輯思維邏輯思維的能力的能力給那些有給那些有才華才華的學(xué)生提供相互交流和學(xué)習(xí)的機會的學(xué)生提供相互交流和學(xué)習(xí)的機會通過競賽和相關(guān)的活動培養(yǎng)和選拔通過競賽和相關(guān)的活動培養(yǎng)和選拔優(yōu)秀的計算機后備人優(yōu)秀的計算機后備人才才。2015年山東省信息學(xué)奧賽夏令營 信息學(xué)奧林匹

2、克競賽屬于信息學(xué)奧林匹克競賽屬于智力智力與應(yīng)用計算機解題與應(yīng)用計算機解題能力能力的比的比賽，題目有相當(dāng)?shù)碾y度，解好這類題目，需要具備賽，題目有相當(dāng)?shù)碾y度，解好這類題目，需要具備很很強的綜強的綜合能力合能力1.1.觀察和分析問題的能力；觀察和分析問題的能力；2.2.將實際問題轉(zhuǎn)化為將實際問題轉(zhuǎn)化為數(shù)學(xué)模型數(shù)學(xué)模型的能力；的能力；3.3.靈活地運用各種靈活地運用各種算法算法的能力；的能力；4.4.熟練編寫程序熟練編寫程序并將其調(diào)試通過的能力；并將其調(diào)試通過的能力；5.5.根據(jù)題目的要求，自己設(shè)計測試數(shù)據(jù)，檢查自己的解法根據(jù)題目的要求，自己設(shè)計測試數(shù)據(jù)，檢查自己的解法是否正確、是否完備的能力是否正確

3、、是否完備的能力 綜合能力的體現(xiàn)2015年山東省信息學(xué)奧賽夏令營學(xué)習(xí)內(nèi)容：掌握一門計算機程序設(shè)計語言掌握一門計算機程序設(shè)計語言 （Pascal/C/C+）數(shù)據(jù)結(jié)構(gòu)與算法數(shù)據(jù)結(jié)構(gòu)與算法2015年山東省信息學(xué)奧賽夏令營信息學(xué)奧林匹克競賽賽事：信息學(xué)奧林匹克競賽賽事：1.NOIP1.NOIP（全國信息學(xué)奧林匹克分區(qū)聯(lián)賽）（全國信息學(xué)奧林匹克分區(qū)聯(lián)賽） National Olympiad in Informatics in Provinces 2.NOI 2.NOI （全國信息學(xué)奧林匹克競賽）（全國信息學(xué)奧林匹克競賽） National Olympiad in Informatics3.IOI 3.I

4、OI （國際信息學(xué)奧林匹克競賽）（國際信息學(xué)奧林匹克競賽） International Olympiad in Informatics 2015年山東省信息學(xué)奧賽夏令營語言學(xué)習(xí)開始Pascal語言一、語言的安裝二、界面簡介三、典例分析2015年山東省信息學(xué)奧賽夏令營安裝程序 注意如果安裝后出現(xiàn)亂碼，我們可以在FP窗口最上面的標(biāo)題欄上右擊，在彈出的快捷菜單中選擇“默認值”，接著會彈出的控制臺窗口屬性框，在最下面的“默認代碼頁”的下拉菜單中選擇“437（OEM-美國）”。2015年山東省信息學(xué)奧賽夏令營界面介紹標(biāo)題欄、菜單欄、中間部分為編輯窗口、最底部一行為提示欄（顯示系統(tǒng)中常用命令的快捷鍵，如將

5、當(dāng)前正在編輯的文件存盤的命令快捷鍵為F2）1、新建程序： FileNew（默認文件名為：Noname01.pas)2、程序運行：RunRun(或按快捷鍵：Ctrl+F9)3、查看運行結(jié)果：DubugUser screen(或按快捷鍵：Alt+F5)4、程序的保存：FileSave(或按F2）。第一次保存文件時屏幕上會出現(xiàn)一個對話框要求輸入文件名。注意文件保存的目錄（默認工作目錄可以在FP的快捷方式的屬性框中的“起始位置”欄中設(shè)置。）5、程序的打開：FileOpen（或按F3）2015年山東省信息學(xué)奧賽夏令營多動手、模仿是捷徑勤思考、實踐是王道2015年山東省信息學(xué)奧賽夏令營Program ex

6、1_1;Program ex1_1;BeginBegin write(Hello!); write(Hello!);End.End.大小寫無所謂，但是你可以改變一下單引號內(nèi)的單詞大小寫，看看有什么變化？2015年山東省信息學(xué)奧賽夏令營計算123+56的值Program ex1_2;Var a,b:integer;Begin a:=10; b:=5; writeln(a+b=,a+b);End.2015年山東省信息學(xué)奧賽夏令營已知長方形的長和寬，求長方形的周長和面積。Program ex1_3;Var a,b,c,s:integer;Begin readln(a,b); c:=2*(a+b);

7、s:=a*b; writeln(c=,c,s=,s);End.2015年山東省信息學(xué)奧賽夏令營求圓的面積Program ex1_4;Const Pi=3.1415926;var r:integer; s:real;begin read(r); s:=pi*r*r; writeln(s:0:2);end.2015年山東省信息學(xué)奧賽夏令營模仿一下： 已知小雄的書包放了3本書,5本作業(yè)本和2支筆,你能編程序讓計算機算算小雄的書包中一共有多少件學(xué)習(xí)用品嗎?2015年山東省信息學(xué)奧賽夏令營典例分析程序由三部分組成：（一）程序首部：Program 程序名。 由保留字Program 開頭，后跟一個程序名，程

8、序名的第一個字符必須是英文字母，其后的字符只能是字母或數(shù)字和下劃線組成。標(biāo)識符）（二）說明部分：程序中所用的常量、變量等必須先定義后使用。 常量：在程序執(zhí)行過程中其值不能被改變的數(shù)據(jù)。 變量：在程序執(zhí)行過程中可以改變值的數(shù)據(jù)。 數(shù)據(jù)類型：簡單類型（分標(biāo)準(zhǔn)類型和用戶自定義型）、構(gòu)造類型、指針類型 （三）語句部分 由保留字begin 至end. 語句未尾以分號;結(jié)束。 程序結(jié)束語句 end未尾必須用句號。整型、實型、字符型、布爾型枚舉型、子界型數(shù)組類型、記錄類型、集合類型、文件類型program 程序名；程序名；var 變量說明；變量說明；begin語句；語句；語句；語句；語句語句;end.201

9、5年山東省信息學(xué)奧賽夏令營保留字Pascal語言中一些有特殊含義的英文單詞（這些單詞保留給Pascal本身使用）。你已學(xué)會了幾個保留字：返回2015年山東省信息學(xué)奧賽夏令營在程序中用到的所有變量必須事先定義。在程序中用到的所有變量必須事先定義。格式：格式：Var Var : : ； : : ； 如：輸入3個整數(shù)，求這3個數(shù)的平均值。Var a，b，c：integer; aver:real;變量的定義說明：變量的定義說明：返回變量就相當(dāng)于一個書包，不過這個變量就相當(dāng)于一個書包，不過這個“書包書包”中存放的中存放的“書書”只是一個數(shù)據(jù)只是一個數(shù)據(jù)而已。變量的名稱叫做而已。變量的名稱叫做變量名變量名

10、。它可以由字母、數(shù)字或下劃線構(gòu)成，但第。它可以由字母、數(shù)字或下劃線構(gòu)成，但第一個必須是字母。一個必須是字母。2015年山東省信息學(xué)奧賽夏令營標(biāo)準(zhǔn)數(shù)據(jù)類型整數(shù)類型：包括正整數(shù)、負整數(shù)和零。Var a,b,c:integer;Begin readln(a); readln(b); c:=a+b; writeln(c);End.120 20010000 2000020000 30000測試以下測試以下3組數(shù)據(jù)：組數(shù)據(jù)：輸入整數(shù)輸入整數(shù)a和和b，輸出，輸出a+b的值。的值。2015年山東省信息學(xué)奧賽夏令營Integer：取值范圍：-3276832767(maxint) 類型數(shù)值范圍 占字節(jié)數(shù) Byte

11、 0 . 255 1 Word 0.65535 2 Shortint -128 . 127 1 Integer -32768.32767; 2 Longint -2147483648 . 2147483647 4 Longword 0.4294967295 4 Int64 -9223372036854775808 . 9223372036854775807 8 QWord 0 . 18446744073709551615 82015年山東省信息學(xué)奧賽夏令營整數(shù)的運算符有：、*、DIV（整除）、mod(取余）。15 Div 6 = 2 15 Div 6 = 2 (-15) div 6=-2(-1

12、5) div 6=-215 Div (-6)=-215 Div (-6)=-2(-15) div(-6)=2(-15) div(-6)=215 mod 6 = 315 mod 6 = 3(-15) mod 6=-3(-15) mod 6=-315 mod(-6)=315 mod(-6)=3(-15) mod (-6)=-3(-15) mod (-6)=-32015年山東省信息學(xué)奧賽夏令營 類型類型 范圍范圍 有效位數(shù)有效位數(shù) 占用字節(jié)占用字節(jié) Real 2.9e-39.1.7e3811.12 6 Single 1.5E-45 . 3.4E38 7-8 4 Double 5.0E-324 . 1

13、.7E308 15-16 8 Extended 1.9E-4951 . 1.1E4932 19-20 10 Comp -2E64+1 . 2E63-1 19-20 8實數(shù)類型Real類型運算符有：、*、/2015年山東省信息學(xué)奧賽夏令營Var begin read(a,b); c:=a*b; d:=a/b; writeln(c); writeln(d);End.?例例:輸入輸入:兩個正整數(shù)兩個正整數(shù)a、b(3; b:=23;2015年山東省信息學(xué)奧賽夏令營基本語句一、賦值語句二、read語句三、write語句2015年山東省信息學(xué)奧賽夏令營1、賦值語句賦值語句是最簡單的語句. 1)、賦值語句的

14、格式 變量名:=表達式； 其中“:=”稱為賦值號。 2)、執(zhí)行過程 計算機先計算賦值號右邊表達式的值，然后將表達式的值賦給變量名代表的變量。如：A：=（9*8）-（2-1）; A:=A+1 2015年山東省信息學(xué)奧賽夏令營、輸入語句read和readln功能： 從鍵盤讀入數(shù)據(jù)項，并把它存到變量中去，使該數(shù)據(jù)能在以后的計算中使用。輸入語句的一般形式為： read(v1，v2，vn)； readln(v1，v2，vn)； 從鍵盤逐次讀入數(shù)據(jù)，分別賦給變量v1，v2，vn，一行輸入多個變量值時，要求數(shù)據(jù)之間用空格分隔，readln語句要求輸入數(shù)據(jù)后必須回車，使得后繼操作從下一行的頭上開始。 2015

15、年山東省信息學(xué)奧賽夏令營及時充電（輸入語句）格式作用Read（變量表）接受鍵盤輸入數(shù)據(jù)存入對應(yīng)變量Readln（變量表）接受鍵盤輸入數(shù)據(jù)存入對應(yīng)變量，然后光標(biāo)換行Readln不接受數(shù)據(jù)，光標(biāo)換行輸入數(shù)據(jù)時，數(shù)值數(shù)據(jù)之間可用空格分開，也可以每輸入一個數(shù)按一次回車；如果是輸入字符或者字符串，兩者之間不能用空格分開，只能每輸入一個按一次回車。2015年山東省信息學(xué)奧賽夏令營read語句與readln語句區(qū)別是： 1) read語句是一個接一個地讀數(shù)據(jù)，在執(zhí)行完本Read語句( 讀完本語句中變量所需的數(shù)據(jù))后,下一個讀語句接著從該數(shù)據(jù)輸入行中繼續(xù)讀數(shù)據(jù)，也就是說，不換行。如：read(a,b); re

16、ad(c,d); read(e); 如果輸入數(shù)據(jù)行如下: 123 456則a,b,c,d,e的值分別為1,2,3,4,5,如果后面無讀語句則數(shù)據(jù)6是多余的，這是允許的。 2015年山東省信息學(xué)奧賽夏令營 Readln則不同，在讀完本則不同，在讀完本Readln語句中變量所需的數(shù)語句中變量所需的數(shù)據(jù)后據(jù)后, 該數(shù)據(jù)行中剩余的數(shù)據(jù)多余無用，或者說，在讀完本該數(shù)據(jù)行中剩余的數(shù)據(jù)多余無用，或者說，在讀完本Readln語句中變量所需數(shù)據(jù)后，一定要讀到一個回車，否語句中變量所需數(shù)據(jù)后，一定要讀到一個回車，否則多余的數(shù)據(jù)無用。則多余的數(shù)據(jù)無用。設(shè)有下列語句設(shè)有下列語句: read(a,b,c); readl

17、n(d,e); readln; readln(f,g);其中其中,所有變量均為整型。設(shè)輸入的數(shù)據(jù)如下：所有變量均為整型。設(shè)輸入的數(shù)據(jù)如下： 12 345678 910 11 12 13 Var a,b,c,d,e,f,g:integer;begin read(a,b,c); readln(d,e); readln; readln(f,g); writeln(a, ,b, ,c, ,d, ,e, ,f, ,g);end.2015年山東省信息學(xué)奧賽夏令營2)readln語句與read語句的第二個區(qū)別是:read 后一定要有參數(shù)表,readln可以不帶參數(shù)表,即可以沒有任何輸入項, 只是等待讀入一個

18、換行符(回車)。經(jīng)常用于暫停程序的運行，直到輸入一個回車2015年山東省信息學(xué)奧賽夏令營輸出語句write和writeln功能：把程序計算的結(jié)果，按適當(dāng)?shù)男问捷敵龅狡聊弧?)、write語句格式Write(表達式1，表達式2，)；如:write(x,5,a+b);write(My name is Liping);2)、writeln語句格式:Writeln(表達式1，表達式2，)或writeln2015年山東省信息學(xué)奧賽夏令營Write語句與writeln語句格式上都相似，但它們在功能上有所不同，兩個語句的區(qū)別在于: write語句將其后括號中的表達式一個接一個輸出后，沒有換行。 而write

19、ln語句則在輸出各個表達式的值后換行。例如以下兩個程序段的輸出分別為：write(1,2,3,4);write(5,6);輸出為：123456writeln(1,2,3,4);write(5,6);輸出為：1234562015年山東省信息學(xué)奧賽夏令營實數(shù)的輸出格式實數(shù)（real）以浮點型格式輸出。例如805.67對應(yīng)的浮點數(shù)為8.056700000000E+02。這種實數(shù)表達方式很不方便。我們可以通過下述形式強迫實數(shù)以定點型格式輸出： 實數(shù)表達式：域?qū)挘盒?shù)位數(shù)例如，t的值設(shè)為63.123。下面三條輸出語句分別有它們右邊所示的輸出格式： write(t)； 6.312300000000E+01

20、 write(t：6：2)； 63.12 write(t：6：5)； 63.12300 write(t:0:0);2015年山東省信息學(xué)奧賽夏令營vara,b,t:char;begin read(a,b); t:=a; a:=b; b:=t; writeln(a=,a,b=,b)end.例：輸入兩個整數(shù)a，b，交換他們的值，并輸出.如：輸入：30 34 輸出：34 302015年山東省信息學(xué)奧賽夏令營算術(shù)運算符和算術(shù)表達式1.算術(shù)運算符運算符運算運算對象結(jié)果類型+ 加整型、實型只要有一個運算對象是實型，結(jié)果就-減 整型、實型是實型，如果全部的運算對象都是整*乘 整型、實型型并且運算不是除法，則

21、結(jié)果為整型/除 整型、實型若運算是除法，則結(jié)果是實型。 div 整除整型整型mod取余整型整型Program ex1_5;Const a=128;Var b,d:integer; c:real;Begin b:=a div 16; c:=a/b; d:=a; write(a:4,b:4,c:4:0,d:4);end.Program ex1_6;Var a:integer;Begin read(a); writeln(a mod 10); writeln(a div 10 mod 10); wrteln(a div 100);End.輸入任意一個百位數(shù)2015年山東省信息學(xué)奧賽夏令營是通過運算符

22、把常量、變量、函數(shù)調(diào)用結(jié)合起來組成的。 3+x1+bPASCAL表達式有以下計算優(yōu)先順序規(guī)則：1.括號內(nèi)的表達式首先計算；2.運算符的優(yōu)先級有四級，按其優(yōu)先順序從高到低排列為：not； *，/，div，mod，and； +，-，or； =，=，IN；不同優(yōu)先級的兩運算符之間的操作數(shù)先與具有較高優(yōu)先級的運算符進行運算；3.同級的運算從左到右進行；另外，有一點需要指出的是，因為關(guān)系運算符的優(yōu)先級最低，當(dāng)用關(guān)系式構(gòu)造復(fù)雜的布爾表達式時，這些關(guān)系式作為初等條件必須放在括號里。如: (xy) and (z=y) or (x=0)若不加括號，就是一個錯誤的表達式。 表達式2015年山東省信息學(xué)奧賽夏令營輸

23、入一個3位的正整數(shù)，輸出他們的各位數(shù)字之和與乘積。如：輸入：436輸出：1372var n,a,b,c,x,y:integer;begin readln(n); a:=n div 100; b:=(n div 10) mod 10; c:=n mod 10; x:=a+b+c; y:=a*b*c; writeln(x); writeln(y);end.上機練習(xí)題目：2015年山東省信息學(xué)奧賽夏令營展示實力1 1、寫出下列表達式的值。、寫出下列表達式的值。 1212* *3+6/4=3+6/4=45 div 4=45 div 4=98 mod 10 =98 mod 10 =2 2、寫出下列程序段

24、的運行結(jié)果。、寫出下列程序段的運行結(jié)果。 Var my:real;Var my:real;BeginBegin my:=18/4-3; my:=18/4-3;Writeln(my:10:2)Writeln(my:10:2)End.End.Var n,v:integer;Var n,v:integer;BeginBegin read(n); read(n); v:=n mod 5; v:=n mod 5; writeln( writeln(VP=VP=,v),v)End.End. 運行時輸入運行時輸入 3434Var w1,w2:integer;Var w1,w2:integer;BeginBe

25、gin writeln( writeln(EnterEnter););Read(w1,w2);Read(w1,w2);W1:=0;W1:=0;W1:=w1+w2;W1:=w1+w2;Writeln(w1)Writeln(w1)End.End.運行時輸入運行時輸入1515，3636Var k1,k2,fn:integer;Var k1,k2,fn:integer;BeginBeginRead(k1,k2);Read(k1,k2);fn:=k1+2fn:=k1+2* *k2;k2;If fn7 then writeln(fn)If fn7 then writeln(fn)End.End.運行時輸入運行時輸入1,2,31,2,32015年山東省信息學(xué)奧賽夏令營展示實力3、從鍵盤輸入一個字符，然后顯示一個由該字符組成的圖案。輸入樣例輸出樣例