УМОЛЯЮ НУЖНО ОЧЕНЬ В ИНФЕ ВООБЩЕ НЕ ШАРЮ ЕСЛИ НЕ СЛОЖНО, ТО С ОБЪЯСНЕНИЕМ. В аэробусе вмещающем 160 пассажиров три четверти мест находятся в салонах экономического класса и одна четверти мест в салоне бизнес-класса стоимость билета в салоне бизнес-класса составляет х руб что в 2 раза выше стоимость билета в салонах экономического класса. Разраьотайте программу, которая вычислит сумму денег, полученную авиакомпанией от продажи билетов на этот рейс, если известно, что остались нераспроданными а билетов бизнес-класса и b билетов экономического класса. Выделите все этапы решения этой задачи и опишите свои действия на каждом из них.
Этапы:
1 этап:
Подстановка задачи, осознание её условия.
2 этап:
Описательная информационная модель формализируется записывается с некоторого формального языка.
3 этап:
Построение алгоритма решения задачи в виде блок-схемы
4 этап:
Записать данный алгоритм на языке программирования Pascal
5 этап:
Протестировать составленную программу. ​

картинка это 3 этап

1-й этап

Дано:

(40 − а) — количество проданных авиабилетов бизнес-класса по цене хрублей за билет;

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

Найти:

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

2-й этап

Для нахождения s можно вычислить значение следующего выражения:

(40 − а) * х + (120 − b) * х/2.

Здесь а и b — целые величины, s — величина вещественного типа.

3-й этап

1-й этап

Дано:

(40 − а) — количество проданных авиабилетов бизнес-класса по цене хрублей за билет;

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

Найти:

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

3-й этап

4-й этап

program n_13_63;

var a, b: integer; s, x: real;

begin

writeln (‘Подсчет суммы от продажи билетов’);

writeln (‘Количество а непроданных билетов бизнес-класса’);

readln (a);

writeln (‘Количество b непроданных билетов экономического класса’);

readln (b);

writeln (‘Стоимость билетов бизнес-класса х‘);

readln (x);

s:=(40−a)*x+(120−b)*x/2;

writeln (‘Билетов продано на ‘, s,’ руб.’)

end.

5-й этап

Протестировать программу можно по следующим данным:

а = 39,

b = 119,

х = 2000,

s = 3000.