93

На координатной плоскости своими действительными координатами

zidky 10 апреля 2023

На координатной плоскости своими действительными координатами (x1, y1) , (x2, y2) , (x3, y3) , (x4, y4) задан выпуклый четырехугольник. Проверить, является лион параллелограммом, если ДА – вычислите выражение | (a+b) 2+| с точностью до сотых, где а и b смежные стороны параллелограмма.

категория: информатика

81

Type Point=record x: integer; y: integer; end; var p1, p2, p3, p4: Point; function length (p1, p2: Point): real; begin length: =sqrt (sqr (p1.x — p2.x)+sqr (p1.y — p2.y); end; Begin readln (p1.x, p1.y); readln (p2.x, p2.y); readln (p3.x, p3.y); readln (p4.x, p4.y); if (length (p1, p2)=length (p3, p4) and (length (p3, p2)=length (p1, p4) then writeln ('P=', abs (2*(length (p1, p2)+length (p3, p2) else writeln ('No'); End.

пользователи выбрали этот ответ лучшим

Знаете другой ответ?
Другие вопросы по информатике
10 апреля 2023
В ответе укажите одно слово./Восьмиклассник Денис Кораблев очень увлекся компьютерными науками. Он даже начал переписываться со своими друзьями из разных стран, с которыми познакомился в летнем языковом лагере, на разные компьютерные темы. В один день он решил написать письма сразу всем ребятам. Но он случайно перепутал письма и вот, что из этого получилось: англичанин Гарри, увлекавшийся компьютерной безопасностью, получил письмо на шведском языке о спортивном программировании. Испанцу Антонио, интересовавшемуся компьютерным дизайном, пришла заметка о компьютерных соревнованиях. Греку Константиносу, увлекавшемуся компьютерными соревнованиями, пришла статья о компьютерной безопасности. Итальянцу Ромео, который был искренне увлечен самообучающимися алгоритмами, пришло письмо о компьютерных играх. Латышу Ивару, увлеченному играми, пришло письмо о самообучающихся алгоритмах. А что компьютерное было темой письма, пришедшего Шведу Яну, интересовавшемуся программированием?

ПОПУЛЯРНОЕ
german192, 10 апреля 2023
Дано трехзначное число
Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...