Pascal abc пишет, что ошибка в 16 и 19 строке: 1. program qq; 2. var x, y, z, c, a, b: real; 3. begin 4. writeln('введите стоимость билета бизнесс-класса: '); 5.readln(x); 6. if x > 0 then 7. begin 8. y: = x / 2; 9. writeln('введите количество оставшихся билетов бизнесс-класса, затем введите количество оставшихся билетов эконом-класса'); 10. readln(a, b); 11. if a > =0 and b > = 0 then 12. begin 13. c: = ax + yb; 14. z: = (120y + 40x) - c ; 15. writeln('доход авиакомпании: ', z); 16. else 17. writeln('решение невозможно'); 18. end 19. else 20. writeln('решение невозможно'); 21. end 22. end.

257

334

Посмотреть ответы 2

Ответы на вопрос:

aleksandrdream4

Информатика

4,4(4 оценок)

Program qq; var x, y, z, c, a, b: real; begin writeln('введите стоимость билета бизнесс-класса: '); readln(x); if x > 0 then begin y: = x / 2; writeln('введите количество оставшихся билетов бизнесс-класса, затем введите количество оставшихся билетов эконом-класса'); readln(a, b); if (a > =0) and (b > = 0) then begin c: = a*x + y*b; z: = (120*y + 40*x) - c ; writeln('доход авиакомпании: ', z); end else writeln('решение невозможно'); end; end.вот так всё работает. 1. не там поставили end; 2. лишнее else writeln('решение невозможно'); 3. у меня ругался паскаль на то что в условия при and не взяты в круглые скобки. if (a > =0) and (b > = 0) then

SnegRainbow

Информатика

4,5(12 оценок)

^пи 2 * с/п < -> x^2 пи * с/п

Реши свою проблему, спроси otvet5GPT

Быстро
Мгновенный ответ на твой вопрос
Точно
Бот обладает знаниями во всех сферах
Бесплатно
Задай вопрос и получи ответ бесплатно

Задай свой вопрос

Популярно: Информатика

Есть вопросы?

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.