输入圆的半径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.

 

转载于:https://www.cnblogs.com/cnssc/p/6118410.html