Ответ:
Объяснение:
static void Main(string[] args)
{
double a, b, c, d, sum;
double sum1;
Console.WriteLine("Введите a");
a = Convert.ToDouble(Console.ReadLine());
Console.WriteLine("Введите b");
b = Convert.ToDouble(Console.ReadLine());
Console.WriteLine("Введите c");
c = Convert.ToDouble(Console.ReadLine());
Console.WriteLine("Введите d");
d = Convert.ToDouble(Console.ReadLine());
sum = Math.Sqrt(Math.Pow(a - b, 2));
sum1= Math.Sqrt(Math.Pow(c - d, 2));
Console.WriteLine("расстояние между точками а и в=" + " " + sum);
Console.WriteLine("расстояние между точками c и d=" + " " + sum1);
Console.ReadKey();
}
}
}
<em>// PascalABC.NET 3.2, сборка 1345 от 24.11.2016</em>
<em>// Внимание! Если программа не работает, обновите её версию!</em>
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.
<u>Пример</u>
Введите координаты четырех точек (парами х,y)
-5 -4.7 -3.2 6.7 5.1 8 7.4 -6.13
P=46.7405707422041
Во вложениях приведено решение этой же задачи в онлайн-калькуляторе. Ответ совпадает.
<u>PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018</u>
<u>Внимание! Если программа не работает, обновите версию!</u>
begin
var x:=ReadReal; var y:=x*x+11; Writeln(y)
end.
Пример таблицы (с 5 товарами) - в прилагаемом файле.
Обработка информации - это получение одних информационных объектов из других информационных объектов путём выполнения некоторых алгоритмов.
Кодирование информации - это процесс преобразования данных из формы, удобной для использования, в форму, удобную для передачи, хранения, автоматической переработки и сохранения от несанкционированного доступа(тоесть доступ к запрещенным материалам и тд)