danila2003uly
30.11.2022 00:43

Граф задан числом вершин n и ребрами их связывающими. каждое ребро задано парой чисел (номерами вершин, которые оно связывает). рёбра вводятся либо с клавиатуры, либо в виде массива размера 2*k, где k - число рёбер. необходимо построить матрицу смежности в виде квадратного массива. написать на с++

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
Foolrelax
06.04.2022 18:38
// PascalABC.Net 3.0, сборка 1064
const
  n = 10;
var
  ms: array[1..n] of string;
  t: string;
  i, j: integer;
  f: Text;
begin
  { Чтение матрицы из файла }
  Assign(f, 'in.txt'); Reset(f);
  for i := 1 to n do Readln(f, ms[i]);
  Close(f);
  { Вывод матрицы на экран }
  Writeln('*** Бинарная матрица ***');
  for i := 1 to n do Writeln(ms[i]);
  { Сортировка обменом (простейшая) }
  for i := 1 to n - 1 do
    for j := 1 to n - 1 do
      if ms[j] > ms[j + 1] then
      begin t := ms[j]; ms[j] := ms[j + 1]; ms[j + 1] := t end;
  { Поиск одинаковых строк }
  Writeln('Совпадающие строки');
  j := 1; t := ms[1];
  for i := 2 to n do
  begin
    if ms[i] = t then Inc(j)
    else begin
      if j > 1 then begin Writeln(t); j := 1 end;
      t := ms[i]
    end
  end;
  if j > 1 then Writeln(t)
end.

Контрольное решение:
*** Бинарная матрица ***
1 1 0 1 0 1 0 1 0 1
0 0 1 0 1 0 1 0 1 0
1 0 1 0 1 0 1 0 1 0
1 1 0 1 0 1 0 1 0 0
0 0 1 0 1 0 1 0 1 1
0 1 0 1 0 1 0 1 0 1
1 1 0 1 0 1 0 1 0 1
0 0 1 0 1 0 1 0 1 0
0 1 0 1 0 1 0 1 0 1
Совпадающие строки
0 0 1 0 1 0 1 0 1 0
0 1 0 1 0 1 0 1 0 1
1 0 1 0 1 0 1 0 1 0
1 1 0 1 0 1 0 1 0 1
0,0(0 оценок)
Ответ:
ahjdfgnn73
30.05.2023 07:32
Открываете раздел по языку набираете ключевое слово: string.  Смотрите все процедуры и функции, для работы с переменными типа string 
 Находите описание функции Pos

function Pos(subs,s: string): integer;
        Возвращает позицию подстроки subs в строке s. Если не найдена, возвращает 0 

Если строка subs входит в строку s, то функция возвращает значение, большее нуля, номер первого символа в сроке s, начиная с которого, строка subs входит в строку s.
Например,  subs:='123';    s:='785123456';  k: integer;
k:=Pos(subs,s);   значение переменной k = 4;
Второй пример:   subs:='123;  s:=623145;
k:=Pos(subs,s);  k =0;   строка subs не входит в строку s
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота