信息学奥林匹克竞赛普及培训.doc

信息学奥林匹克竞赛普及培训系列(1)
初识Free Pascal
湖南省岳阳县教学仪器电教站
前言:为了实践全纳教育,培养学生的信息技术素养,提高学生参加信息学奥林匹克竞赛的能力,本刊推出“信息学奥林匹克竞赛普及培训系列”栏目。通过系列培训,全面介绍Free Pascal知识、数据结构与算法基础、历年试题及解析等方面内容,为学生了解竞赛,参与竞赛,赛出实力进行全方位指导。
竞赛的语言环境
本培训针对竞赛语言之一的Free Pascal进行。计算机操作系统可以选择Windows或Linux。根据学校现行基础,这里我们选择Windows平台下的语言环境。
1软件下载
进入全国信息学奥林匹克竞赛网站(),单击NOIP2008栏目下的超链接“2008竞赛评测系统与语言环境”,点击“Windows平台下的语言环境,请通过如下网址下载:.-/~zqy/”进入下载页面下载软件fpc--(此网页笔者2009年元月19日下载该软件成功)。
使用Linux环境则直接点击“软件下载”进入/image/arbiter-。
软件安装
解压缩NOIP Environment for Windows-.rar文件,双击运行fpc--。第一个页面为欢迎页面,确定安装软件则点击Next;第二个页面可点Browse按钮选择安装路径,然后点击Next;部件选择页面有三个选项:Full install-ation为完全安装,Minimum installation为典型安装,Custom installation为定制安装,选择选项后点击Next;下一页面可以选择程序启动的文件夹或选中复选框取消创造程序启动文件夹,按需选择后点击Next;接下来选择附加任务,可以按默认设置点击Next;这时进入安装页面,点击Install进行安装;安装进度条走完弹出安装信息框,阅读后点击Next;最点出现的是安装向导完成对话框,点击Finish按钮,Free Pascal安装完成。
代码页问题
启动Free Pascal软件,可以完成代码录入、调试和编译等各项工作。
但是,运行后的第一个页面可能显示的是乱码,这是因为代码页设置错误造成的。修改方法是:右击标题栏,选择“默认值”这个快捷菜单,将“选项”页中“默认代码页”修改成“437(OEM-美国)”。在这里,你还可以修改其他的控制台窗口属性。


点击File菜单的子菜单New,你就有了一个空白的编辑区域,在这里你可以编写代码。这里我们在编辑区域输入下面的代码求两数的和。
Program p1_1(input,output);
Var a,b,s:integer;
Begin
Write('Plase read A and B:');
readln(a,b);
s:=a+b;
write('a+b=',s);
writeln
End.
完成源代码编辑工作之后,应当保存文件。点击File菜单的子菜单Save,弹出“Save File As”对话框,在Name文本框输入文件名,点击Ok按钮保存文件。

pile”编译当前程序,“Make”编译、连接当前可执行文件,“Build”重新编译、连接当前可执行文件。编译菜单可以进行文件调试,若存在错误,“Compile Messages”框报告错误信息,pile essful,可以按任意键继续。初学者会经常出现错误,应当按照错误信息进行修改。
点击Run菜单的子菜单“Run”可以运行程序。在“Free Pascal IDE”框按提示输入数据,回车后程序运行完成。
点击Debug菜单下的子菜单“Output”或点击子菜单“User screen”或直接按Alt f5快捷键可以查看程序运行结果。


程序p1_1由两部分组成:

程序首部由保留字Program开始,后接程序名p1_1(这个名称是用户自定义的标识符)及参数列表(input,output),以分号结束。input和output这两个参数实现程序与设备输入和输出的交流。

程序体由程序说明部分和执行部分组成,是程序的主体。
“Var a,b,s:integer;”是p1_1程序的说明部分。说明了a、b、s这三个整形(integer)变量(Var)。
“Begin”和“End”之间的部分是程序的执行部分。
“Write('Plase read A and B:');”提