Не пойму где ошибка, паскаль формулу не считает, помогите пожалуйста!
В аэробусе, вмещающем 160 пассажиров, три четверти мест находятся в салонах экономического класса и одна четверть мест - бизнес-класса. Стоимость билета в салоне бизнес-класса х рублей, что в 2 раза выше стоимости экономического.
Разработайте программу, которая вычислит сумму денег, полученную от продажи билетов на этот рейс, если известно, что остались не распроданными а билетов бизнес-класса и b билетов эконом класса.
program n_12;
var a, b: integer; s, x: real;
begin
writeln (Подсчѐт суммы от продажи билетов);
writeln (Количество непроданных билетов бизнес класса a);
readln (a);
writeln (Количество непроданных билетов бизнес класса b);
readln (b);
writeln (Стоимость билетов бизнес класса x);
readln (x);
s := (40 – а)*x+(120 – b)*x/2;
writeln (Билетов продано на , s, руб.)
end.
Какая у теб . ошибка?
Оцени ответ
