PL/SQL program to find Greatest among Three Number using procedure

In this program, you will find greatest of three number using PL/SQL procedure.

declare
x number;
y number;
z number;
procedure greater(a in number,b in number,c in number)
is
g number;
begin
if (a>b) then
 g:=a;
else
 g:=b;
end if;
if(c>g)then
 g:=c;
end if;
dbms_output.put_line('max number are '||g);
end;
begin
x:=&x;
y:=&y;
z:=&z;
greater(x,y,z);
end;
/

output

Enter value for x: 10
old   7: x:=&x;
new   7: x:=10;
Enter value for y: 12
old   8: y:=&y;
new   8: y:=12;
Enter value for z: 15
old   9: z:=&z;
new   9: z:=15;
max number are 15