《FreePascal的使用.ppt》由会员分享，可在线阅读，更多相关《FreePascal的使用.ppt（20页珍藏版）》请在三一办公上搜索。
1、Free Pascal的安装与使用,Free Pascal的安装,如果已经安装过旧版本的Freepascal For NOI，安装新版本前，务必将已安装版本卸载。用户在下载完毕后，运行Freepascal For NOI的安装文件，按照安装向导的提示即可完成安装过程。注意，在安装完成以后需要重新启动Windows，使Freepascal For NOI生效。在安装过程完成后，用户点击“开始”菜单，选择“程序”菜单项可以发现“Freepascal For NOI”的快捷菜单，其中包含：fp、卸载Freepascal For NOI两项。点击fp，可以直接进入Freepascal IDE集成开发环
2、境，用户可以在Freepascal IDE开发环境下进行源代码编辑、程序编译、调试等开发工作，并可从Freepascal IDE的在线文档中获取帮助。卸载Freepascal For NOI用于卸载Freepascal For NOI，点击后出现卸载向导，用户可以根据向导的提示方便的卸载Freepascal For NOI。,文件,编辑,查找替换,运行,编译,调试,工具,选择项处理,窗口,帮助,菜单栏,Free Pascal IDE,Free Pascal的菜单,Free Pascal的使用,1.注意：在做题时，先进入Windows命令行环境，务必在进入程序源代码所在目录后，再执行fp命令启动
3、Free Pascal集成开发环境。Windows 2000、XP下，点击：开始-运行，输入cmd，点击“确定”，即可启动命令行环境；Windows 98下，点击：开始-运行，输入command，点击“确定”，即可启动命令行环境；需要调整窗口布局，如果窗口布局错乱，可以删除fp同一目录下的fp.dsk（感谢sceoy想出该方法）,用Free Pascal编写程序的过程,2新建程序窗口 按F10进行主菜单，选择FILE菜单，执行其中NEW命令，就可建立一个新的程序窗口（默认文件名为Noname00.pas或Noname01.pas等）。3程序的输入、编辑与运行 在当前程序窗口中，一行一行的输入程
4、序。当程序输入完毕之后，一般要先按Alt+F9（或执行compile菜单中compile命令）对程序进行编译。如果程序有语法错误，则会在程序窗口的第一行处显示第一个红色错误信息。若无语法错误，则窗口正中央会出现一个对话框，提示编译成功。接下来，我们可以运行程序了。程序的运行可以通过按ALT+R打开RUN菜单中的RUN命令，或直接按快捷键CTRL+F9。则可以在用户窗口中输出运行结果。通常在程序运行结束后系统回到Pascal系统的集成环境，因此要查看运行结果，要按ALT+F5将屏幕切换到用户屏幕。,5程序的保存与打开 当我们想把程序窗口中的程序存入磁盘时，可以通过按F2键(或执行File菜单中的
5、save命令)来保存程序。第一次保存文件时屏幕上会出现一个对话框要求输入文件名(默认扩展名为.pas)。当我们要将磁盘上的程序文件中的PASCAL程序装入窗口时，可按F3(或执行File菜单中的Open命令)来装入程序，此时系统也会弹出一个对话框要求输入要打开的文件名，或直接在文件对话框列表中选择所要的文件，然后回到打开文件。,Free Pascal常用快捷键汇总,错误信息,具体内容情参考有关书籍,补充,如何把我的程序编译成.exe文件？如果你在编译或运行程序后，并没有生成相应的.exe可执行文件，那么你使用的应是Turbo Pascal。Turbo Pascal默认在内存中编译和运行程序，这
6、样当你在软盘上编写程序时就可以节省一些时间。你可以在菜单Compile-Destination中选择Disk，这样在编译和运行程序时就会生成相应的.exe文件了。程序首部的参数Input和Output是什么意思？它们代表默认输入输出设备，但只在老式的Pascal语言中有存在意义。在Borland/Turbo Pascal和Free Pascal中，程序首部不需要任何参数，但为了兼容旧式的Pascal程序，编译器会忽略程序首部的所有参数。,作业一、完成下面程序的输入、编译、运行、保存，熟悉Pascal的集成环境。,1输出图形,program ex1(input,output);varh,k:in
7、teger;beginfor h:=1 to 8 do begin write(:20-h);for k:=1 to 2*h-1 do write();writeln;end end.,program ex2(input,output);varn,ge,shi,bai,qian:integer;beginwriteln(input a number:):readln(n);qian:=n div 1000;bai:=n div 100 mod 10;shi:=n mod 100 div 10;ge:=n mod 10;n:=ge*1000+shi*100+bai*10+qian;writeln
8、(n);end.,2输入一个四位整数，将这个数反向输出。（例：输入为1367，输出为7631）,3猜数程序,program ex3(input,output);varx,n,k:integer;beginrandomize;x:=random(100);n:=0;repeat write(please input a number(0-100):);read(k);n:=n+1;if k=x then writeln(You are right!);if kx then writeln(Too big.Please try again!);if kx)then writeln(You are fail.The number is,x)end.,作业二、独立完成以下题目,1、求两个数的最大公约数 输入整数a和b，输出a和b的最大公约数 2、计算今天星期几 按照 年 月 日 的格式输入今天的日期。计算和输出今天是星期几的信息。3、计算多项式 设多项式exp(x)=1+x+(10-10)输入x 输出exp(x)的值（保留小数点后四位）,Free Pascal下载地址,谢谢合作本讲结束,
