PL/SQL Example to find average of three numbers

This is a PL/SQL sample example to accept three numbers from the user and find average of accepted numbers.

Aim - PL/SQL Example to find average of three numbers

Sample Program : -

declare
  a number(3);
  b number(3);
  c number(3);
  avgr number(5,2);
begin
  a:=&a;
  b:=&b;
  c:=&c;
  avgr:=((a+b+c)/3);
dbms_output.put_line('Average of a, b, c is: '||avgr);
end;


Output of PL SQL Block: -

Enter value for a: 22
old   7:   a:=&a;
new   7:   a:=22;
Enter value for b: 32
old   8:   b:=&b;
new   8:   b:=32;
Enter value for c: 43
old   9:   c:=&c;
new   9:   c:=43;
Average of a, b, c is: 32.33

PL/SQL program to generate Fibonacci series

It is a sample example of generate fibonacci series upto 10 numbers.

Aim - PL/SQL program to generate Fibonacci series.

PLSQL Sample Program: -

declare
  f1 number(3);
  f2 number(3);
  f3 number(3);
  num number(3);
begin
  f1:=0;
  f2:=1;
  f3:=0;
  num:=1;
  while num<=10
  loop
 dbms_output.put_line(f3);
 f1 :=f2;
 f2:=f3;
 f3:=f1+f2;
 num:=num+1;
  end loop;
end;

Output of PL SQL Block: -
0
1
1
2
3
5
8
13
21
34