Лучшие помощники
- Megamozg 2205 б
- Matalya1 1800 б
- DevAdmin 1720 б
- arkasha_bortnikov 900 б
- Dwayne_Johnson 870 б
26 декабря 2022 14:49
1067
В аэробусе, вмещающем 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
Остались вопросы?
Еще вопросы по категории Информатика
Хуй...
Найдите все десятичные числа не превосходящие 25 запись которых в двоичной системе счисления оканчивается на 101....
Что такое байт, килобайт, мегабайт и гигабайт? Как они связаны между собой? Сколько байтов составляют 1/2 килобайта? Сколько битов содержится в 1/2...
1. Байт – это: а) Единица количества информации, изображаемая 0 или 1 б) Средство изменить буквы в ОЗУ в) Последовательность из восьми бит г) Комбинац...
Помогите, пожалуйста : Чему равно значение переменной s после выполнения следующего фрагмента программы: s:=0; for i:=0 to 5 do s:=s+1; а)6 б)15...