Ejercicios con sentencias

TALLER:
Ejercicio 1:
Escribir un bloque PL/SQL que calcule la media de dos números dados por el usuario.

SET SERVEROUTPUT ON;
SET VERIFY OFF;

declare
v_num number:= &v;
d_num number:= &d;
x number;
begin
x:=(v_num+d_num)/2;
dbms_output.put_line('MEDIA '||x);
end;

Ejercicio 2:
Escribir un bloque PL/SQL que pida dos identificadores de profesores y determine cual de los dos está más cerca de cero o si son iguales.

SET SERVEROUTPUT ON;
SET VERIFY OFF;

declare
v_num number:= &Prof1;
d_num number:= &Prof2;
begin
if v_num
dbms_output.put_line('Profesor1 esta mas cerca de 0');
ELSIF d_num
dbms_output.put_line('Profesor2 esta mas cerca de 0');
else
dbms_output.put_line('Los dos estan cerca de 0');
end if;
end;

Ejercicio 3:
Escribir un bloque PL/SQL que convierta una determinada cantidad expresada en segundos a horas, minutos y segundos.

SET SERVEROUTPUT ON;
SET VERIFY OFF;
declare
s number:= &segundos;
h integer;
m integer;
mm number;
ss number;
begin
h:=s/3600;
m:=s/60;
mm:=s mod 60;
ss:=s mod 60;
dbms_output.put_line('HORAS '||h);
dbms_output.put_line('MINUTOS '||m);
dbms_output.put_line('SEGUNDOS '||ss);
end;


Ejercicio 4:
Mostrar el contenido de una variable que contenga la capacidad total de todas las aulas del edificio de Informática (EUI)

create table LOCALES (codigo varchar2(10) primary key, nombre varchar2(30),capacidad number(10), edificio varchar2(40));

insert into locales values('inf1','sexto',20,'informatica');
insert into locales values('inf2','primero',15,'informatica');
insert into locales values('inf3', 'segundo',20,'informatica');
insert into locales values('inf4', 'cuarto',19,'informatica');
insert into locales values('inf5', 'quinto',17,'informatica');
insert into locales values('fin1', 'primero',20,'finanzas');
insert into locales values('com1', 'cuarto',20,'comercial');
insert into locales values('elec1', 'primero',20,'electronica');

SET SERVEROUTPUT ON;
SET VERIFY OFF;
DECLARE
v_cap NUMBER(10);
BEGIN
SELECT sum(capacidad) into v_cap FROM locales where edificio like 'informatica';
dbms_output.put_line('Capacidad total '||v_cap||' alumnos');
END;