Помогите срочно пожалуйста!!! не могу решить задание в delphi7

сам решай

Там тебе дана пошаговая инструкция и даже код тоже дан. В чем твоя проблема? Чего тебе от нас-то надо?

Если у вас есть код, пусть даже неправильный и неработающий, вы можете его показать и заодно показать, какую ошибку выдает Делфи. А дальше вам подскажут по обстоятельствам. Это в разы проще, чем сделать всю работу с нуля.