Подпиши элементы программы.
(Перетащиправильные ответы в нужные окошки*.)*
| 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. | конец программы |
Варианты ответов:
раздел описания переменных
основная программа
конец программы
вызов модуля
тело процедуры
описание процедуры
заголовок программы
описание меток