Списки. Разработать модуль для работы со списком типа "множество".

[lvirusl]

Разработайте модуль для работы со списком типа "множество". Модуль должен содержать следующие функции и процедуры:

function insert (el:integer): boolean;
function drop (el:integer): boolean;
function isExist (el:integer): boolean;
function getSize: integer;
procedure erase;

Функция insert вставляет элемент el в множество и возвращает true в случае успеха.
Функция drop удаляет элемент el из множества и возвращает true в случае, если он был.
Функция isExist возвращает true, если элемент в списке присутствует.
Функция getSize возвращает количество элементов в множестве.
Процедура erase очищает множество.
Напишите программу тестирования данного модуля.

[eoln]

eoln@mail.ru
ICQ: 421277094
Быстро, недорого

[sheka]

Сделаю в лучшем виде!
255507394.

[mss]

Функция isExist возвращает true, если элемент в списке присутствует.

Перевел с буржуйского на великий и могучий "IsExists" - "ЕстьСуществует"
Т.е. ф-ция возвращает истину, если чего-то там есть, да еще и существует !!
Моя плакать ..
Какой же олух выставил требования по такому смысловому именованию функции ?)

Напишите программу тестирования данного модуля

Ну да.
Где ж как не здесь по первому свистку студня-недоучки бросаются нахаляву спасать его нерадивую задницу ?*

Не стыдно, да ?)

[eoln]

OFF

Сообщение от mss

Перевел с буржуйского на великий и могучий "IsExists" - "ЕстьСуществует"
Т.е. ф-ция возвращает истину, если чего-то там есть, да еще и существует !!
Моя плакать ..
Какой же олух выставил требования по такому смысловому именованию функции ?)

Наоборот, распространённое название стандартных функций (IsInteger, IsNumeric и т.д. и т.п.)
Переводится "это существует", поэтому крайне логично назвать так функцию.

[mss]

крайне логично назвать так функцию

Нифига не логично.
Впрочем не суть как важно.
Важней нелогичность самой подачи вопроса самим ТС.

[p51x]

"IsExists" - "ЕстьСуществует"

У нас за такое еще в школе с урока выгоняли с жирной парой....

[Вадим Мошев]

Сообщение от eoln

OFF

Наоборот, распространённое название стандартных функций (IsInteger, IsNumeric и т.д. и т.п.)
Переводится "это существует", поэтому крайне логично назвать так функцию.

Я понимаю, если бы после Is стояло прилагательное (например, название ф-ции IsPrime).
Но тут стоит Глагол в третьем лице Exists - существует.

Советую переназзвать вашу функцию - IfExists.

[eoln]

Пара примеров
http://www.mql5.com/ru/docs/standard...e/cfileisexist
А ещё в бейсике много раз мелькают IS http://msdn.microsoft.com/ru-ru/libr...(v=vs.90).aspx

В разных языках разные стили. Я часто встречаю эти IS

А что даёт IfExists? И как это будет выглядеть в программе? If IfExist(x) then... Если Если_Существует? Не кошерно
Вот с IsExist всё нормально - есть высказывание "это существует", и если высказывание верное, то true, иначе false.

[Вадим Мошев]

Ну тогда уж лучше ElementExists(чё-то там);