Algoritmo detarea
	Definir paterno,materno,dia,mes,año Como Caracter
	Escribir "Apellido paterno"
	leer paterno
	Escribir "Apellido materno"
	leer materno
	Escribir "Nombre"
	leer nombre
	Escribir "Dia de nacimiento"
	leer dia
	Escribir "Mes de nacimiento"
	leer mes
	Escribir "Año de nacimiento"
	leer año

	rfc = Subcadena(paterno,0,1) + Subcadena(materno,0,0) + Subcadena(nombre,0,0)+Subcadena(año,2,3)+mes+dia
	Escribir "RFC = ",rfc
FinAlgoritmo