В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Nastia2k
Nastia2k
22.01.2022 16:34 •  Информатика

Визнач порядок команд в алгоритмі створення векторного зображення..
До ть будьласка

Показать ответ
Ответ:
полина2059
полина2059
30.04.2022 06:54
Function leng(var x,y,x1,y1: real): real;
begin
  leng:=sqrt(sqr(x-x1)+sqr(y-y1));
end;

// основная программа
var x1,y1,x2,y2,x3,y3,p: real;
begin
  write('координаты вершин  x1 y1 x2 y2 x3 y3 через пробел:  ');
  readln(x1,y1,x2,y2,x3,y3);
  if (leng(x2,y2,x1,y1) + leng(x3,y3,x2,y2) = leng(x3,y3,x1,y1)) or
     (leng(x2,y2,x1,y1) + leng(x3,y3,x1,y1) = leng(x3,y3,x2,y2)) or
     (leng(x3,y3,x2,y2) + leng(x3,y3,x1,y1) = leng(x2,y2,x1,y1)) then
  writeln('точки лежат на одной прямой')
  else 
  begin
    p:=leng(x2,y2,x1,y1)+leng(x3,y3,x2,y2)+leng(x3,y3,x1,y1);
    writeln('периметр: ',p:7:3);
  end;
end.

координаты вершин  x1 y1 x2 y2 x3 y3 через пробел:  3 4 7 2 6 5
периметр:  10.797

координаты вершин  x1 y1 x2 y2 x3 y3 через пробел:  1 2 3 4 5 6
точки лежат на одной прямой
0,0(0 оценок)
Ответ:
топфифа2
топфифа2
28.04.2021 05:05
 1 Скорее всего это кедр атласский с плакучей кроной "искусственно выведенная форма плакучего кедра атласского. Имеются несколько экземпляров этого редкого дерева, и все они выращены в Никитском ботаническом сад
2машин марки "Тойота".--В данной же книге события происходят в 1979г, нашему герою уже 46 лет, он по-прежнему со своей женой Дженис. И, неожиданно для себя, Кролик разбогател, за счет того, что умер его тесть и его жена стала наследницей салона по продаже машин марки "Тойота".
4Русский вариант имени Диего - Яков5ЛАМАНТИН! И он является родственником слона(как это ни странно)6
ДИСКО
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота