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