En VFP8.0, ¿cómo programar para calcular la suma de números enteros impares, la suma de números enteros pares y la suma de todos los números enteros del 1 al 100? ¡Se necesita un proceso!

borrar

almacenar 0 en a, b, c

para i=1 a 100

si i2=1

a=a i

else

b=b i

endif

c=c i

endfor "La suma de los enteros impares:", a "La suma de los enteros pares:", b "La suma de todos los enteros:", c