Вычислить полную стоимость путевки на лыжный курорт, если путевка стоит 300$ доставка увеличивает стоимость на 20 %, использование инвентаря - на 10%. Курс лолора ввести с клавиатуры. Стоимость путевки вывести в рублях.
Полная стоимость путёвки будет равна 390$(20% от 300 + 10% от 300)
С клавиатуры вводится стоимость одного доллара.
program test;
var voucher, rate: real;
begin
write(Enter the exchange rate of the dollar: );
readln(rate);
voucher:=300;
voucher:=voucher+voucher/100*20+voucher/100*10;
writeln(voucher*rate, rub);
readln;
end.
Оцени ответ
