PL/SQL:FOR循环:打印2-200之间的素数

–原作者:尚硅谷-宋红康
–FOR循环:打印2-200之间的素数 素数:仅有1和自身两个正约数

DECLARE

v_flag NUMBER(1):=1;

BEGIN

FOR v_i IN 2..200 LOOP

FOR  v_j IN 2..SQRT(v_i) LOOP

  IF MOD(v_i,v_j)=0 THEN  v_flag:=0;
    GOTO label;
  END IF;  
END LOOP;  

<<label>>

IF v_flag=1 THEN  DBMS_OUTPUT.PUT_LINE(v_i);
END IF;

v_flag:=1;

END LOOP;

END;