Лучшие помощники
- Megamozg 2205 б
- Matalya1 1800 б
- DevAdmin 1720 б
- arkasha_bortnikov 900 б
- Dwayne_Johnson 870 б
26 декабря 2022 14:49
1328
В аэробусе, вмещающем 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
Остались вопросы?
Еще вопросы по категории Информатика
Боря, Витя. Гриша и Егор встретились на Всеросийской олимпиаде по информатикею Ребята приехали из разных городов: Москвы, Омска, Санкт-Петербурга и Кр...
Пусть / – целочисленное деление. Тело функции F(n) задано следующими строчками и условиями: F(1) = 1 F(n) = (n / 2) · F(n - 1) - 1, при n >...
Между формальными и фактическими параметрами следует соблюдать соответствие а) по типу параметров б) по количеству параметров в) по порядку следован...
begin if (y <200) and (x > 100) then writeln('ДА') else writeln('НЕТ') end. Было проведено 10 запусков этой программы, при которых в качестве з...
Решите задачу!!!!!!!!!!!!! Некое растровое изображение было сохранено в файле р1.bmp как 24-разрядный рисунок. Во сколько раз будет меньше информацион...