Пожалуйста, помогите составить линейные алгоритмы на языке Pascal. Вот задачи
1)Железнодорожный билет для взрослого стоит X рублей. Стоимость билета для школьника Y составляет P% от стоимости билета для взрослого. Группа состоит из K школьников и V взрослых. Сколько рублей M стоят билеты на всю группу?
2) При оплате услуг через платежный терминал взимается комиссия P%. Терминал принимает суммы кратные 10 рублям. Аня хочет положить на счет своего мобильного телефона не меньше R рублей. Какую минимальную сумму M она должна положить в приемное устройство данного терминала?
Заранее спасибо.
1)Железнодорожный билет для взрослого стоит X рублей. Стоимость билета для школьника Y составляет P% от стоимости билета для взрослого. Группа состоит из K школьников и V взрослых. Сколько рублей M стоят билеты на всю группу?
2) При оплате услуг через платежный терминал взимается комиссия P%. Терминал принимает суммы кратные 10 рублям. Аня хочет положить на счет своего мобильного телефона не меньше R рублей. Какую минимальную сумму M она должна положить в приемное устройство данного терминала?
Заранее спасибо.
Answers & Comments
program z;
var
x, y, p, k, v, m: real;
begin
read (x, y, p, k, v, m);
m:=v*x+k*(x*p/100);
write (m);
end.