h = 0.0

print "The first twenty harmonic numbers are:"
for n = 1 to 20
	h += 1.0 / n
	print n, h
next n
print

h = 1 : n = 2
for i = 2 to 10
	while h < i
		h += 1.0 / n
		n += 1
	end while
	print "The first harmonic number greater than "; i; " is "; h; ", at position "; n-1
next i
end