DECLARE
-- constant declaration
pi constant number := 3.14;
-- other declarations
radius number(6,2);
dia number(6,2);
circumference number(8, 2);
area number (11, 2);
BEGIN
-- processing
radius := 3.5;
dia := radius * 2;
circumference := 2.0 * pi * radius;
area := pi * radius * radius;
-- output
dbms_output.put_line('Radius: ' || radius);
dbms_output.put_line('Diameter: ' || dia);
dbms_output.put_line('Circumference: ' || circumference);
dbms_output.put_line('Area: ' || area);
END;
/