numTiradas = 1000000
permanece = 0
cambia = 0

for i = 1 to numTiradas
	pta_coche = int(rand * 3) + 1
	pta_elegida = int(rand * 3) + 1
	if pta_coche <> pta_elegida then
		pta_montys = 6 - pta_coche - pta_elegida
	else
		do
			pta_montys = int(Rand * 3) + 1
		until pta_montys <> pta_coche
	end if
	# manteenr elección
	if pta_coche = pta_elegida then permanece += 1
	# cambiar elección
	if pta_coche = 6 - pta_montys - pta_elegida then cambia +=1
next i

print "Si mantiene su elección, tiene un "; permanece / numTiradas * 100 ;"% de probabilidades de ganar."
print "Si cambia, tiene un "; cambia / numTiradas * 100; "% de probabilidades de ganar."
end