В аэробусе вмещающем 160 пассажиров три четверти мест находятся в салоне бизнес класса

Задание 65. В аэробусе, вмещающем 160 пассажиров, три четверти мест находятся в салоне экономического класса и одна четверть мест — в салоне бизнес-класса. Стоимость билета в салоне бизнес-класса составляет x рублей, что в два раза выше стоимости билета в салоне экономического класса.
Необходимо вычислить сумму денег, полученную авиакомпанией от продажи билетов на один рейс, если известно, что остались нераспроданными a билетов бизнес-класса и b билетов эконом-класса.

Первый этап

Исходные данные:

(40-а) — количество проданных авиабилетов бизнес-класса по цене х рублей за билет;
(120-b) — количество проданных авиабилетов эконом-класса по цене х/2 рублей за билет.

Требуется найти:

S — общую сумму, полученную компанией от продажи билетов за рейс.

Второй этап
Соотношения, связывающие исходные данные и результат:
Для нахождения S можно вычислить значение следующего выражения:
S := (40-а)*x + (120-b)*x/2
Здесь a и b — величины целого типа, s — вещественного типа.

Третий этап
Блок-схема:

Четвертый этап
program z65;
var a, b: integer; S, x: real;
BEGIN

writeln (‘Подсчёт суммы от продажи билетов’);
write (‘Введите количество непроданных билетов бизнес-класса: ‘);
readln (a);
write (‘Введите количество непроданных билетов эконом-класса: ‘);
readln (b);
write (‘Введите стоимость билетов в бизнес-классе: ‘);
readln (x);
S := (40-a)*x + (120-b)*x/2;
writeln (‘Билетов продано на ‘, S , ‘ рублей’);
END.

Пятый этап
Протестируйте программу при следующих исходных данных:

Шестой этап
Выполните расчеты при x=25743, a=12, b=3.
Результат: 2 226 769,5

Предыдущий вопрос

Следующий вопрос