Подпиши элементы программы. (Перетащи правильные ответы в нужныеячейки.) program treug\(2\); var a, b, c, P: real; procedure s (x\(1\), y\(1\), x\(2\), y\(2\): real; var n: real); begin n: \(=\) sqrt (sqr (x\(2\)\(-\) x\(1\)) \(+\) sqr (y\(2\)\(-\) y\(1\))) end; begin s(\(1\), \(2\), \(1\), \(6\), a); s(\(1\), \(6\), \(5\), \(2\), b); s(\(5\), \(2\), \(1\), \(2\), c); P: \(=\) a \(+\) b \(+\) c; writeln ('Периметр треугольника \(=\) ',P:\(2\):\(2\)) end. Варианты ответов: раздел описания переменных конец программы заголовок программы основная программа описание процедуры очистка экрана координаты тело процедуры
Задание

Подпиши элементы программы.

(Перетащиправильные ответы в нужные ячейки*.)*

| program treug\(2\); | |
| --- | --- |
| var a, b, c, P: real; | |
| procedure s (x\(1\), y\(1\), x\(2\), y\(2\): real; var n: real); | |
| begin
  n: \(=\) sqrt (sqr (x\(2\)\(-\) x\(1\)) \(+\) sqr (y\(2\)\(-\) y\(1\)))
end; | |
| begin
  s(\(1\), \(2\), \(1\), \(6\), a);
  s(\(1\), \(6\), \(5\), \(2\), b);
  s(\(5\), \(2\), \(1\), \(2\), c);
  P: \(=\) a \(+\) b \(+\) c;
  writeln ('Периметр треугольника \(=\) ',P:\(2\):\(2\)) | |
| end. | |
Варианты ответов:

раздел описания переменных

конец программы

заголовок программы

основная программа

описание процедуры

очистка экрана

координаты

тело процедуры