Пожалуйста, помогите составить линейные алгоритмы на языке Pascal. Вот задачи

Пожалуйста, помогите составить линейные методы на языке Pascal. Вот задачки
1)Жд билет для взрослого стоит X рублей. Цена билета для школьника Y сочиняет P% от цены билета для взрослого. Группа состоит из K школьников и V взрослых. Сколько рублей M стоят билеты на всю группу?
2) При оплате услуг через платежный терминал взимается комиссия P%. Терминал принимает суммы кратные 10 рублям. Аня желает положить на счет собственного мобильного телефона не меньше R рублей. Какую наименьшую сумму M она обязана положить в приемное устройство данного терминала?
Заранее спасибо.