Pages

Powered By Blogger

Thursday, 4 July 2013

ARITHMATIC

P1. WRITE A NESTED PROGRAM TO ADD AND TO MULTIPLY TWO
NUMBERS.


SQL> set serveroutput on
SQL>DECLARE
n1 number(4);
n2 number(4);
sumval number(4);
BEGIN
n1 := &n;
n2 := &n;
sumval := n1 + n2;
<< inner_block >>
DECLARE
prod number;
BEGIN
prod := n1 * n2 ;
Dbms_output.put_line( 'Product Value =' || prod );
END inner_block ;
Dbms_output.put_line( 'Sum Value =' || sumval );
END ;
/
Enter value for n: 3
old 6: n1 := &n;
new 6: n1 := 3;
Enter value for n: 4
old 7: n2 := &n;
new 7: n2 := 4;
Product Value =12
Sum Value =7
PL/SQL procedure successfully completed.

If any error occurs then implement the below code before any execution.
SQL> set echo on;
SQL> set verify off;
SQL> set define '&';


P2. WRITE A PROGRAM TO CALCULATE THE SIMPLE INTEREST AND
COMPOUND INTEREST, IF P, N, R ARE GIVEN.


SQL> declare
p number(9,2) ;
n number(9,2) ;
r number(9,2) ;
si number(9,2) := 0;
ci number(9,2) := 0;
begin
p := &principal_amount;
n := &no_of_years;
r := &rate_of_interest;
si := p*n*r/100;
ci := p*(1+r/100)**n;
dbms_output.put_line('simple interset =' ||si);
dbms_output.put_line('compound interset =' ||ci);
end;
/
Enter value for principal_amount: 52
Enter value for no_of_years: 5
Enter value for rate_of_interest: 25
simple interset =65
compound interset =158.69
PL/SQL procedure successfully completed.

Download ARITHMATIC.pdf.html

No comments:

Post a Comment