Viết chương trình tính chu vi và diện tích hình tròn

Câu hỏi : Viết chương trình tính chu vi và diện tích hình tròn.

Lời giải:

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.

Ví dụ: Chương trình tính chu vi và diện tích hình tròn biết rằng R là bán kính đường tròn và được nhập vào từ bàn phóm. CHUVI:=2*PI*R; DIENTICH:=PI*R

program chuvi_dientich_hinhtron;

uses crt;

const pi = 3.14;

var R: integer;

cv, dt: real;

begin

clrscr;

writeln; { xuong dong }

readln ( R );

cv:= 2*R*pi;

writeln ( ' chu vi = ' , cv : 8:2 );

dt:=R*R*pi;

writeln ( 'dien tich = ', dt :8:2 );

readln;

end.