Basic - Probabilidades

   
Vista:

Probabilidades

Publicado por ricbrother (2 intervenciones) el 29/01/2011 03:35:18
Amiogos, me corroe una duda. Por mas que trato no consigo hacer funcionar el siguiente còdigo. Tal vez puedan ayudarme:

Below is the code from the book....
If initially we have A =number of cards in deck, T =J =
up-card, W(I) = number of cards of denomination I, K = 0,
B = 1, and F(X) = probability of achieving a total of X, then
our program reads:
10 FOR I = 1 TO 10
20 IF W(I) = 0 THEN 270
30 B = B*W(I)/A
40 W(I) = W(I)-1
50 T = T+I
60 IF T>16 THEN 130
70 IF (T-ll)*(T-7)>O THEN 170
80 IF (I-l)*(J-l) = 0 THEN 150
90 FOR L =1 TO K
100 IF A(L) = 1 THEN 150
110 NEXT L
120 GO TO 170
130 F(T) = F(T)+B
140 GO TO 240
150 F(f+l0)=F(f+10)+B
160 GO TO 240
170A = A-I
180 K = K+1
190 A(K) = I
200 GO SUB 10
158
210 I = A(K)
220 K = K-1
230 A = A+1
240 W(I) = W(I)+l
250 T= T-I
260 B = B*A/W(I)
270 NEXT I
280 RETURN
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Probabilidades

Publicado por Antoni Masana (35 intervenciones) el 31/01/2011 13:02:05
Intenta reescribir la rutina sin tanto salto de linea.

El 158 ¿Que pinta?

En la linea 70 hay una O (letra) en lugar de un cero. ¿Es una variable o un error?

¿Que BASIC utilizas? ( es por curiosidad )

El RETURN y el GOSUB estan muy mal colocados.

Este codigo finaliza con un error.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Probabilidades

Publicado por ricbrother (2 intervenciones) el 01/02/2011 00:35:53
Gracias Antoni, lo que sucede es que soy un programador novato.

Seguire sus sugerencias. Empleo QBasic. El codigo lo saque de un libro de matematicas. Y no consigo hacer que funcione y estoy obsesionado.
Saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Imágen de perfil de Antoni Masana

RE:Probabilidades

Publicado por Antoni Masana (8 intervenciones) el 01/02/2011 12:06:26
El codigo que pusiste padece ser parte de otra más largo.
Las tablas estan vacias y no muestra ningun resultado.

Por ejemplo la A es el numero de cartas y vale CERO
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Probabilidades

Publicado por fernanda fernanlopster@gmail.com (1 intervención) el 03/02/2012 10:35:17
Hay que dar un valor de entrada a la variable (w) 15 W = 1.2.3.4....etc)
Tambien (T) necesita un valor. Si en la primera linea limitas el valor de i a 10 y se lo asignas a T
en la línea 60 entiendo que T no puede se mayor de 10
Este fragmento parece ser parte de otro más largo, por eso te faltan datos

Saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar