THUẬT TO ÁN PRIM

void Prim (void){
/*bước khởi tạo*/
Chọn s là một đỉnh nào đó của đồ thị;
VH = { s }; T = φ; d[s] = 0; near[s] = s;
For ( v∈ V\VH ) {
D[v] = C[s, v]; near[v] = s;
}
/* Bước lặp */
Stop = False;
While ( not stop ) {
Tìm u∈ V\VH thoả mãn: d[u] = min { d[v] với u∈V\VH};
VH = VH∪ {u}; T = T ∪ (u, near[u] );
If ( | VH |) == n ) {
H = <VH, T> là cây khung nhỏ nhất của đồ thị;
Stop = TRUE;
}
Else {
For ( v ∈ V\VH ) {
If (d[v] > C[u, v]) {
D[v] = C[u, v];
Near[v] = u;
}
}
}
}
}