chess program in plsql

DECLARE

  n number:=8;

v_wh varchar2(3):=' # ';

v_bl varchar(3):=' * ';

v_str varchar2(100);

Begin

   For i in 1..n loop     

    -- dbms_output.put(v_wh);

     For j in 1..n Loop          

        If mod(j,2)=0 Then 

          dbms_output.put(v_bl);

         ELSE

         dbms_output.put(v_wh);

        End If;      

     End Loop;

     v_str := v_wh;

     v_wh :=v_bl;

     v_bl :=v_str;

     dbms_output.new_line;     

End Loop;   

End