PL-SQL疑问

来源:百度知道 编辑:UC知道 时间:2024/06/05 21:32:09
怎样在PL—SQL里打印出等腰三角形

DECLARE
v_i NUMBER :=0;
v_n NUMBER :=10; --- 总行数
v_j NUMBER :=9;
v_k NUMBER :=0;
BEGIN
WHILE v_i < v_n LOOP
WHILE v_j>v_i LOOP -- 这段是打印空格
dbms_output.put(' ');
v_j:=v_j-1;
END LOOP;

WHILE v_k<2*v_i+1 LOOP
dbms_output.put('*');
v_k:=v_k+1;
END LOOP; -- 这段打印每行的* 号
dbms_output.new_line(); -- 打印换行符号
v_i:=v_i+1; --- 所有内部变量复原
v_j:=v_n-1;
v_k:=0;
END LOOP;
END;

--如果是空心菱形:

DECLARE
v_line NUMBER:=0;
v_n NUMBER:=10;
v_i NUMBER:=0;
v_j NUMBER:=0;
BEGIN
WHILE v_line<v_n LOOP
WHILE v_i<v_n-v_line LOOP
dbms_output.put(' ');
v_i:=v_i+1;
END LOOP;
dbms_output.put('*');
WHILE v_j<2*v_line-1 LOOP
dbms_output.put(' ');