Practical Practice 6
Oracle Practice
Write a program to enter radius of a circle and find its diameter, circumference and area in PLSQL block.
Write a program to enter radius of a circle and find its diameter, circumference and area in PLSQL block.
SOLUTION
--Static code
set serveroutput on;
DECLARE
radius number := 6;
area number(7,2);
diameter number(7,2);
circumference number(7,2);
pi constant number := 3.14;
BEGIN
area := pi * radius * radius ;
diameter := 2 * radius;
circumference := 2 * pi * radius;
dbms_output.put_line('The Area of Circle is :-'||area);
dbms_output.put_line('The Diameter of a Circle is :-'||diameter);
dbms_output.put_line('The Circumference of a Circle is :-'||circumference);
END;
/
--Dynamic code
set serveroutput on;
DECLARE
radius number := &radius;
area number(7,2);
diameter number(7,2);
circumference number(7,2);
pi constant number := 3.14;
BEGIN
area := pi * radius * radius ;
diameter := 2 * radius;
circumference := 2 * pi * radius;
dbms_output.put_line('The Area of Circle is :-'||area);
dbms_output.put_line('The Diameter of a Circle is :-'||diameter);
dbms_output.put_line('The Circumference of a Circle is :-'||circumference);
END;
/
--Dynamic code set serveroutput on; DECLARE radius number := &radius; area number(7,2); diameter number(7,2); circumference number(7,2); pi constant number := 3.14; BEGIN area := pi * radius * radius ; diameter := 2 * radius; circumference := 2 * pi * radius; dbms_output.put_line('The Area of Circle is :-'||area); dbms_output.put_line('The Diameter of a Circle is :-'||diameter); dbms_output.put_line('The Circumference of a Circle is :-'||circumference); END; /