Написать программу на pascal для вычисления периметра шестиугольника по заданным координатам его вершин, используя процедуру для нахождения расстояние между двумя точками
Int num = 0; Console.WriteLine("Введите элементы массива через пробел:"); String[] array = Console.ReadLine().Replace(" "," ").Split(); Int32[] numbers = new Int32[array.Length]; Console.Write("Массив: ["); for (int i = 0; i < numbers.Length; i++) { Console.Write(array[i]); if(i!=numbers.Length-1) Console.Write(", "); numbers[i] = Int32.Parse(array[i]); if (num == 0) num = numbers[i]; } Console.Write("]\n"); if (num > 0) Console.WriteLine("Максимальное число в квадрате: {0}",Math.Pow(numbers.Max(), 2)); else Console.WriteLine("Минимальное число в квадрате: {0}",Math.Pow(numbers.Min(), 2)); Console.WriteLine("\nНажмите любую клавишу чтобы выйти..."); Console.ReadKey();
{
if (tnum < tden)
{
temp = tnum;
tnum = tden;
tden = temp;
}
tnum = tnum - tden;
}
gcd = tden; //вычисляем наибольший общий делитель
numerator = numerator / gcd; //делим числитель и знаменатель на
НОД, получаем сокращенную дробь
denominator = denominator / gcd;
Console.WriteLine("Введите элементы массива через пробел:");
String[] array = Console.ReadLine().Replace(" "," ").Split();
Int32[] numbers = new Int32[array.Length];
Console.Write("Массив: [");
for (int i = 0; i < numbers.Length; i++)
{
Console.Write(array[i]);
if(i!=numbers.Length-1)
Console.Write(", ");
numbers[i] = Int32.Parse(array[i]);
if (num == 0)
num = numbers[i];
}
Console.Write("]\n");
if (num > 0)
Console.WriteLine("Максимальное число в квадрате: {0}",Math.Pow(numbers.Max(), 2));
else
Console.WriteLine("Минимальное число в квадрате: {0}",Math.Pow(numbers.Min(), 2));
Console.WriteLine("\nНажмите любую клавишу чтобы выйти..."); Console.ReadKey();