ITPub博客

首页 > Linux操作系统 > Linux操作系统 > 70

70

原创 Linux操作系统 作者:simkyo 时间:2013-08-29 11:36:51 0 删除 编辑
create or replace procedure p_cycle
as
  i int;
begin
  i := 0;
  for i in 1 .. 4 loop
    --前四行的控制
    for k in reverse 0 .. (4 - i) loop
      --空格
      dbms_output.put(' ');
    end loop;
    for j in 1 .. (2 * i - 1) loop
      --*号打印
      dbms_output.put('*');
    end loop;
    dbms_output.new_line();
    --换行
  end loop;
  --下面的跟上面的差不多,就是反过来
  for i in 1 .. 3 loop
    for k in 0 .. i loop
      dbms_output.put(' ');
    end loop;
    for j in reverse 1 .. (7 - 2 * i) loop
      dbms_output.put('*');
    end loop;
    dbms_output.new_line();
  end loop;
end;

来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/12961536/viewspace-769543/,如需转载,请注明出处,否则将追究法律责任。

上一篇: 69
下一篇: 71
请登录后发表评论 登录
全部评论

注册时间:2013-06-20

  • 博文量
    193
  • 访问量
    137112