编程turbo pascal

例1.1计算半径为R的圆面积S

program Area; {程序首部}

{已知半径求圆的面积}

const pi=3.14159; {说明部分——数据描述}

var s,r:real;

begin {执行部分}

readln(r);

s:=pi*sqr(r);

writeln('s=',s);

end.

上述程序第一行称为程序首部。其中用花括号(注释可以用{ }或（* *）来表示）括起来的内容是注释，程序第二行就是一个注释，注释除了给人看，增加程序的可读性外，对程序编译和运行不起作用。一个程序可以包含多个出现在不同处注释，亦可无注释。程序第三行是常量说明，程序第四行是变量说明。程序从begin到end都是执行（语句）部分