UC知道pascal的一些菜鸟问题
来源：百度知道 编辑：UC知道 时间：2024/05/09 16:01:31
今天刚开始学PASCAL,有些相关的问题想问问个位大虾,我在一个教程里看见一个实例,如下:
下面程序在运行时，会提示输入一个圆的半径，然后会在屏幕上画一个圆。按回车后程序结束回到程序窗口。
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.
能不能帮我详细地翻译一下,我学的英文还没到达这种程度
下面程序在运行时，会提示输入一个圆的半径，然后会在屏幕上画一个圆。按回车后程序结束回到程序窗口。
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.
能不能帮我详细地翻译一下,我学的英文还没到达这种程度
Program ex1; //程序开始
Uses graph; //引用graph图形库
Var Gm,Gd,R :integer; //定义三个整型变量
Begin //开始语句
Gd:=0; //赋GD=0
Write('Please enter the radius:');readln(R); //给出提示，要求输入一个数，然后用readln读进来并赋给变量R
Initgraph(Gm,Gd,' '); //初始化图形库
Setcolor(Green); //设置颜色
Circle(320,240,R); //画圆
Readln; //等待任意键
Closegraph; //关闭图形库
End. //结束退出程序