Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.75/8: Рейтинг темы: голосов - 8, средняя оценка - 4.75
0 / 0 / 0
Регистрация: 01.03.2014
Сообщений: 16

Создать матрицу заданного графа

05.10.2014, 23:32. Показов 1524. Ответов 2

Студворк — интернет-сервис помощи студентам
пользователь вводит количество ребер, вершин графа, а программа должна создать матрицу этого графа
0
Лучшие ответы (1)
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
05.10.2014, 23:32
Ответы с готовыми решениями:

Ввести число а, и создать третью матрицу, которая будет содержать в себе все значения, меньше заданного
uses crt; const n=5 ; m=5; var arr1,arr2:array of integer; arr3,arr4:array of integer; i,j,a:integer; begin randomize;

Разработать программу обхода графа вглубь, поданного матрицу смежности
Разработать программу обхода графа вглубь, поданного матрицу смежности

Графы. Найти все вершины заданного графа, недостижимые от заданной его вершины
Найти все вершины заданного графа, недостижимые от заданной его вершины. Помогите решить пожалуйста!

2
 Аватар для Антон1985
138 / 101 / 102
Регистрация: 03.02.2014
Сообщений: 427
06.10.2014, 15:04
Лучший ответ Сообщение было отмечено Ev1llion как решение

Решение

Обычное заполнение массива. Количество вершин графа - это размер матрицы.

Добавлено через 4 часа 49 минут
Пример,
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
uses
  crt;
const
  max=100;
var
  matrica:array[0..max,0..max]of byte;
  i,j,n,R,V:integer;
begin
  repeat
    write('R,V= '); readln(R,V);
  until (V<max)and(R<V*V);
  for j:=0 to V-1 do
    for i:=0 to V-1 do
      matrica[i,j]:=0;
  for n:=1 to R do
  begin
    writeln('Rebro',n);
    write('îò '); readln(i);
    write('ê  '); readln(j);
    matrica[i,j]:=1;
  end;
  writeln('--- матрица графа ---');
  for j:=0 to V-1 do
  begin
    for i:=0 to V-1 do
      write(matrica[i,j]);
    writeln;
  end;
  writeln('---------------------');
end.
1
0 / 0 / 0
Регистрация: 01.03.2014
Сообщений: 16
06.10.2014, 17:03  [ТС]
большое спасибо
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
06.10.2014, 17:03
Помогаю со студенческими работами здесь

Получить матрицу заданного вида
нужно получить матрицу такого вида: 1 2 3 ......9 10 0 1 2 ......8 9 0 0 1.......7 8 .................... ...

Заполнить матрицу заданного размера M(k,l) числами 1,2,3,4
Заполнить матрицу заданного размера M(k,l) числами 1,2,3,4 так, чтобы по горизонтали, вертикали и диагонали не было одинаковых рядом...

Сформировать верхнетреугольную матрицу заданного вида
Написать программу, формирующую матрицу 5х5 вида: 5 4 3 2 1 0 5 4 3 2 0 0 5 4 3 0 0 0 5 4 0 0 0 0 5

Получить квадратную матрицу заданного вида
Здравствуйте, помогите решить задачку ... никак не получается Есть одномерный масив X, из n элементов. Получить квадратную матрицу вида ...

Получить квадратную матрицу заданного вида
14. Дано действительное число х. Получить квадратную матрицу порядка 10 вида, середина которой заполняется нулями.


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Новые блоги и статьи
Очистка реквизитов документа при копировании
Maks 09.04.2026
Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .
модель ЗдравоСохранения 8. Подготовка к разному выполнению заданий
anaschu 08.04.2026
https:/ / github. com/ shumilovas/ med2. git main ветка * содержимое блока дэлэй из старой модели теперь внутри зайца новой модели 8ATzM_2aurI
Блокировка документа от изменений, если он открыт у другого пользователя
Maks 08.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в конфигурации КА2. Задача: запретить редактирование документа, если он открыт у другого пользователя. / / . . .
Система безопасности+живучести для сервера-слоя интернета (сети). Двойная привязка.
Hrethgir 08.04.2026
Далее были размышления о системе безопасности. Сообщения с наклонным текстом - мои. А как нам будет можно проверить, что ссылка наша, а не подделана хулиганами, которая выбросит на другую ветку и. . .
Модель ЗдрввоСохранения 7: больше работников, больше ресурсов.
anaschu 08.04.2026
работников и заданий может быть сколько угодно, но настроено всё так, что используется пока что только 20% kYBz3eJf3jQ
Дальние перспективы сервера - слоя сети с космологическим дизайном интефейса карты и логики.
Hrethgir 07.04.2026
Дальнейшее ближайшее планирование вывело к размышлениям над дальними перспективами. И вот тут может быть даже будут нужны оценки специалистов, так как в дальних перспективах всё может очень сильно. . .
Горе от ума
kumehtar 07.04.2026
Эта мне ментальная установка, что вот прямо сейчас, мол, мне для полного счастья не хватает (нужное вписать), и когда я этого достигну - тогда и полный кайф. Одна из самых сильных ловушек на пути. . . .
Использование значений реквизитов справочника в документе, с определенными условиями и правами
Maks 07.04.2026
1. Контроль срока действия договора Алгоритм из решения ниже реализован на примере нетипового документа "ЗаявкаНаРаботу", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru