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/，如需转载，请注明出处，否则将追究法律责任。
请登录后发表评论
登录
全部评论
最新文章
- IMPDP ORA-39014
- ORA-12720: operation requires database is in EXCLUSIVE mode
- ORA-01686:max # files (%s) reached for the tablespace %s
- Add column in 11g
- Explain Plan usage
- set long strings for the archive log destination ora-32021
- Oracle DBA 职业要求和职业前景
- exp-0026 error
- ORA-00845 when upgrade to 11gR1
- 11g autotask management
