1. Информатика
  2. Сформировать множества а и в,

Сформировать множества а и в, базовый тип которых 0..50 , по заданному числу элементов для каждого множества. вывести на экран все элементы множества а, не принадлежащие в.

ira113311 ira113311    2   28.09.2019 21:20    0

Ответы
ficusborislav ficusborislav  09.10.2020 01:21
// PascalABC.NET 3.4.2, сборка 1806 от 30.09.2018// Внимание! Если программа не работает, обновите версию!

begin

 var (na,nb):=ReadInteger2('Мощность множеств A и B:');

 var A,B:set of integer;

 repeat

   A+=[Random(0,50)]

 until A.Count=na;

 A.Println;

 repeat

   B+=[Random(0,50)]

 until B.Count=nb;

 B.Println;

 (A-B).Println

end.


Сформировать множества а и в, базовый тип которых 0..50 , по заданному числу элементов для каждого м
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Kitty85 Kitty85  18.08.2019 20:30
Вкаких случаях применяют оператор ветвления в паскале?...
eeeeroock eeeeroock  18.08.2019 20:30
Что произойдёт,если вы вставите из буфера обмена рисунок,который больше по размерам ,чем область для рисунка в paint? a)рисунок обрежется в)будет выведено сообщение...
lopkin lopkin  18.08.2019 20:30
1)напишите программу, которая определяет, верно ли, что введенное число состоит из одинаковых цифр(например, 222) 2)напишите программу, которая определяет, верно ли,...
Boss008Mta Boss008Mta  18.08.2019 20:30
Напишите в pythone две функции circlelength(radius) и circlearea(radius), по радиусу окружности, вычисляющие длину этой окружности и площадь круга соответственно. также...
Danil545333 Danil545333  18.08.2019 20:30
Основные этапы развития компьютеров?...
OlgaStarikova OlgaStarikova  18.08.2019 20:30
1составить письменный рассказ (сказку) с использованием изученных терминов. минимум 10 предложений. тема урока «текстовый редактор, текстовый процессор»....
drazzgaming drazzgaming  29.07.2019 15:10
Какова структура электронного адреса...
dotafign9 dotafign9  08.09.2019 11:00
Информатика, построение графиков через паскаль. составьте программу построения графика зависимости y=x×sinx на отрезке [-20,20]...
DEN23567893 DEN23567893  16.10.2020 10:53
Яким чином поняття «інтернет-банкінгу» пов’язано з поняттям «інформацій- на безпека»?...
pinelike pinelike  07.04.2020 21:30
Приведите конкретные примеры информационных систем. (5 шт)...

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