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.

   Bình luận

2. program Tin_hoc;

   uses crt;

   var n:real;

   begin

   clrscr;

   write(‘Nhap ban kinh: ‘);readln(n);

   writeln(‘Chu vi cua hinh tron: ‘,n*2*3.14:0:2);

   writeln(‘Dien tich cua hinh tron: ‘,n*n*3.14:0:2);

   readln;

   end.

   Bình luận