Nhập vào bán kính của hình tròn. In ra màn hình diện tích và chu vi của nó.

0 bình luận về “Nhập vào bán kính của hình tròn. In ra màn hình diện tích và chu vi của nó.”

1. program BTH;
   uses crt;
   var a:real;
   BEGIN
           clrscr;
           Write(‘Nhap ban kinh: ‘);readln(a);
           Writeln(‘Chu vi hinh tron la: ‘,(a+a)*pi:4:2);
           writeln(‘Dien tich hinh tron la: ‘,a*a*pi:4:2);
           readln;
   END.

   CHÚC BẠN HỌC TỐT!!!

   Bình luận

2. Program HINHTRON;
   Uses Crt;
   Var r,dt,cv:real;

   Begin
   Clrscr;
   Write (‘Nhap ban kinh R: ‘); readln(r);
   dt:=pi*r*r;
   cv:=2*pi*r;
   Writeln(‘Dien tich hinh tron la:’,dt:1:2);
   Writeln(‘Chu vi hinh tron la:’,cv:1:2);
   Readln;

   End.

   Bình luận