1. Главная
  2. Библиотека
  3. Информатика
  4. Напишите текст программы Pascal для расчёта периметра треугольника. Координаты вершин треугольника (x1,y1) (x2,y2) (x3,y3)...

Напишите текст программы Pascal для расчёта периметра треугольника. Координаты вершин треугольника (x1,y1) (x2,y2) (x3,y3) вводятся с клавиатуры.

«Напишите текст программы Pascal для расчёта периметра треугольника. Координаты вершин треугольника (x1,y1) (x2,y2) (x3,y3) вводятся с клавиатуры.»
  • Информатика

Условие:

Напишите текст программы Pascal для расчёта периметра треугольника. Координаты вершин треугольника (x1,y1) (x2,y2) (x3,y3) вводятся с клавиатуры. 

Решение:

Текст программы

var x1, y1, x2, y2, x3, y3, P : real;

function d(x1, y1, x2, y2 : real) : real;
begin
d:= sqrt(sqr(x1-x2) + sqr(y1-y2));
end;

begin writeln('Введи...

Не нашел нужную задачу?

Воспользуйся поиском

Выбери предмет