// Programa: Sumar100

// Autores: Lidia y Pablo

// Descripción: Este programa calcula la suma de los 100 primeros

// números naturales

 

Program Sumar100

 

      Method Main()

 

            Var m As Integer

            Var suma As Integer

            printLine("Vamos a calcular la suma de los 100 primeros números naturales")

            PrintLine("1+2+3+4+ ... + 99+100")

            For m=1 To 100

                  suma=suma+m

            Next

            Print("La suma es igual a ")

            Print(suma)

 

      End Method

 

End Program