Viết chương trình tính chu vi diện tích hình tròn: Bán kính được nhập vào từ bàn phím. uConst Pi = 3.14; uR có kiểu dữ liệu số nguyên; uS,v có kiểu dữ liệu số thực

Bán kính được nhập vào từ bàn phím
uConst Pi = 3.14;
uR có kiểu dữ liệu số nguyên
uS,v có kiểu dữ liệu số thực
uS:= r*r*3.14;
uV:=2*r*3.14;
uWriteln(‘dien tich’,s);
uWriteln(‘chu vi’,v);