CLS
PRINT "Problema 6"
PRINT "Este problema se puede solucionar a manera de sucecion"
PRINT "Tenemos la ecuacion S=((n/2) * ((a1 * 2) + (n - 1) * d ))"
PRINT "Donde n=100, a1 es el numero con el que se inicia la secuencia y d=2"
INPUT "Now, diga un numero", A1
S = ((100 / 2) * ((A1 * 2) + (100 - 1) * 2))
PRINT "La suma de los 100 primeros numeros pares es", S
END