111 - Н
110 - Е
01 - Т
10 - О
111|110|01|10=НЕТО
Ответ: НЕТО
Var
x1, x2, x3, x4, y1, y2, y3, y4: real;
function VectorLength(x1, y1, x2, y2: real): real;
begin
VectorLength := sqrt(sqr(x1 - x2) + sqr(y1 - y2));
end;
function VectorSlope(x1, y1, x2, y2: real): real;
begin
VectorSlope := (y1 - y2) / (x1 - x2);
end;
begin
readln(x1, y1);
readln(x2, y2);
readln(x3, y3);
readln(x4, y4);
if (VectorLength(x1, y1, x2, y2) = VectorLength(x4, y4, x3, y3))
and (VectorSlope(x1, y1, x2, y2) = VectorSlope(x4, y4, x3, y3)) then
writeln('Yes')
else writeln('No');
end.
Программа.................................................
Ответ:
Array.Sort(твоймассив);
Объяснение:
Весь код:
using System;
namespace MASSIV4IK
{
class Program
{
static void Main(string[] args)
{
int[] NUM = {25, 24, 23, 22, 21, 20, 19, 18, 17, 16, 15, 14, 13, 12, 11, 10, 9, 8, 7, 6, 5, 4, 3, 2, 1, Convert.ToInt32(Console.ReadLine()) };
Array.Sort(NUM);
Array.Reverse(NUM);
for (int i = 0; i < NUM.Length; i++)
{
Console.WriteLine(NUM[i]);
}
Console.ReadKey();
}
}
}