"составить программу для вычесления сторон прямоугольника если известны его периметр и площадь. (в паскале)" заранее . с:

103

400

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

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

хики2

Информатика

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

Прежде чем писать программу, попробуем ее формализовать. мы знаем, что периметр прямоугольника равен р = 2*(a+b), а площадь равна s=a*б, где a и b - две стороны прямоугольника. тогда b =s/a, а периметр p =2a +2b или 2a+2s/a. отсюда a*p = 2a² +2s. имеем квадратное уравнение: a²-a*p/2+s=0, решая которое относительно а (сторона прямоугольника) при известных коэффициентах p и s, получим значение сторон прямоугольника. в программе я не проверяю, что введены именно положительные периметр и площадь, надеясь на внимательность вводящего данные. итак: program storona; uses crt; { используем экран} var b,p,s,d,x1,x2: real; {наши переменные} begin clrscr; {чистим экран} write('wwedite perimetr p: '); readln(p); write('wwedite ploshad s: '); readln(s); {вычисляем дискриминант} b: =-p/2; d: = b*b - 4*s; if d > 0 then {если дискриминант > 0 - все хорошо} begin x1: = (-b + sqrt(d))/2; x2: = (-b - sqrt(d))/2; writeln('storona1 = ',x1: 0: 2); {ответ с двумя знаками после запятой} writeln('storona2 = ',x2: 0: 2); end; {если дискриминант равен 0, то тоже неплохо: у нас квадрат} if d = 0 then begin x1: = -(b/2); writeln('storona1 = ',x1: 0: 2); writeln('storona2 = ',x1: 0: 2); end; {если дискриминант меньше 0, плохо, выводим сообщение} if d < 0 then begin writeln('ошибка в данных); end; readln; end.

degorov152

Информатика

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

Ну лтвдчтвлстслстаьатлаьастсмотстстаоаоаоаалплплпплрлтаоаоалпаталслаьсаьалталатала

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

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

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

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

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

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

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

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

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

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