Taller :)

Diseñe un algoritmo que sume DIEZ numeros cualquiera, no consecutivos e imprima la suma.

Var   suma,num ,I : numérico
inicio
       cls()
       suma=0
       desde I=1 Hasta 10 {
                  imprimir("\n digite un numero")
                  leer(num)
                 suma=suma+num
}
imprimir("\n la suma es "suma")
fin