PseInt - Ejercicio 10.1 - cantidad de ceros con mientras

Algoritmo cant_ceros
	definir a, b, c, d, i Como Entero
	definir op Como Caracter
	i = 0
	b = 0
	op = "s"
	Mientras op = "s" hacer
		Escribir "cuantos numeros desea ingresar?"
		leer a

		Mientras i <  a Hacer

			escribir "ingrese un numero"
			leer c
			si c == 0
				b = b + 1
			FinSi
			i = i +1
		FinMientras
		i = 0
		escribir "usted ha ingresado ", b, " ceros en total"
		Escribir "desea seguir ingresando numeros? s/n"
		leer op
	FinMientras

FinAlgoritmo