Владимир, прошу прощения, мне сказали что эта программа очень длинная, и оператор Randomize они не приходили (и типо пользоваться нельзя тем что не проходили), в миниатюрах прикреплена похожая задача (которые они на парах делают), как я понял эта должна быть примерно такой же, в общем беда какая-то...