Viết chương trình tính diện tích hình tròn (Pi,R,S)

0 bình luận về “Viết chương trình tính diện tích hình tròn (Pi,R,S)”

1. Program Dien_tich_hinh_tron;

   Uses crt;

   var r:byte;

   s:integer;

   const pi=3,14;

   Begin

   writeln(‘Nhap ban kinh hinh tron’);

   readln(r);

   s:=r*r*pi;

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

   Readln;

   End.

   Bình luận

2. program dientichhinhtron; 

   uses crt;

    var r,s:real;

   const Pi=3,14;

    Begin 

          clrscr; 

          writeln(‘Nhap r: ‘); 

         readln(r); 

         s:=r*r*Pi;

          writeln(‘dien tich hinh tron la: ‘,s:8:3,’m2);

     readln;

   End.

   Bình luận