Даны три множества. Сформировать множество Y= (X2\X3) (Х1\ХЗ) - Pascal ABC

  1. Помогите решить.3. Даны три множества XI- {Т2,Т4,Т6,TS,Т10}, Х2 = {Т1,Т2,ТЗ,Т4,Т5} и Х3 = {Т2,ТЗ, Т5, Т7, Т8} . Сформировать множество Y= (X2\X3) (Х1\ХЗ). На печать вывести Y и его мощность. Исходные множества описать как типизированные константы.


textual

Код:

const
  x1 = [2, 4, 6, 8, 10];
  x2 = [1, 2, 3, 4, 5];
  x3 = [2, 3, 5, 7, 8];
 
var
  y: set of byte;
  i, k: byte;
 
begin
  y := (x2 - x3) * (x1 - x3);
  WriteLn('Множество: ');
  Write('[');
  for i := 0 to 255 do
    if i in y then
    begin
      Write(i, ' ');
      k := k + 1
    end;
  WriteLn(']');
  WriteLn('Мощность множества = ', k);
end.


Похожие ответы
  1. Проверьте, правильно ли работает программа. А именно PROCEDURE BSr, и правильность передачи переменных в основную программу. ЗАДАНИЕ: Сформировать массив из чисел, больших среднего.

  1. Сформировать новый массив из положительных элементов первого массива и элементов второго массива, расположенных после самого левого минимального элемента этого массива.

  1. Вывести в возрастающем порядке все цифры,входящие в десятичную запись некоторого числа n.Добавлено через 23 часа 59 минут Данное задание актуально

  1. Дано массив А(M,M). Сформировать массив P из произведений элементов на параллелях, которые лежат над главной диагональю.

  1. Требуется помощь по двумерным массивам в PascalABC. Никак не могу составить программу. Задание такое: "Сформирвать квадратную матрицу порядка n по заданному массиву" 1 0 0 0 0 6 0 2 0 0 5 0 0 0 3 4 0 0 0 0 3 4 0 0 0 2 0 0 5 0 1 0 0 0 0 6

  1. Дано массив B(M,M). Сформировать массив S из суммы тех элементов столбцов, которые размещены под главной диагональю, массив P из произведений элементов на параллелях, которые лежат над главной диагональю. Полученные массивы объединить в массив С следующим образом: C (S1, S2, S3, ... ,P3, P2, P1).

  1. Напишите программу, которая формирует множество Y=(X1 X2) и выделите из него подмножество Y1 чисел, которые являются четными числами.

  1. Написать алгоритм, составить блок-схему и отладить программу. Помогите решить задачу, и обьясните, пожалуйста, как вы ее сделали. Задан массив из M элементов. Определить куб каждого из элементов и сформировать новый массив. Заранее спасибо.

  1. Сформировать одномерный массив, каждый элемент которого равен сумме элементов соответствующей строки двумерного массива, меньших данного числа.

  1. подскажите пожалуйста, почему у меня не получается доделать ее