RosettaCodeData/Task/Sylvesters-sequence/Yabasic/sylvesters-sequence.basic

12 lines
294 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
print "10 primeros términos de la sucesión de Sylvester:"
suma = 0
for i = 1 to 10
if i=1 then sylvester = 2 else sylvester = sylvester*sylvester-sylvester+1 : fi
print i using("##"), ": ", sylvester
suma = suma + 1 / sylvester
next i
print "\nSuma de sus rec¡procos: ", suma
end