На карту нанесены 4 города A B C и D известно, что:
между городами A и C - две дороги.
между городами А и В - две дороги
между городами C и D - три дороги
между городами B и D - четыре дороги.
По каждой из этих дорог можно ехать в обе стороны. Сколькими различными можно проехать из А в D, посещая каждый город не более одного раза
// Внимание! Если программа не работает, обновите версию!
begin
var m:=ReadInteger('Количество строк в массиве:');
var n:=ReadInteger('Количество столбцов в массиве:');
Writeln('*** Исходный массив A[',m,',',n,'] ***');
var a:=MatrRandom(m,n,-50,50);
a.Println(4);
for var i:=0 to m-1 do a[i,2]:=-7;
Writeln(4*a.ColCount*'-');
a.Println(4)
end.
Пример
Количество строк в массиве: 6
Количество столбцов в массиве: 9
*** Исходный массив A[6,9] ***
-14 34 -25 27 -48 -15 50 26 -16
8 -15 -49 -50 -44 -44 47 32 35
-32 13 19 -16 -25 41 10 39 49
-11 -35 -39 -16 26 -19 47 -11 14
-22 42 -5 -39 28 -42 9 -41 18
0 -22 -25 -15 -11 7 31 38 33
-14 34 -7 27 -48 -15 50 26 -16
8 -15 -7 -50 -44 -44 47 32 35
-32 13 -7 -16 -25 41 10 39 49
-11 -35 -7 -16 26 -19 47 -11 14
-22 42 -7 -39 28 -42 9 -41 18
0 -22 -7 -15 -11 7 31 38 33
Код программы прикреплен в файле.
В коде присутствуют три функции:
getLengthBeweenPoints - расчет расстояния между двумя точками на плоскости по формулеgetAreaOfTriangle - расчет площади треугольника по трем сторонамmain - ввод координат двух координат для каждой из вершин треугольника и вывод на экран расчитаной площади треугольниказа отметку "лучший ответ" и нажатую кнопочку " ":
На этом ответеВ моем аккаунтеP.S.
К сожалению сайт не позволяет загружать текстовые форматы (знаю, это тупо), по этому файл называется 'main.c.pdf', просто переименуйте его и уберите из названия '.pdf', должно получиться 'main.c', далее можете открыть любым текстовым редактором либо скомпилировать в бинарник за комментарий: на Паскале НЕ надо! Прям от души, просто надоели люди знающие только паскаль и пишущие исключительно на нем ответы, хотя людям такое и не надо...На всякий случай в коментариях продублирую код.