Programa de Pseint que genere los números negativos del -1 al -40 y que genere la suma total de ellos

Programa de Pseint que genere los números negativos del -1 al -40 y que genere la suma total de ellos.

Solución:

Proceso negativos
Definir a,b como entero;
b<-0;
Para a<-(-1) Hasta -40 Con Paso -1 Hacer
Escribir "Numeros Negativo: ",a;
b<-b+a;
FinPara
Escribir "Total de la Suma: ",b;
FinProceso