Programming Exercise (HP-15C, 15C LE - and others)

[churichuro]

on my HP50 with UBasic this take 5.5 Sec

Code:


suma=0
for n= 10000 to 1 step -1
  suma= suma + (1 / n)* (-1)^ (n+1)
next
fix 10.9
print
print "Sum ="; suma
end

result:

UBasic v 0.2b (C)
Suma =0.693097183
ready!

press << ON >>