Процедура Exclude

Основы программирования
Каждый профессионал когда-то был чайником. Наверняка вам знакомо состояние, когда “не знаешь как начать думать, чтобы до такого додуматься”. Наверняка вы сталкивались с ситуацией, когда вы просто не знаете, с чего начать. Эта книга ориентирована как раз на таких людей, кто хотел бы стать программистом, но совершенно не знает, как начать этот путь. Подробнее...

Процедура Exclude в Паскале удаляет элемент из множества, если он там имеется. Синтаксис:

procedure Exclude(var S : TSetType; E : TSetElement);

Здесь E - это элемент множества S, который надо удалить.

То есть процедура Exclude исключает элемент E из множества S, если он является частью множества. Элемент E должен быть того же типа, что и базовый тип множества S.

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

S := S - [E];

Exclude(S, E);

Если элемент Е не соответствует базовому типу множества S, то компилятор выдаст ошибку.

Пример:

program myprog;

type TSeasons = (Winter, Spring, Summer, Autumn);

var M : set of TSeasons;

//*******************************************************************
// ОСНОВНАЯ ПРОГРАММА
//*******************************************************************
begin
  //Добавляем элементы в множество М
  M := [Winter, Spring, Summer, Autumn];

  //Удаляем элемент Summer из множества
  Exclude(M, Summer);

  //Проверяем, есть ли Summer в множестве
  if Summer in M then WriteLn('Summer in M')
  else WriteLn('Summer no in M');

  WriteLn(#10#13'The end. Press ENTER...');
  ReadLn;
end.

См. также описание процедуры Include, где более подробно рассказано о том, что произойдёт в случае несовместимости типов.

Вступить в группу "Основы программирования"

Подписаться на канал в РУТУБ

Подписаться на Дзен-канал

Подписаться на рассылки по программированию

Как стать программистом 2.0

Эта книга для тех, кто хочет стать программистом. На самом деле хочет, а не просто мечтает. И хочет именно стать программистом с большой буквы, а не просто научиться кулебякать какие-то примитивные программки… Подробнее...

Помощь в технических вопросах

Помощь студентам. Курсовые, дипломы, чертежи (КОМПАС), задачи по программированию: Pascal/Delphi/Lazarus; С/С++; Ассемблер; языки программирования ПЛК; JavaScript; VBScript; Fortran; Python и др. Разработка (доработка) ПО ПЛК (предпочтение - ОВЕН, CoDeSys 2 и 3), а также программирование панелей оператора, программируемых реле и других приборов систем автоматизации. Подробнее...

Главная
Контакты