Algoritmo ejercicio10
Definir i Como Entero;
Definir sum Como Entero;
Definir cont Como Entero;
Definir aux Como Entero;
Definir p Como real;
aux<-0
cont<-0
sum<-0
p<-0
Repetir
leer i
sum<-sum+i
cont <-cont+1
Hasta Que i=0
si cont<>0
p<-sum/(cont-1)
FinSi
Escribir sum
escribir p
FinAlgoritmo