Задача 1. В диапазоне ЭТ расположить целочисленную матрицу М(3,4) – осуществить ввод данных в диапазон. Необходимо транспонировать исходную матрицу (заменить строки столбцами). Результирующую матрицу расположить рядом с исходной матрицей. Задача 2. В диапазоне ЭТ расположить целочисленную матрицу М(3,4) – осуществить ввод данных в диапазон. Вычислить для каждого столбца значение разности между наибольшим и наименьшим элементами столбца матрицы. Результаты расположить в строке, под матрицей.

Нужен код в VBA на решение двух задач

Объяснение:

Мы находим функции прямых, ограничивающих область (по точкам).

Эти прямые дают координаты Y точки по её координате X.

Если некая y = f(x) в точке X0 принимает Y0 и это соответствует введенным значениям, то введенная точка лежит на прямой.

Но нам интересны значения в области. Если введенное значение Y больше рассчитанного Y0, то (X; Y) находится выше прямой y = f(x).

Если же меньше рассчитанного, то ниже.

Смотря на рисунок мы определяем, какие прямые у нас имеются, и где должна быть точка, чтобы находиться внутри области: выше или ниже прямых, ограничивающих область (для каждой прямой).

Потом переносим это в виде условия.

Пример на Python:

def get_line_by_two_points(x0: float, y0: float, x1: float, y1: float):

   def line_y(x: float):

       return (x - x0)/(x1 - x0) * (y1 - y0) + y0

   return line_y

l1 = get_line_by_two_points(-3, 7, -6, 1)  # Левая наклонная

l2 = get_line_by_two_points(7, 1, 4, 7)  # Правая наклонная

x_value = int(input("Enter an X value: "))

y_value = int(input("Enter a Y value: "))

if 1 < y_value < 7 and y_value < l1(x_value) and y_value < l2(x_value):

   print("Point is in the space!")

else:

   print("Point is NOT in the space!")

В коде определено 2 метода:

CountWords(string) - для подсчета количества слов в строкеCheckString(string) - обёртка над CountWords для передачи аргумента и результата на стандартный вывод

Скриншоты кода и возможного вывода во вложениях.

====================================

Ваши оценки и отзывы лучше оценить качество ответа.

Если ответ удовлетворил, не забудь отметить его как "Лучший".

Успехов в учёбе!

====================================

Код:

using System;

using System.Linq;

namespace WordsCounter

{

   class Program

   {

       static void Main(string[] args)

       {

           CheckString("Раз два три!");

       }

       public static void CheckString(string line)

       {

           Console.WriteLine($"{CountWords(line)}: {line}");

       }

       public static int CountWords(string line)

       {

           var words = line.Split(" ").ToList();

           return words.Count;

       }

   }

}