Algoritmo detarea
	Definir c,x,suma Como Entero
	x = 0
	suma = 0
	c = 0
	Mientras x <> 1 Hacer
		x = azar(6) + 1
		c = c + 1
		Escribir "tirada ",c," = ",x
		suma = suma + x
	FinMientras
	Escribir "EL dado se lanzo ",c," veces"
	Escribir "El puntaje acumulado es: ",suma
FinAlgoritmo