$ set serveroutput on;
$declare
i number :=1;
x number :=5;
begin
loop
exit when i>10;
dbms_output.put_line(' '|| x*i);
i:=i+1;
end loop;
end;
/
Create a procedure for printing a table
$create or replace procedure table(x number)
as
i number :=1;
begin
loop
exit when i>10;
dbms_output.put_line(' '|| x*i);
i:=i+1;
end loop;
end;
/
$ exec table(5);
//while loop
create or replace procedure table(x number)
as
i number :=1;
begin
while
i>10
loop
dbms_output.put_line(' '|| x*i);
i:=i+1;
end loop;
end;
/
$ exec table(6);
//for loop
create or replace procedure table(x number)
as
i number :=1;
begin
for i in 1..
10
loop
dbms_output.put_line(' '|| x*i);
end loop;
end;
/
$ exec table(8);