решить. 1. Минимальный объем информации это: А) Байт - вопрос №132728931 от Егор111ив 09.02.2022 14:22

Question

Информатика: решить. 1. Минимальный объем информации это: А) Байт Б) Бит В) Бод Г) Буква 2. Операционные системы относятся к (…) классу программного обеспечения: А) Прикладному Б) Обязательному В) Системному Г) Служебному 3. В состав стандартного пакета программ для офиса не входит: А) Браузер Б) Текстовый процессор В) Пасьянс Г) Электронный органайзер 4. Системы создания презентаций изначально служили в качестве… А) Средства создания иллюстрационного материала для публичных выступлений и докладов Б) Средства

Егор111ив · Answer

// PascalABC.NET 3.2, сборка 1345 от 24.11.2016
// Внимание! Если программа не работает, обновите её версию!

function Len(ax,ay,bx,by:real):=sqrt(sqr(bx-ax)+sqr(by-ay));

var
x,y,L:array[1..4] of real;
begin
Writeln('Введите координаты четырех точек (парами х,y)');
for var i:=1 to 4 do Read(x[i],y[i]);
for var i:=1 to 3 do
L[i]:=Len(x[i],y[i],x[i+1],y[i+1]);
L[4]:=Len(x[4],y[4],x[1],y[1]);
var s:=0.0;
for var i:=1 to 4 do s+=L[i];
Writeln('P=',s)
end.

Пример
Введите координаты четырех точек (парами х,y)
-5 -4.7 -3.2 6.7 5.1 8 7.4 -6.13
P=46.7405707422041

Во вложениях приведено решение этой же задачи в онлайн-калькуляторе. ответ совпадает.

Информатика. паскаль. по заданным декартовым координатам вершин четырехугольника p1(x1,y1),p2(x2,y2)

Информатика. паскаль. по заданным декартовым координатам вершин четырехугольника p1(x1,y1),p2(x2,y2)