ceu-notes/1/GBD/assignments/t8-ej1.sql

52 lines
1007 B
SQL

-- 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;
/