define count = 0, num = 0, mod = 0
define nums = 100, tau = 0

do

	let count = count + 1
	let tau = 0
	let mod = 1

	do

		if count % mod = 0 then

			let tau = tau + 1

		endif

		let mod = mod + 1

	loop mod < count + 1

	if count % tau = 0 then

		let num = num + 1
		print count

	endif

loop num < nums