declare
x int;
y varchar2(100);
begin
for m in 1 .. 9 loop
y := '';
for n in 1 .. m loop
x := m * n;
y := y || ' ' || m || '*' || n || '=' || x;
end loop;
dbms_output.put_line(substr(y, 2));
end loop;
end;
/
Begin
DBMS_output.put_line('99table');
For I in 1 .. 9 loop
For J in 1 .. 9 loop
If I >= J then
DBMS_output.put(to_char(J) || '*' || to_char(I) || '=' ||
to_char(i * j) || ' ');
End if;
End loop;
DBMS_output.put_line('');
End loop;
End;
Begin
DBMS_output.put_line('99table');
For I in 1 .. 9 loop
For J in 1 .. I loop
DBMS_output.put(to_char(I) || '*' || to_char(J) || '=' ||
to_char(i * j) || ' ');
End loop;
DBMS_output.put_line('');
End loop;
End;
declare
i int;
j int;
begin
dbms_output.put_line('99table');
for i in reverse 1 .. 9 loop
for j in reverse 1 .. i loop
dbms_output.put(i || '*' || j || '=' || i * j || ' ');
end loop;
dbms_output.put_line('');
end loop;
end;
来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/13790829/viewspace-616783/,如需转载,请注明出处,否则将追究法律责任。