oracle包体package,包规范

create or replace package circle_package
as
pi number(6,2):=3.14;
function fun_get_circle_area(param_r number) return number;
function fun_get_circle_c(param_r number) return number;
end circle_package;
 /

create or replace package  body circle_package
as

function fun_get_circle_area(param_r number) return number
as
begin
return pi*power(param_r,2);
end;

function fun_get_circle_c(param_r number) return number
as
begin
return pi*param_r*2;
end;
end circle_package;
 /

declare
v_area number(6,2);
v_c number(6,2);
v_r number(5):=3;
begin
v_area:=circle_package.fun_get_circle_area(v_r);
v_c:=circle_package.fun_get_circle_c(v_r);
Dbms_output.put_line('圆的半径：'||v_r );
Dbms_output.put_line('圆的周长：'||v_c );
Dbms_output.put_line('圆的面积：'||v_area  );
end;

SQL> set serveroutput on;
SQL> /

圆的半径：3
圆的周长：18.84
圆的面积：28.26

PL/SQL procedure successfully completed