Free pascal exit code 201 : <p><a href="https://i.stack.imgur.com/VSzBL.png" rel="nofollow noreferrer">my code</a></p>

<p>I'm trying to make a program to generate amicable numbers under 10000, but after i pressed ctrl+f9, it exited with exit code 201. How do i fix that?</p>
