Imprimir todos los números pares del 1 al n en PL/SQL

Prerrequisito- Introducción a PL/SQL

En el código PL/SQL, los grupos de comandos se organizan dentro de un bloque. Agrupa declaraciones o sentencias relacionadas. En declare part, declaramos variables y entre start y end part, realizamos las operaciones.

Dado un número N, la tarea es mostrar todos los números pares y su suma de 1 a N.

Ejemplos:

Input: N = 3
Output: 2
Sum = 2

Input: N = 5
Output: 2, 4
Sum = 6

El enfoque es inicializar un número num con 2 y seguir incrementándolo en 2 hasta que num sea <= N.
A continuación se muestra su implementación:

-- Display all even number from 1 to n
DECLARE
    -- Declare variable num
    num NUMBER(3) := 2;
    sum1 NUMBER(4) := 0;
BEGIN
    WHILE num <= 5 LOOP
  
        -- Display even number
        dbms_output.Put_line(num);
  
        -- Sum of even numbers
        sum1 := sum1 + num;
  
        -- Next even number
        num := num + 2;
          
  
    -- End  loop
    END LOOP;
  
    -- Display even number
        dbms_output.Put_line('Sum of even numbers is ' || sum1);
END;

Producción:

2
4
Sum of even numbers is 6