Помогите составить программу на языке Pascal
Составить программу определения стоимости разговора по телефону с учетом скидки 20%, предоставляемой по субботам и воскресеньям. Исходные данные (длительность разговора в минутах и номер дня недели) вводятся с клавиатуры. Результаты работы программы записываются в файл Out.txt Стоимоть минуты разговора задать как константу