На языке PYTHON Андрей изучает социальные сети и пытается определить скрытые атрибуты пользователей по их друзьям. Поскольку Андрей - профессиональный программист, то он хочет протестировать свою программу прежде чем верить ее результатам. Но для этого требуется много разных графов, похожих на социальные сети. Андрей хочет получать графы с разным количеством пользователей (т.е. вершин графа) и разными отношениями дружбы (т.е. ребрами графа Отношение дружбы ненаправленное. В графе не должно быть петель и кратных ребер. Андрей будет задавать желаемое количество вершин и желаемое среднее количество ребер, инцидентных вершине. Его устроит даже граф, если эти его характеристики будут отличаться от заданных, но не более чем на 20%. Ваша программа получает на вход 2 целых положительных числа - N - количество вершин и K - среднее количество ребер у вершины (1≤ N ≤ 200, 0 ≤ K ≤ N - 1) Программа печатает граф описанного вида. В первой строке печатается количество вершин графа. Начиная со следующей строки, печатается матрица смежности графа по строкам. Вершины нумеруются последовательно, начиная с 0. Элемент матрицы смежности равен 1, если соответствующее ребро входит в граф, и 0, иначе. Элементы разделяются пробельными символами. Элементы главной диагонал матрицы смежности должны равняться 0. Если графа описанного вида не существует, программа ничего не печатает

Информатика

Ответить

Ответы

slastena69678

30.10.2020

Логическая операция ⊕ - это "исключающее ИЛИ" (xor в языках Паскаль, Бейсик и т.д.), а → операция присваивания.
Тогда a⊕b→a; a⊕b→b; a⊕b→a - это был обмен значениями a ↔ b
Теперь по этой же схеме обменяем местами b и с:
b⊕c→b; b⊕c→с; b⊕c→b.
Результат: b→a; c→b; a→c

Программа для иллюстрации:
// PascalABC.NET 3.1, сборка 1218 от 12.04.2016
begin
var a:=50;
var b:=-20;
var c:=0;
Println('Исходные значения: a=',a,'b=',b,'c=',c);
a:=a xor b; b:=a xor b; a:=a xor b;
b:=b xor c; c:=b xor c; b:=b xor c;
Println('Результат обмена: a=',a,'b=',b,'c=',c)
end.

Результат:
Исходные значения: a= 50 b= -20 c= 0
Результат обмена: a= -20 b= 0 c= 50

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

На языке PYTHON Андрей изучает социальные сети и пытается определить скрытые атрибуты пользователей по их друзьям. Поскольку Андрей - профессиональный программист, то он хочет протестировать свою программу прежде чем верить ее результатам. Но для этого требуется много разных графов, похожих на социальные сети. Андрей хочет получать графы с разным количеством пользователей (т.е. вершин графа) и разными отношениями дружбы (т.е. ребрами графа Отношение дружбы ненаправленное. В графе не должно быть петель и кратных ребер. Андрей будет задавать желаемое количество вершин и желаемое среднее количество ребер, инцидентных вершине. Его устроит даже граф, если эти его характеристики будут отличаться от заданных, но не более чем на 20%. Ваша программа получает на вход 2 целых положительных числа - N - количество вершин и K - среднее количество ребер у вершины (1≤ N ≤ 200, 0 ≤ K ≤ N - 1) Программа печатает граф описанного вида. В первой строке печатается количество вершин графа. Начиная со следующей строки, печатается матрица смежности графа по строкам. Вершины нумеруются последовательно, начиная с 0. Элемент матрицы смежности равен 1, если соответствующее ребро входит в граф, и 0, иначе. Элементы разделяются пробельными символами. Элементы главной диагонал матрицы смежности должны равняться 0. Если графа описанного вида не существует, программа ничего не печатает

Ответы

Ответить на вопрос

Ваше имя (никнейм)*

Email*

Комментарий*

Популярные вопросы в разделе

Верно ли утверждение, что b> a, если известно, что они получили значения int a = 5> 4; int b = 5> 6; выберите один ответ: верно неверно

Задано пятизначное число. найти третью цифру этого пятизначного числа. (программа на паскале) div и mod

Можно решение номеров№2, 3 (а, б, в)

1.найти двухзначные числа, которые делятся на сумму своих цифр 2.составьте программу вывода количества трёхзначных чисел, у которых цифры строго по убыванию.

Валфавите 64 символа. определи количество информации, которое несет одна буква этого алфавита.

Подскажите , ребусы, загадки по информатике для 7 кл.

Вывести на экран сумму чисел от 1 до 1000 только тех чисел которые делятся на 3 без остатка. Используя цикл While (число % 3 == 0)

Водномерном массиве а(10) вычислить произведение отрицательных элементов.

1)для каждого из чисел: 12310, 45610 выполнить перевод: из 10 в 2, из 10 в 8, из 10 в 16. 2)для каждого из чисел: 1000112, 1010010112, 11100100012 выполнить перевод: из 2 в 10, из 2 в 8, из 2 в...

Определите, что выведет этот фрагмент программы: write ( A[1]1); write ( A[A[1]] ); write ( A[A[A[1]]]); write (A[А[A[А[1111] ); write (A[А[А[А[А[111111 ); для массива ответ с решением

Какое число будет напечатано на экране компьютера в результате выполнения фрагмента программы? бейсик d=1 for k=3 to 5 d=d3 next k print d паскаль d: =1; for k: =3 to 5 do d: =d3; writeln(d);

Ответы

Ответить на вопрос

Ваше имя (никнейм)*

Email*

Комментарий*

Популярные вопросы в разделе

Верно ли утверждение, что b&gt; a, если известно, что они получили значения int a = 5&gt; 4; int b = 5&gt; 6; выберите один ответ: верно неверно

Задано пятизначное число. найти третью цифру этого пятизначного числа. (программа на паскале) div и mod

Можно решение номеров№2, 3 (а, б, в)​

1.найти двухзначные числа, которые делятся на сумму своих цифр 2.составьте программу вывода количества трёхзначных чисел, у которых цифры строго по убыванию.

Валфавите 64 символа. определи количество информации, которое несет одна буква этого алфавита.

Подскажите , ребусы, загадки по информатике для 7 кл.

Вывести на экран сумму чисел от 1 до 1000 только тех чисел которые делятся на 3 без остатка. Используя цикл While (число % 3 == 0)

Водномерном массиве а(10) вычислить произведение отрицательных элементов.

1)для каждого из чисел: 12310, 45610 выполнить перевод: из 10 в 2, из 10 в 8, из 10 в 16. 2)для каждого из чисел: 1000112, 1010010112, 11100100012 выполнить перевод: из 2 в 10, из 2 в 8, из 2 в...

Определите, что выведет этот фрагмент программы: write ( A[1]1); write ( A[A[1]] ); write ( A[A[A[1]]]); write (A[А[A[А[1111] ); write (A[А[А[А[А[111111 ); для массива ответ с решением

Какое число будет напечатано на экране компьютера в результате выполнения фрагмента программы? бейсик d=1 for k=3 to 5 d=d*3 next k print d паскаль d: =1; for k: =3 to 5 do d: =d*3; writeln(d);

Верно ли утверждение, что b> a, если известно, что они получили значения int a = 5> 4; int b = 5> 6; выберите один ответ: верно неверно

Можно решение номеров№2, 3 (а, б, в)

Какое число будет напечатано на экране компьютера в результате выполнения фрагмента программы? бейсик d=1 for k=3 to 5 d=d3 next k print d паскаль d: =1; for k: =3 to 5 do d: =d3; writeln(d);