BEGIN ELL Embarazada
dbms_output.put_line('EEEE');
END;

DECLARE
salario number;
nombre varchar2(100);
activo boolean;
fecha date;
BEGIN
nombre:='Rosorio';
fecha:=sysdate;
salario:=100;
activo:=true;
dbms_output.put_line('Nombre: '||nombre);
dbms_output.put_line('Fecha: '||fecha);
dbms_output.put_line('Numero: '||salario);
dbms_output.put_line('Activo: '|| case when activo then 'Si' else 'No' end);
END;

set SERVEROUTPUT on;
declare
PI number:=3.1416;
radio number:=7;
begin
dbms_output.put_line('El Area de ciculo es '|| pi*radio*radio);
dbms_output.put_line('El Area de ciculo es '|| round(pi*radio*radio,2));
dbms_output.put_line('El Area de ciculo es '|| round(pi*radio*radio));
end;
/

set serveroutput on;
declare
cantidad number;
usuario VARCHAR2(100);
begin
select count(*),user into cantidad,usuario from dual;
dbms_output.put_line('El Usuario es '||usuario);
dbms_output.put_line('La Cantidad es '|| cantidad);
end;
/

set serveroutput on;
declare
nombre VARCHAR2(100):='Rosorio';
hoy date:=sysdate;
nombre2 VARCHAR2(100);
begin
dbms_output.put_line('Largo del String '|| length(nombre));
dbms_output.put_line('Limpia los extremos '|| trim(nombre));
dbms_output.put_line('Minusculas '|| lower(nombre));
dbms_output.put_line('Mayusculas '|| upper(nombre));
dbms_output.put_line('Cortar '|| substr(nombre,1,3));
dbms_output.put_line('Reemplazar '|| replace(nombre,'os','Gonzalo'));
dbms_output.put_line('**********************************************');
dbms_output.put_line('Hoy '|| hoy);
dbms_output.put_line('Agregar Mes '|| add_months(hoy,1));
dbms_output.put_line('Agregar Dia '|| (hoy+1));
dbms_output.put_line('**********************************************');
dbms_output.put_line('Dia '|| to_char(hoy,'dd'));
dbms_output.put_line('Dia '|| to_char(hoy,'dd'));
dbms_output.put_line('Dia y Mes '|| to_char(hoy,'dd/MM'));
dbms_output.put_line('Anio '|| to_char(hoy,'yyyy'));
dbms_output.put_line('**********************************************');
dbms_output.put_line('NVL '|| NVL(nombre2,'No esta definido'));
end ;
/