Viết chương trình pascal tính chu vi và diện tích hình tròn với bán kính r đươc nhập từ bàn phím

Program chuvihinhtron_dientichhinhtron;

Uses crt;

Var   R: integer ;

        S,C : real;

Const   Pi=3,14;

Begin

   clrser;

Writeln(‘R= ‘); Readln(R);

C:=Pi*2*R;

S:=Pi*R*R;

Writeln(‘Chu vi la C= ‘,C);

Writeln(‘Dien tich la S= ‘,S);

Readln

End.

Xin Hay Nhất!