{Bài 2: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ó.}
program cv_dt_ht;
uses crt;
var r,s,c: real;
BEGIN
clrscr;
writeln('Tinh chu vi va dien tich hinh tron');
write('Nhap ban kinh: '); readln(r);
s:=pi*r*r;
c:=2*pi*r;
writeln('Chu vi bang ', c:0:2);
writeln('Dien tich bang ',s:0:2);
READLN;
END.