написал на js. по аналогии и на паскаль можно:
начало
var year = prompt('Какой сегодня год?'); ввод
var days = prompt('Сколько дней в текущем месяце?'); ввод
var today = prompt('Сегодняшнее число?'); ввод
var total = +days - +today; вычисление
alert('До конца месяца осталось: ' + total); вывод
конец