Viết khai báo biến bán kính và diện tích hình tròn; khai báo hằng pi bằng 3.14. giúp mình với ạ mai mik thi

2 câu trả lời

program ct;
uses crt;
var r,dt,cv:real;
const pi=3.14;
Begin
    clrscr;
    write ('Nhap ban kinh R= ');readln(r);
    dt:=pi*r*r;
    cv:=2*pi*r;
    writeln('Dien tich hinh tron la: ',dt:6:2);
    writeln('Chu vi hinh tron la: ',cv:6:2);
    readln;
End.

Câu lệnh khai báo biến:

   Var r,S:real;

Câu lệnh khai báo hằng:

   Const pi=3.14;

    

Câu hỏi trong lớp Xem thêm