Программирование циклических алгоритмов. Программирование циклов с заданным числом повторений. Различные варианты программирования циклического алгоритма.

Вот сам тест: https://videouroki.net/tests/do/35559440-7510-4475-803b-1e427b511e16

140

302

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

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

rhoyel0

Информатика

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

Ответ 1.2 (squarepentagon) // // написал gonansoft // function lengthline(xb, yb, xe, ye: double): double; var dx,dy : double; begin // теорема пифагора dx : = xb-xe; dy : = yb-ye; result : = sqrt( dx*dx + dy*dy ); end; function areatriangle(d1, d2, d3: double): double; var p : double; begin // формула герона p : = (d1+d2+d3)/2; result : = sqrt( p*(p-d1)*(p-d2)*(p-d3) ); end; procedure squarepentagon; var x1,x2,x3,x4,x5 : double; y1,y2,y3,y4,y5 : double; //площадь пятиугольника sp1 : double; // способ первый sp2 : double; //способ второй //длины всех линий между вершинами пятиугольника d12,d23,d34,d45,d51 : double; d13,d14,d24,d25,d35 : double; //площади всех треугольников s123,s234,s345,s451,s512 : double; s134,s245,s351,s412,s523 : double; begin // задаем координаты пятиугольника x1: =1; y1: =3; x2: =3; y2: =4; x3: =5; y3: =3; x4: =4; y4: =1; x5: =2; y5: =1; //площадь пятиугольника без самопересечений, заданного координатами вершин, определяется по общей для многоугольников формуле sp1 : = 0.5*( (x1+x2)*(y1-y2) + (x2+x3)*(y2-y3) + (x3+x4)*(y3-y4) + (x4+x5)*(y4-y5) + (x5+x1)*(y5-y1) ); //находим все длины между вершинами d12 : = lengthline(x1,y1,x2,y2); d23 : = lengthline(x2,y2,x3,y3); d34 : = lengthline(x3,y3,x4,y4); d45 : = lengthline(x4,y4,x5,y5); d51 : = lengthline(x5,y5,x1,y1); d13 : = lengthline(x1,y1,x3,y3); d14 : = lengthline(x1,y1,x4,y4); d24 : = lengthline(x2,y2,x4,y4); d25 : = lengthline(x2,y2,x5,y5); d35 : = lengthline(x3,y3,x5,y5); //находим площади всех треугольников в пятиугольнике s123 : = areatriangle(d12,d23,d13); s234 : = areatriangle(d23,d34,d24); s345 : = areatriangle(d34,d45,d35); s451 : = areatriangle(d45,d51,d14); s512 : = areatriangle(d51,d12,d25); s134 : = areatriangle(d13,d34,d14); s245 : = areatriangle(d24,d45,d25); s351 : = areatriangle(d35,d51,d13); s412 : = areatriangle(d14,d12,d24); s523 : = areatriangle(d25,d23,d35); //площадь пятиугольника теперь можем найти по другому, например по сумме треугольников sp2 : = s123 + s134 + s451; //площади треугольников можно брать любые, главное они не должны пересекаться между собойend;

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

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

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

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

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

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

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

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

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

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