Penney's game: Difference between revisions
Content added Content deleted
Line 229: | Line 229: | ||
Loop |
Loop |
||
Get a upper char into 'c' |
Get a upper char into 'c' |
||
Continue if ( var(c) Not( Occurs in ("HT") )) |
|||
Let ( c := Get if( Geq( Rand(1), 0.5), "T", "H" ) ) |
|||
End If |
|||
Let( P:=Cat(P,c) ) |
Let( P:=Cat(P,c) ) |
||
Loccol(13), Printnl(P) |
Loccol(13), Printnl(P) |