信息学竞赛Pascal语言概述与预备知识(2)
合肥奥数网整理
2013-01-18 16:00:51
思考与练习：
1、从前面的“Pascal软件下载”中，下载TP7.0,并将其减压到你的电脑硬盘中,然后按本章后面的说明建立快捷方式。
2、熟练使用所安装的这个软件，熟悉软件的各菜单项及其快捷键。
3、请输入下面的程序，并练习将其存盘、打开与运行程序。程序在运行时，会提示输入一个圆的半径，然后会在屏幕上画一个圆。按回车后程序结束回到程序窗口。
Program ex1;
Uses graph;
Var Gm,Gd,R :integer;
Begin
Gd:=0;
Write('Please enter the radius:');readln(R);
Initgraph(Gm,Gd,' ');
Setcolor(Green);
Circle(320,240,R);
Readln;
Closegraph;
End.
注意，如果上面程序运行时会出现初始化图形错误，请将系统目录下BGI子目录EGAVGA.BGI和UNITS子目录中的Graph.tpu拷贝到系统目录下BIN目录即可。
关于合肥市青少年信息学竞赛更多的信息，请关注合肥奥数网“青少年信息学竞赛”频道。
相关阅读
