1) Desarrollar una función en PASCAL que reciba una cadena, y 2 valores y devuelva la cadena resultante de quitar la subcadena indicada por los subvalores.

Ejemplo de uso:
Program parcial;
Uses crt;
Var a,b:String;
Function eliminarSubcadena(a:String;desde,cuantos:integer):String;
Begin
  {a desarrollar}
end; {de eliminarSubcadena}

Begin {pgm pcpal}
  a:='Hoy es día lunes';
  b:=eliminarSubcadena(a,5,7);
  writeln('>',b,'<');
end.

Debe imprimir: >Hoy lunes<
Nota: Tener en cuenta todas las validaciones.

2) Desarrollar una función en PASCAL que reciba una cadena, y una longitud, y devuelva la cadena, resultante de agregar caracteres blancos al inicio y al final, centrando la cadena recibida.

Ejemplo de uso:
Program parcial;
Uses crt;
Var a,b:String;
Function agregarBlancos(a:String;longitud:integer):String;
Begin
  {a desarrollar}
end; {de agregarBlancos}

Begin {pgm pcpal}
  a:='Hoy lunes';
  b:=agregarBlancos(a,30);
  writeln('>',b,'<');
end.