algoritmo Cantidad_y_suma_de_numeros_enteros
variables
entero numero, contador, suma
inicio
escribir(
"Introduzca un número entero: " )
leer( numero
)
contador ← 0
suma ← 0
mientras
( numero <> 0 )
si ( numero
> 0 )
contador
← contador + 1
suma
← suma + numero
fin_si
escribir(
"Introduzca un número entero: " )
leer( numero
)
fin_mientras
escribir(
"Ha introducido
", contador,
" número(s) mayor(es) que cero."
)
escribir(
"La suma es ", suma
)
fin |