Стоимость туристической путевки определяется в зависимости от времени года. Базовая стоимость путевки умножается на сезонный коэффициент, который определяется следующим образом: октябрь, май, январь - коэффициент 1; июнь, июль август, сентябрь - коэффициент 1.2; ноябрь, декабрь, февраль, март, апрель - коэффициент 0.8. Составить программу определения стоимости путевки, если известна ее базовая стоимость и месяц, на который приобретается путевка.

Program Polik1907;uses crt;Var   tur:real;  mes:integer;begin  writeln('***************************************');  writeln('*    Мы рады приветствовать вас       *');  writeln('*         в нашем турагентстве        *');  writeln('*         P O L I K   1 9 0 7         *');  writeln('*               ! ! !                 *');  writeln('***************************************');  writeln();  writeln('Введите базовую стоимость путёвки: ');  readln(tur);  writeln('month Введите номер месяца: ');  readln(mes);  case mes of    1,5,10: writeln('Стоимость вашей путёвки составит ',tur,'  рублей');    6,7,8,9:  writeln('Стоимость вашей путёвки составит ',tur*1.2,'  рублей');    2,3,4,11,12:  writeln('Стоимость вашей путёвки составит ',tur*0.8,'  рублей');    else writeln('Введите правильный номер месяца');  end;end.