Лучшие помощники
- Megamozg 2205 б
- Matalya1 1800 б
- DevAdmin 1720 б
- arkasha_bortnikov 900 б
- Dwayne_Johnson 870 б
26 декабря 2022 14:49
1360
В аэробусе, вмещающем 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 до 10. Какова вероятность того, что квадрат этого числа больше 25? Меньше 10? Равен 49? Нужны решения! не только...
Решите кроссворд.Какое слово получилось по вертикали?1)Кодовый набор чисел для защиты информации. 2)"Мозг" компьютера.3)Обеспечивает доступ в Интернет...
Написать программу(Pascal), которая отыскивает все числа N, N<1000, которые яв- ляются квадратами-палиндромами. (Пример: 11^2=121,262^2=69696)....