1. a)viết phần khai báo cho bài toán tính chu vi và diện tích hình tròn. b) bài toán trên cần bao nhiêu byte? Giúp mình với ạ

0 bình luận về “1. a)viết phần khai báo cho bài toán tính chu vi và diện tích hình tròn. b) bài toán trên cần bao nhiêu byte? Giúp mình với ạ”

1. BÀI LÀM 

   a) Program BTT;
   Uses crt;
   Var r,s,p: real;
   Const Pi=3.14;
   Begin
           Clrscr;
           Write(‘Nhap r: ‘); Readln(r);
           p:=2*r*pi;
           s:=sqr(r)*pi;
           Write(‘Dien tich la ‘,s:0:2,’ va chu vi la ‘,p:0:2);
           Readln
   End.

   Bài 2:

   Program DTCVHINHTRON;
   Uses crt;
   Var a,s,p: real;
   Begin
           Clrscr;
           Write(‘Nhap a: ‘); Readln(a);
           p:=a*4;
           s:=sqr(a);
           Write(‘Dien tich la ‘,s:0:2,’ va chu vi la ‘,p:0:2);
           Readln
   End.

   Sau khi nhập xong ấn ctrl F9 để chạy chương trình 

   B) bài toán trên cần 1 byte

   Trả lời