Лучшие помощники
- Megamozg 2200 б
- Matalya1 1800 б
- DevAdmin 1700 б
- arkasha_bortnikov 890 б
- Dwayne_Johnson 860 б
26 декабря 2022 14:49
895
В аэробусе, вмещающем 160 пассажиров, три четверти мест находятся в салонах экономического класса и одна четверть мест - в салоне бизнес-класса. Стоимость билета в салоне бизнес класса составляет х рублей, что в два раза выше стоимости билета в салонах экономического класса. Разработайте программу, которая вычислит сумму денег, полученную авиакомпанией от продажи билетов на этот рейс, если известно, что остались нераспроданными а билетов бизнес-класса и b билетов экономического класса.Выделите все этапы решения этой задачи и опишите свои действия на каждом из них.
1
ответ
Var
a, b: integer;
x: real;
begin
readln(a, b, x);
writeln('Сумма = ', (160 / 4 - a) * x + (3 * 160 / 4 - b) * x / 2);
end.
1 этап - проектирование, составление формулы
2 этап - внедрить формулу в программу
3 этап - оптимизация и защита от дурака (не реализован, так как в школьных заданиях это не требуется)
a, b: integer;
x: real;
begin
readln(a, b, x);
writeln('Сумма = ', (160 / 4 - a) * x + (3 * 160 / 4 - b) * x / 2);
end.
1 этап - проектирование, составление формулы
2 этап - внедрить формулу в программу
3 этап - оптимизация и защита от дурака (не реализован, так как в школьных заданиях это не требуется)
0
·
Хороший ответ
28 декабря 2022 14:49
Остались вопросы?
Еще вопросы по категории Информатика
Дан фрагмент программы: А: =10; В: =30; С: =20; Y:=A; if B>Y then Y:=B; if C>Y then Y:=C; writeln (Y); Какое число будет напечатано на экр...
Что такое служебные слова? Виды служебных слов? Пожалуйста помогите!...
Определите значение переменной s после выполнения этой программы: s = "ПРИНЦЕССА" a="ОСЕНЬ" b="ШАХТЕР" s = s[0:3] + a[3] + b[-3:]...
A = math.pow(4,2) - Ответ ...
Тест «создание web – сайта» 9 класс. 1) бесплатный хостинг подходит для … 1. огромных общественных веб-сайтов. 2. больших интернет-магазинов. 3. не...
Все предметы