Вычитание множеств 2

17.01.2017, 10:29. Показов 432. Ответов 0

Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам

Даны два множества. (смотрите оператор DATA)
Требуется из первого множества вычесть второе
(для решения использовать строки)

QBasic/QuickBASIC
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
31
32
33
34
35
36
REM
REM  THEORY OF SETS
REM
REM  ВЫЧИТАНИЕ МНОЖЕСТВ
REM
 
CLS
 
DATA  9, 37, 25
DATA  4, 37, 39
 
CONST n = 40
DIM x AS STRING * n
DIM y AS STRING * n
DIM z AS STRING * n
 
FOR i = 1 TO 3
   READ u
   MID$(x, u, 1) = "1"
NEXT
 
FOR i = 1 TO 3
   READ u
   MID$(y, u, 1) = "1"
NEXT
 
FOR i = 1 TO n
   IF MID$(x, i, 1) = "1" AND MID$(y, i, 1) <> "1" THEN
      MID$(z, i, 1) = "1"
   END IF
NEXT
 
FOR i = 1 TO n
   IF MID$(z, i, 1) = "1" THEN PRINT i;
NEXT
END

примечание
Кажется мне удалось придумать, как использовать строки
когда множества имеют и отрицательные числа. пример:
дано множество {-77, -51, 0, 84, 17} .
Теперь преобразуем это множество к виду
{177, 151, 100, 84, 17}, то есть теперь мы можем оперировать
этим множеством (поместить его в строку). А при распечатке
каждый элемент будет обработан по MOD 100 и поставлен знак минус

cpp_developer

Эксперт

20123 / 5690 / 1417

Регистрация: 09.04.2010

Сообщений: 22,546

Блог

17.01.2017, 10:29

Ответы с готовыми решениями:

Вычитание множеств
Даны два множества (смотрите оператор DATA) Требуется из первого множества вычесть второе (для решения использовать массивы) ...

Вычитание двоичных чисел
1. Вычесть двоичные числа 11001000(двоич) - 100101(двоич), рассматривая вычитание как сложение положительного числа с отрицательным числом ...

Умножение, сложение, вычитание матриц
CLS DIM A(2, 2) FOR i = 1 TO 4 FOR j = 1 TO 4 INPUT "vvedite elementi matrici A ", A(i, j) NEXT NEXT PRINT "matrica" FOR i...

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

raxper

Эксперт

30234 / 6612 / 1498

Регистрация: 28.12.2010

Сообщений: 21,154

Блог

17.01.2017, 10:29

Помогаю со студенческими работами здесь

Сложение и вычитание множеств
Нужна помощь. Надо создать класс с множеством чисел и реализовать в нём функцию сложения и вычитания, этих самых множеств. Функция сложения...

Шаблон класса должен давать возможность вывести все элементы множества на экран, сложение, вычитание, осуществлять пересечение множеств
Есть вот такое задание: 4. Создать шаблон класса Mnogyna. Шаблон класса должен давать возможность вывести все элементы множества на...

Поменять местами значения множеств a и b без использования дополнительных множеств
оставить программу, которая меняет местами значения множеств a и b без использования дополнительных множеств

Доказать равенство множеств с помощью основных законов алгебры множеств
Доказать равенство множеств, преобразуя множества к одинаковому виду помощью основных законов алгебры множеств:

Составить программу, меняющую местами значения множеств A и B без использования дополнительных множеств
Здравствуйте, уважаемые программисты! Не знаю, куда еще обращаться, на следующей неделе экзамен, а у меня одна задача никак не получается....

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

Или воспользуйтесь поиском по форуму:

Новые блоги и статьи Все статьи Все блоги /
YAFU@home — распределённые вычисления для математики. На CPU Programma_Boinc 20.01.2026 YAFU@home — распределённые вычисления для математики. На CPU YAFU@home — это BOINC-проект, который занимается факторизацией больших чисел и исследованием aliquot-последовательностей. Звучит. . .	http://iceja.net/ математические сервисы iceja 20.01.2026 Обновила свой сайт http:/ / iceja. net/ , приделала Fast Fourier Transform экстраполяцию сигналов. Однако предсказывает далеко не каждый сигнал (см ограничения http:/ / iceja. net/ fourier/ docs ). Также. . .	http://iceja.net/ сервер решения полиномов iceja 18.01.2026 Выкатила http:/ / iceja. net/ сервер решения полиномов (находит действительные корни полиномов методом Штурма). На сайте документация по API, но скажу прямо VPS слабенький и 200 000 полиномов. . .	Расчёт переходных процессов в цепи постоянного тока igorrr37 16.01.2026 / * Дана цепь постоянного тока с R, L, C, k(ключ), U, E, J. Программа составляет систему уравнений по 1 и 2 законам Кирхгофа, решает её и находит: токи, напряжения и их 1 и 2 производные при t = 0;. . .
Восстановить юзерскрипты Greasemonkey из бэкапа браузера damix 15.01.2026 Если восстановить из бэкапа профиль Firefox после переустановки винды, то список юзерскриптов в Greasemonkey будет пустым. Но восстановить их можно так. Для этого понадобится консольная утилита. . .	Сукцессия микоризы: основная теория в виде двух уравнений. anaschu 11.01.2026 https:/ / rutube. ru/ video/ 7a537f578d808e67a3c6fd818a44a5c4/	WordPad для Windows 11 Jel 10.01.2026 WordPad для Windows 11 — это приложение, которое восстанавливает классический текстовый редактор WordPad в операционной системе Windows 11. После того как Microsoft исключила WordPad из. . .	Classic Notepad for Windows 11 Jel 10.01.2026 Old Classic Notepad for Windows 11 Приложение для Windows 11, позволяющее пользователям вернуть классическую версию текстового редактора «Блокнот» из Windows 10. Программа предоставляет более. . .

Наверх