DECLARE
	v_pi NUMBER(8,7);
	v_current_radius NUMBER(1);
	v_diameter NUMBER;
	v_area NUMBER;
BEGIN
	v_pi := 3.1415926;
	v_current_radius := 3;
	v_diameter := 2*v_pi*v_current_radius;
	v_area := v_pi*v_current_radius**2;
	DBMS_OUTPUT.PUT_LINE('For a circle with radius '||v_current_radius||
	', the diameter is '||ROUND(v_diameter,2)||
	' and the area is '||ROUND(v_area,2)||'.');
END;
/