Tin học Giúp mình bài này với mình đang cần gấp ạ!

[nhuyy]

[TẶNG BẠN] TRỌN BỘ Bí kíp học tốt 08 môn
Chắc suất Đại học top - Giữ chỗ ngay!!

ĐĂNG BÀI NGAY để cùng trao đổi với các thành viên siêu nhiệt tình & dễ thương trên diễn đàn.

Tính chu vi, diện tích hình tròn (bán kính do người dùng nhập)

 

[Charon Ellis]

Program HINHTRON;

Uses Crt;

Var r,dt,cv:real;

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.