Esto no es precisamente una pregunta, pero si le es de utilidad a alguien, este es un ejemplo de como calcular los días transcurridos entre dos fechas en PSeint:
Algoritmo calcular_diastranscurridos
Definir dia_Inicial,mes_Inicial,an_Inicial,dia_Final,mes_Final,an_Final,enero,febrero,marzo,abril,mayo,junio,julio,agosto,septiembre,octubre,noviembre,diciembre,dias_AnInc,dias_Hastafechainc,dias_TotalesAnInc,total_Anfinal,dias_Hastamesfinal,dias_Totalesfinales,dias_Transcurridos Como Entero
// Variable que calcula días extra por año
Definir dias_bis,ajuste_Diasbis como real
// dias acumulador por cada mes
enero<-31; febrero<-59; marzo<-90; abril<-120; mayo<-151; junio<-181; julio<-212; agosto<-243; septiembre<-273; octubre<-304; noviembre<-334; diciembre<-365;
//Ingresar fecha inical
Escribir "A continuación se te pedira la fecha inicial, primero se te pedirá el año, después el mes y por último el día";
Escribir "Ingrese el año (aaaa)";
Leer an_Inicial
Escribir "Ingrese el mes (mm)";
Leer mes_Inicial;
Escribir "Ingrese el día (dd)";
Leer dia_Inicial;
Escribir "La fecha inicial es ",dia_Inicial,"/",mes_Inicial,"/",an_Inicial,"!";
Escribir " ";
//Ingresar fecha Final
Escribir "A continuación se te pedira la fecha final, de igual forma, primero se te pedirá el año, después el mes y por último el día";
Escribir "Ingrese el año (aaaa)";
Leer an_Final
Escribir "Ingrese el mes (mm)";
Leer mes_Final;
Escribir "Ingrese el día (dd)";
Leer dia_Final;
Escribir "La fecha final es ",dia_Final,"/",mes_Final,"/",an_Final,"!";
Escribir " ";
//Días hasta 31 de diciembre del año inicial
// Paso uno, verificar si el año es bisiesto
si (an_Inicial/4) = 0 entonces dias_AnInc<-366
Sino dias_AnInc<-365
FinSi
si mes_Inicial=1 entonces dias_Hastafechainc <- dia_Inicial
Sino
Si mes_Inicial=2 entonces dias_Hastafechainc <- enero + dia_Inicial
SiNo
Si mes_Inicial=3 entonces dias_Hastafechainc <- febrero + dia_Inicial
SiNo
Si mes_Inicial=4 entonces dias_Hastafechainc <- marzo + dia_Inicial
SiNo
Si mes_Inicial=5 entonces dias_Hastafechainc <- abril + dia_Inicial
SiNo
Si mes_Inicial=6 entonces dias_Hastafechainc <- mayo + dia_Inicial
SiNo
Si mes_Inicial=7 entonces dias_Hastafechainc <- junio + dia_Inicial
SiNo
Si mes_Inicial=8 entonces dias_Hastafechainc <- julio + dia_Inicial
SiNo
Si mes_Inicial=9 entonces dias_Hastafechainc <- agosto + dia_Inicial
SiNo
Si mes_Inicial=10 entonces dias_Hastafechainc <- septiembre + dia_Inicial
SiNo
Si mes_Inicial=11 entonces dias_Hastafechainc <- octubre + dia_Inicial
Sino
Si mes_Inicial=12 entonces dias_Hastafechainc <- noviembre + dia_Inicial
FinSi
FinSi
FinSi
FinSi
FinSi
FinSi
FinSi
FinSi
FinSi
FinSi
FinSi;
FinSi;
Si (an_Inicial/4) = 0 entonces
dias_Hastafechainc<-dias_Hastafechainc+1
Sino
dias_Hastafechainc<-dias_Hastafechainc+0
FinSi
dias_TotalesAnInc <- dias_AnInc - dias_Hastafechainc;
// Hola Profesora Rebecca, hasta el momento solo he calculado el total de días entre la fecha inicial y el 31 de diciembre del año fecha inicial, ahora calcularé el total de días entre el primero de enero del año siguente al año de la fecha inicial y hasta la fecha final, separé el cálculo en dos pasos para simplificarlos
total_Anfinal<- an_Final - (an_Inicial+1);
si mes_Final=1 entonces dias_Hastamesfinal <- dia_Final
Sino
Si mes_Final=2 entonces dias_Hastamesfinal <- enero + dia_Final
SiNo
Si mes_Final=3 entonces dias_Hastamesfinal <- febrero + dia_Final
SiNo
Si mes_Final=4 entonces dias_Hastamesfinal <- marzo + dia_Final
SiNo
Si mes_Final=5 entonces dias_Hastamesfinal <- abril + dia_Final
SiNo
Si mes_Final=6 entonces dias_Hastamesfinal <- mayo + dia_Final
SiNo
Si mes_Final=7 entonces dias_Hastamesfinal <- junio + dia_Final
SiNo
Si mes_Final=8 entonces dias_Hastamesfinal <- julio + dia_Final
SiNo
Si mes_Final=9 entonces dias_Hastamesfinal <- agosto + dia_Final
SiNo
Si mes_Final=10 entonces dias_Hastamesfinal <- septiembre + dia_Final
SiNo
Si mes_Final=11 entonces dias_Hastamesfinal <- octubre + dia_Final
Sino
Si mes_Final=12 entonces dias_Hastamesfinal <- noviembre + dia_Final
FinSi
FinSi
FinSi
FinSi
FinSi
FinSi
FinSi
FinSi
FinSi
FinSi
FinSi;
FinSi;
dias_Totalesfinales <- (total_Anfinal*365)+dias_Hastamesfinal;
ajuste_Diasbis <- Trunc(total_Anfinal / 4); // Para redondear el número de días bisiestos y poderlos sumar con un tipo de variable Entero
dias_Totalesfinales <- dias_Totalesfinales + ajuste_Diasbis
// Calculo final de días transcurridos
dias_Transcurridos <- dias_TotalesAnInc + dias_Totalesfinales;
Escribir "los dias transcurridos entre ",dia_Inicial,"/",mes_Inicial,"/",an_Inicial," y ",dia_Final,"/",mes_Final,"/",an_Final," es ",dias_Transcurridos," días aproximadamente!";
// Alumnno = Hanssel Arnulfo Nuñez Castañeda
FinAlgoritmo
Compartir la solución a un problema que no pude encontrar en otros foros, quizá alguien ya lo haya compartido, pero no pude dar con un ejemplo, por ende, pensé podría ser de ayuda compartir mi proceso