Задаие №9

 

Листинг кода формы:

я

 

 

листинг модуля для запуска формы: