Aplicacion Simulacion de Dado

From OLPC
Jump to navigation Jump to search

Nivel

???

Actividades

Activity-terminal.svg

Descripción

En esta página:

http://www.ceibal.edu.uy/contenidos/areas_conocimiento/mat/probabilidad/usando_etoys.html

Quizá se pueda usar Etoys, pero también se puede usar otro de los lenguajes de programación integrados en las XO, "awk"

Se copia este texto a un archivo de texto llamado "dado.awk"

############################
BEGIN {
	srand()
	if (veces == 0) veces = 10

	for (i = 1; i <= veces; i++) {
		dado = 1 + int(6 * rand())
		++cuenta[dado]
		++total
		print "vez: " i
		printf "salió: " dado ", Frecuencias Absolutas:"
		for (j = 1; j <= 6; j++) printf " %d [%5d]", j, cuenta[j]+0
		printf "\n          Frecuencias Relativas:"

		for (j = 1; j <= 6; j++) printf " %d [% 4.2f]", j, (cuenta[j]+0)/total
		print
	}
}
############################

Se lo puede utilizar en la actividad terminal de esta manera:

awk -v veces=5 -f dado.awk

El resultado será:

vez: 1
salió: 1, Frecuencias Absolutas: 1 [    1] 2 [    0] 3 [    0] 4 [    0] 5 [    0] 6 [    0]
          Frecuencias Relativas: 1 [ 1.00] 2 [ 0.00] 3 [ 0.00] 4 [ 0.00] 5 [ 0.00] 6 [ 0.00]
vez: 2
salió: 6, Frecuencias Absolutas: 1 [    1] 2 [    0] 3 [    0] 4 [    0] 5 [    0] 6 [    1]
          Frecuencias Relativas: 1 [ 0.50] 2 [ 0.00] 3 [ 0.00] 4 [ 0.00] 5 [ 0.00] 6 [ 0.50]
vez: 3
salió: 5, Frecuencias Absolutas: 1 [    1] 2 [    0] 3 [    0] 4 [    0] 5 [    1] 6 [    1]
          Frecuencias Relativas: 1 [ 0.33] 2 [ 0.00] 3 [ 0.00] 4 [ 0.00] 5 [ 0.33] 6 [ 0.33]
vez: 4
salió: 4, Frecuencias Absolutas: 1 [    1] 2 [    0] 3 [    0] 4 [    1] 5 [    1] 6 [    1]
          Frecuencias Relativas: 1 [ 0.25] 2 [ 0.00] 3 [ 0.00] 4 [ 0.25] 5 [ 0.25] 6 [ 0.25]
vez: 5
salió: 1, Frecuencias Absolutas: 1 [    2] 2 [    0] 3 [    0] 4 [    1] 5 [    1] 6 [    1]
          Frecuencias Relativas: 1 [ 0.40] 2 [ 0.00] 3 [ 0.00] 4 [ 0.20] 5 [ 0.20] 6 [ 0.20]

Aportan