-- ej1 DECLARE a INT := &primer_numero; b INT := &segundo_numero; BEGIN IF a < b THEN dbms_output.put_line('ERROR: a > b'); ELSIF a MOD b = 0 THEN dbms_output.put_line('Son divisibles.'); ELSE dbms_output.put_line('No son divisibles.'); END IF; END; / -- ej2 BEGIN dbms_output.put_line(TO_CHAR(SYSDATE, 'Day')); END; / -- ej3 DECLARE numa INT := &primer_numero; numb INT := &segundo_numero; numc INT := &tercer_numero; BEGIN IF numa < 0 OR numb < 0 OR numc < 0 THEN dbms_output.put_line('Número negativo no aceptable.'); ELSE suma INT := numa + numb + numc; dbms_output.put_line(suma); END IF; END; / -- ej4 DECLARE salario NUMBER(2) := &tu_salario; BEGIN IF salario <= 0 THEN dbms_output.put_line('Salario no válido.'); ELSIF salario < 20000 THEN dbms_output.put_line('Tu salario es bajo.'); ELSIF salario < 40000 THEN dbms_output.put_line('Tu salario está bien.'); ELSIF salario >= 40000 THEN dbms_output.put_line('Tu salario está muy bien!'); END IF; END; /