输入圆的半径r(可以为小数),求圆的周长L和面积S。

题目:

    输入圆的半径r(可以为小数),求圆的周长L和面积S。

 

知识点:

    圆的周长和面积公式。

    sqr(x),数学函数,求x的平方。

 

代码:

 1 program shen12;
 2 const
 3   pi=3.1415926535;
 4 var
 5   L,r:real;
 6 BEGIN
 7   readln(r);
 8   L:=2*pi*r;
 9   writeln('L=',L:6:4);
10 END.
 1 program shen13;
 2 const
 3   pi=3.14;
 4 var
 5   S,r:real;
 6 BEGIN
 7   readln(r);
 8   // S:=pi*r*r;
 9   S:=pi*sqr(r);
10   writeln('S=',S:10:2);
11 END.

 

posted @ 2016-11-30 16:36  橙煦猿  阅读(628)  评论(0编辑  收藏  举报