с задаче Двум классам поручено убрать поле площадью S гектаров. В каждом количество учеников N1, N2, соответственно. Составь программу, определяющую, какую площадь нужно убрать каждому классам. Зделать в Паскале

253

270

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

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

Victor789

Информатика

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

Будет работать только в pascal.abc. желательно вводите величины от 30-50, так как всё измеряется в пикселях. program zagacha; uses graphabc; var r, a, b: integer; begin writeln('введите значение r'); readln(r); writeln('введите значение a'); readln(a); writeln('введите значение b'); readln(b); if ((r + a + b) < 30) or ((r + a + b) > 200) then begin r : = 50; a : = 100; b : = 100; end; drawcircle(round(window.width / 2), round(window.height / 2), r); drawrectangle(round((window.width - a) / 2), round((window.height - b) / 2), round((window.width + a) / 2) + 1, round((window.height + b) / 2) + 1); if (a = b) and (a * b = 4 * r * r) then textout(round(window.width / 2 - 50), 10, 'окружность вписана') else if (a = b) and (a * b = 2 * r * r) then textout(round(window.width / 2 - 50), 10, 'окружность описана') else textout(round(window.width / 2 - 50), 10, 'окружность посторонняя') end.

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

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

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

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

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

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

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

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

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

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