PLSQL编程练习题详解

1、输出菱形

declare m number := 3;
beginfor y in -m..m loop for x in -m..m loopif abs(y) + abs(x) <= m then                       dbms_output.put('*');else    dbms_output.put(' ');end if;end loop;       dbms_output.new_line();end loop;
end;

运行结果

2、编写一个程序，用于接受用户输入的数字，将该数左右反转，然后显示反转后的数。

declare
score number(10);
tp number;
rem number(10):=0;
beginscore:=&请输入要反转的数字;while score > 0 looptp := mod(score,10);rem := (rem*10)+tp;score := trunc(score/10);end loop;dbms_output.put_line('反转后的数字为:'|| rem);
end;

运行结果


3、编写一个程序，往一个表中查询数据，如果没有查到任何数据，将引发no_data_found异常，显式一则消息。

declare
empname varchar2(20);
beginselect ename into empname from emp where sal>8000;dbms_output.put_line(empname);exceptionwhen no_data_found then dbms_output.put_line('未找到任何数据');when too_many_rows then dbms_output.put_line('查询结果返回多行');
end;

这里以oracle的自带emp表为例

运行结果

4、编写一个程序，接受用户输入的一个值，然后根据该值从一个表中检索出数据，如果这时检索出的记录多于一条，就引发TOO_MANY_ROWS异常，显式消息“返回多行”。

declare
empname varchar2(20);
num number;
beginnum:= &请输入你要查询的工资数目;select ename into empname from emp where sal>num;dbms_output.put_line(empname);exceptionwhen no_data_found then dbms_output.put_line('未找到任何数据');when too_many_rows then dbms_output.put_line('返回多行');
end;

运行截图

返回多行


未找到任何数据

5、编写一个程序，接受特定玩具的ID，比较玩具的价格并显示折扣，如果价格高于或等于500元，则优惠150元；价格高于或等于400元，则优惠100元；如果价格高于或等于250元，优惠50元，价格低于250元，则不优惠。

declare
price number;
num number;
beginprice:= &请输入玩具的价格;if price >= 500  then num := price - 150;dbms_output.put_line('优惠金额150元,应付款'||num||'元');elsif price >= 400  then num := price - 100;dbms_output.put_line('优惠金额100元,应付款'||num||'元');elsif price >= 250  then num := price - 50;dbms_output.put_line('优惠金额50元,应付款'||num||'元');else dbms_output.put_line('应付款'||price||'元');end if;
end;

运行截图

6、编写一个程序，接受用户输入部门编号、部门名称、部门地址，将其插入到scott.dept表中。

declare
dept_no dept.deptno%type;
dept_name dept.dname%type;
dept_loc dept.loc%type;
begindept_no:=&部门编号;dept_name:='&部门名称';dept_loc:='&部门地址';--insert into dept values(dept_no,dept_name,dept_loc);--commit;execute immediate 'insert into dept values(:1,:2,:3)'using dept_no,dept_name,dept_loc;commit;
end;

运行截图

本文来自互联网用户投稿，文章观点仅代表作者本人，不代表本站立场，不承担相关法律责任。如若转载，请注明出处。 如若内容造成侵权/违法违规/事实不符，请点击【内容举报】进行投诉反馈！