Sum of a series: Difference between revisions
Content added Content deleted
(Sum of a series en True BASIC) |
(Sum of a series en Yabasic) |
||
| Line 326: | Line 326: | ||
PRINT "zeta(2) = "; pi * pi / 6 |
PRINT "zeta(2) = "; pi * pi / 6 |
||
END |
END |
||
</lang> |
|||
==={{header|Yabasic}}=== |
|||
<lang yabasic> |
|||
sub sumSeries(n) |
|||
if n = 0 then return 0 : fi |
|||
sum = 0 |
|||
for k = 1 to n |
|||
sum = sum + 1 / k ^ 2 |
|||
next k |
|||
return sum |
|||
end sub |
|||
print "s(1000) = ", sumSeries(1000) |
|||
print "zeta(2) = ", pi * pi / 6 |
|||
end |
|||
</lang> |
</lang> |
||