В авиалайнере, вмещающем 160 пассажиров, три четверти мест находятся в салонах
В аэробусе, вмещающем 160 пассажиров, три четверти мест находятся в салонах экономического класса и одна четверть мест - в салоне бизнес-класса.
Цена билета в салоне бизнес класса сочиняет х рублей, что в два раза выше цены билета в салонах экономического класса.
Разработайте программу, которая вычислит сумму денег, полученную авиакомпанией от продажи билетов на этот рейс, если известно, что остались нераспроданными а билетов бизнес-класса и b билетов экономического класса.
Выделите все этапы решения этой задачи и опишите свои действия на каждом из их.
ПОМОГИТЕ СОСТАВИТЬ БЛОК-СХЕМУ, ПОЖАЛУЙСТА
1 ответ
Вован Калданов
Var
o,em,bm:real;
x,x2:real;
a,b:real;
begin
o:=160;
bm:=40;
em:=120;
writeln('Введите стоимость бизнес класса ');
readln(x);
x2:=(x/2);//стоимость эконом класса
writeln('Непроданные бизнес класса =');
readln(a);
writeln('Непроданные эконом класса =');
readln(b);
bm:=bm*x;
em:=em*x2;
bm:=bm-a*x;
em:=em-b*x2;
o:=bm+em;
writeln ('Прибыль = ',o);
end.
o,em,bm:real;
x,x2:real;
a,b:real;
begin
o:=160;
bm:=40;
em:=120;
writeln('Введите стоимость бизнес класса ');
readln(x);
x2:=(x/2);//стоимость эконом класса
writeln('Непроданные бизнес класса =');
readln(a);
writeln('Непроданные эконом класса =');
readln(b);
bm:=bm*x;
em:=em*x2;
bm:=bm-a*x;
em:=em-b*x2;
o:=bm+em;
writeln ('Прибыль = ',o);
end.
, оставишь ответ?
Похожие вопросы
-
Вопросы ответы
Новое
NEW
Статьи
Информатика
Статьи
Последние вопросы
задание экономиоти
Рассмотри ситуацию: человек живёт на Крайнем Се-вере. С помощью каких
Экономика.
Человек живет на Крайнем Севере. С помощью каких благ удовлетворяются потребности
Экономика.
там лежат три яйца.у дома рос клен.Это гнездо сойки.на клёне гнездо
Русский язык.
Тыныштық күйіндегі карусель 35 с-та 3,0 рад/с бұрыштық жылдамдықпен үдей қозғалады.
Разные вопросы.
Сочинение на тему "Русский язык не сможет умереть!"
Математика.
Приветствую!
Меня зовут Станислав, я представляю компанию under.site.
Хотел бы предложить интересное решение
Разные вопросы.
Масса трёх одинаковых пакетов чая 180г чему равна масса
Математика.
Газообразный аммиак объёмом 2.24 л (н.у.) был полностью поглощён 14.68 мл
Химия.
Упражнение 2 Выпишите глаголы и вставьте пропущенные буквы
Русский язык.
Радиус окружности, описанной около равностороннего треугольника, равен 6. Найдите сторону треугольника
Геометрия.
Облако тегов