Add GBD/t8-ej1

1/GBD/assignments/t8-ej1.sql

@@ -0,0 +1,51 @@
+-- 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;
+/