Удаление узлов в односвязном списке

[Niklitel]

Помогите пожалуйста, не могу понять что не так. Нужно удалить узлы содержащие простые числа.Программа не удаляет!

#include<iostream>
#include<conio.h>
bool prost (int x)
{
    int s=0;
    for (int i=1; i<=x; i++) {
        if (x%i==0) {
            s++;
        }
    }
    if (s==2){
        return true;
    }
    return false;
};
struct node 
{
    int ch;
    node* link;
};
int main()
{
    setlocale(LC_ALL, "rus");
    using namespace std;
    node *top, *k;
    int w,n;
    top=NULL;
    cout<<"введите количество чисел"<<endl;
    cin>>n;
    cout<<"введите числа"<<endl;
    for (int i=0; i<n; i++) {
        cin>>w;
        k = new node;
        k->link = top;
        k->ch = w;
        top = k;
    }
    k = top;
    while (k != NULL)
    {
        cout<<k->ch<<endl;
        k = k->link; // Перемещение к следующему узлу
    }
    // Удаление узлов стека, содержащих простое число
    k = top;
    node *l = top;
    // Указатель на предыдущий узел
    while (k != NULL)
    {
        if (prost(k->ch)==true) 
        {
            if (k == top)
            { // Если простое число - вершина
                top = k->link;
                delete k;
                k = top;
            }
            else
            { // Ecли простое число не веpшина
                l->link = k->link;
                delete k;
                k = l->link;
            }
        }
        else
        { // Eсли не простое
            l = k;
            k = k->link;
        }
    }
    k = top;
    while (k != NULL)
    {
        cout<<k->ch<<endl;
        k = k->link; // Перемещение к следующему узлу
    }   
    getch ();
    return 0;
}

[Niklitel]

теперь все работает

 bool prost (int x)
{
    for (int i=2; i<=x/2; i++) 
        if (x%i==0) 
            return false;
    return true;
}