Sleeping Beauty problem: Difference between revisions
m
→{{header|FutureBasic}}: add indents
(Added Easylang) |
m (→{{header|FutureBasic}}: add indents) |
||
Line 414:
local fn SleepingBeauty
NSUInteger i
CGFloat heads = 0, sleep = 0
for i = 1 to _iterations
NSInteger coinToss = int( rnd(2) )
sleep++
if coinToss = 1 then heads++ else sleep++
next
printf @"Awakenings over %lld sleep cycles = %.f", _iterations, sleep
printf @"Percent probability of heads on waking = %.4f%%", heads / sleep * 100
end fn
Line 438:
Percent probability of heads on waking = 33.3578%
</pre>
=={{header|Go}}==
| |||