Вычислить полную стоимость путевки на лыжный курорт, если путевка стоит 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.