viết chương trình 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

0 bình luận về “viết chương trình 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”

1. program cv_dt_htron;

   uses crt;

        var s, cv, r: real;

   begin

        clrscr;

        writeln(‘Nhap chieu dai ban kinh r: ‘); readln(r);

        cv:=2*r*pi;

        s:=r*r*pi;

        writeln(‘Chu vi hinh tron la: ‘, cv);

        writeln(‘Dien tich hinh tron la: ‘, s);

        readln

   end.

   Bình luận

2. Uses crt;
   Var s, r, p: real;
   Const pi=3.14;
   Begin
   Clrscr;
   Write(‘Nhap ban kinh r = ‘); readln(r);
   s:=sqr(r)*pi;
   p:=pi*2*r;
   Writeln(‘Chu vi la: ‘,p:8:2);
   Writeln(‘Dien tich la: ‘,s:8:2);
   Readln
   End.

   Bình luận