p; (counter <10)// 10 спроб вивести вузли списку на екран
{(pp-> pq, pp-> hp);
counter + +;
} + +;// інкремент лічильника завершилися процесів
_endthread ();
}
main ()
{hp = NULL; q; = InitialList (& q, hp);// ініціалізація списку * p = new Params ();> pq = &q;> hp = hp ;
_beginthread (ThreadAdd, 2, (void *) (p));// додавання другорядних
потоків
_beginthread (ThreadErase, 2, (void *) (p));
_beginthread (ThreadChange, 2, (void *) (p));
_beginthread (ThreadPrint, 2, (void *) (p)); (1)// очікування завершення другорядних потоків
{(c == 4)
{(& q, hp);// контрольне роздрук списку
HeapDestroy (hp);// видалення купи <<"heap destroyed" <
break;
}
}
}