Нужно подробное решение населённые пункты а, в, с, d соединены дорогами. время проезда на автомобиле из города в город по соответствующим дорогам указано в таблице: турист, выезжающий из пункта а, хочет посетить все города за кратчайшее время. укажите соответствующий маршрут. а) abcd б) acbd в) adcb г) abdc

т.к. нам нужен самый кратчайший путь то ответ будет г)ABCD

Объяснение:

по таблице мы выстраиваем схему, по которой ориентируемся и состовляем пути, я отметил на схеме разными цветами пути. Надеюсь

Привет, код ниже, для справки по функциям советую посетить MSDN.
Если остаются вопросы так же есть хороший сайт как METANIT, там ты можешь найти простые примеры и простую документацию.
Если хочется проверить работаю кода, то есть прекрасный ресурс как Repl It.
Если есть вопросы, пиши в комментариях. За дополнительной информацией пиши в ЛС.

за отметку "Лучшее решение" и нажатую кнопочку и у меня в профиле.
Так же в моем профиле вы можете найти полезные ссылки на ресурсы описанные выше.

using System;

class MainClass {
  public static int (int[] array)
  {
    int result = 1;
   
    foreach (int element in array)
    {
      if (0 > element)
      {
        result *= element;
      }
    }
   
    return result;
  }

  static void Main()
  {
    Console.WriteLine("Please, enter length of array: ");
    int sizeOfArray = Convert.ToInt32(Console.ReadLine());
   
    int[] array = new int[sizeOfArray];
   
    for (int i = 0; i < sizeOfArray; ++i)
    {
      Console.WriteLine("Please, enter array entry: ");
      array[i] = Convert.ToInt32(Console.ReadLine());
    }
   
    int productOfNegativeNumbers = (array);
    Console.WriteLine("Product of negative numbers is: {0}", productOfNegativeNumbers);
  }
}

В Visual Basic на форме нужно создать текстовое поле Label1
со свойством WordWrap = True, то есть многострочное поле,
размер нужно задать, чтобы поместилась вся матрица.
Sub Matrix
Dim F() As Integer ' Объявляем динамический массив
Dim m As Integer, i As Integer, k As Integer, t As String ' И переменные
m = InputBox ("Vvedite razmer matrix") ' Задаем размер массива
ReDim F(m, m) ' Определяем размер массива
For i = 1 To m    ' Ввод данных
     For k = 1 To m
         t = "Vvedite element Matrix" & Str(i) & "," & Str(k)
         F(i, k) = InputBox (t)
     Next k
Next i
For i = 1 To m
     F(i, i) = 0 ' Обнуляем элементы главной диагонали.
Next i
For i = 1 To m
     For k = 1 To m  ' Вывод строки данных через табуляцию
         Label1.Caption = Label1.Caption & F(i, k) & Chr(9)
     Next k
     Label1.Caption = Label1.Caption & vbCrLf ' Переход на следующую строку
Next i
End Sub