|
Ejecución |
 |
|
Guión de la actividad 7.2:
Suma de los
primeros n números
naturales |
|
Arrancar el KPL. |
|
Abrimos el archivo
Sumar100 creado
anteriormente bien desde la
carpeta My Programs Files
que está en Mis Documentos o
bien desde: |
|
 |
|
Editamos el código de
Sumar100.kpl dejándo
el primer comentario así: |
// Programa: Sumarn
// Autores: Lidia y Pablo
// Descripción: Este
programa calcula la suma
de los n primeros
// números naturales
|
|
Poner título al programa: Sumarn.
Guardar el archivo picando
en Archivo/Guardar como
nuevo programa y
escribiremos el nombre
Sumarn, seleccionando la
carpeta donde quiera ir
almacenando todas las
actividades. Por defecto la
carpeta elegida es My
Phrograms Files que está en
Mis Documentos.
Desplegamos el Método
Principal, Method Main()
|
 |
|
 |
|
y empezamos a editar el código. Añadimos la definición de una
nueva variable n, que será
el extremo de la serie cuya
suma vamos a calcular: |
|
Var
n
As
Integer |
|
Cambiamos en las dos líneas
siguientes PrintLine por
ConsoleWriteLine y 100 por
n, ya que vamos a trabajar
con la consola, quedándonos
así: |
ConsoleWriteLine("Vamos
a calcular la suma
de los n primeros
números naturales")
ConsoleWriteLine("1+2+3+4+
... +(n-1)+n")
|
|
Pedimos al usuario el valor
de la variable n, es decir: |
n=ConsoleReadInt("Introduce
el valor de n = ",True)
|
|
En la sentencia FOR y su
interior lo dejamos como
está salvo 100 que se cambia
por n: |
For
m=1
To
n
suma=suma+m
Next
|
|
Y por último, quitamos las dos líneas con Print y escribimos
el código: |
ConsoleWrite("La
suma es igual a "+suma)
|
|
que nos imprimirá por
pantalla el resultado de la
suma.
Guardamos el archivo picando
sobre el icono
o Archivo/Guardar.
En el caso de existir algún error en el CÓDIGO FUENTE
de nuestro programa, KPL nos
informa con un aviso de
ERROR y el cursor se sitúa
sobre la línea y secuencia
errónea. Lo rectificaremos.
|
|
Al ejecutar el
programa (F5), se
activa la consola y
nos pide el valor de
n:
|
 |
|
Si introducimos, por
ejemplo, 150 y damos
a intro o Submit
obtenemos: |
 |
|
|
Puedes probar con distintos valores para n, como por ejemplo
100, 200, 3333. ¡Seguro que
obtienes 5050, 20100 y
5556111 respectivamente! |
