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

0 голосов
32 просмотров

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


Информатика (125 баллов) | 32 просмотров
Дан 1 ответ
0 голосов

Могу помочь с 1 задачей:
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.


(104 баллов)