Множества

[advokat92]

Имеется три магазина, в которых имеются следующие продукты: 1 - ый: хлеб, колбаса, мясо, рыба, молоко, сахар;
2- ой: соль, спички, рыба, хлеб, сахар;
3- ий: хлеб, мясо, консервы, кефир, булочки.
Определить наименование продуктов, имеющихся во всех магазинах.
Примечание: каждый продукт кодировать одной буквой.

 

[Mas]

Пишите, реализую недорого!
ICQ: 437528958

 

[nayke]

Если нужен алгоритм.. или направление то идея следующая..
создаем динамический массив

products array of string;

проходим по списку
хлеб, колбаса, мясо, рыба, молоко, сахар;

если продукт до этого в массив не входил добавляем:

for i:=0 to length(products)-1 do
if products[i] ='хлеб' then begin inc(CountProducts[i]);res:=true;break;end;
if not res then begin SetLength(products,Length(products)+1);products[length(products)-1]:='хлеб' end;

вместо "хлеб" можно использовать строкову переменную CurrentProduct получаемую из матрицы магазин/товар в CountProducts будет храниться количество вхождений товара и если в одном и том же магазине не может быть варианта "хлеб, мясо, хлеб," то достаточно будет выбрать тот товар чей CountProducts = количеству магазинов.

Ну это мое скромное мнение..
P.s. если вам просто полный код был нужен то это к товарищу сверху.

 

[XTen]

Пиши решу Дёшево
ICQ: 410691984

 

[Dock1100]

А может просто сделать масив для каждого магазина,где определенный номер соответствует своему продукту, а потом просто просматривать количество каждого продукта?

 

[hosm]

ребята, так задача-то на множества из символов вроде как, не?

Примечание: каждый продукт кодировать одной буквой.

например, по первой - ну, там хлеб, уксус, йогурт... =)
(кажется, у кого-то сегодня очень вредное настроение)

 

[acorn]

задача на множества и делается это элементарно:

Ссылка скрыта от гостей