помогите написать программу через диалоговое окно на delphi

Составить программу, которая печатает номера дней в месяце, если вводится день недели. Считаем, что 1-е число месяца - понедельних, в меске 31 денз Выводить на экран словесное описание дня недели и соответствующие числа месяца (например, вводится число 2, на экране появляется: «Вторник - 2, 9, 16, 23, 30»).

помогите, пожалуйста, вожусь весь день (сделать необходимо через диалоговое окно, язык-delphi)