Go: package main

import (
	"sort"
	"bufio"
	"os"
	"fmt"
	"strconv"
)

// Define disjoint-set forests

type vertexNo int

type vertex struct {
	number vertexNo
	rank int
	parent *vertex
}

func makeSet(number vertexNo) vertex {
	return vertex {
		number: number,
		rank: 0,
		parent: nil,
	}
}

func union(x, y *vertex) *vertex {
	return link(findSet(x), findSet(y))
}

func link(x, y *vertex) *vertex {
	if x.rank > y.rank {
		y.parent = x
		return x
	} else {
		x.parent = y
		if x.rank == y.rank {
			y.rank += 1
		}
		return y
	}
}

func findSet(v *vertex) *vertex {
	if v.parent == nil {
		return v
	}
	v.parent = findSet(v.parent)
	return v.parent
}

// Function to calculate minimum spanning tree

type matrix [][]int

type edge struct {
	one vertexNo
	two vertexNo
	weight int
}

const(
	MAX_VERTICES = 100
)

func newEdgesFromMatrix(matrix matrix) []edge {
	edges := make([]edge, 0, MAX_VERTICES * MAX_VERTICES)

	for i := 0; i < len(matrix); i++ {
		row := matrix[i]
		for j := i; j < len(row); j++ {
			if row[j] >= 0 {
				edge := edge{one: vertexNo(i+1), two: vertexNo(j+1), weight: row[j]}
				edges = append(edges, edge)
			}
		}
	}

	return edges
}

func solve(matrix matrix) int {
	nVertices := len(matrix)

	// initialize vertices
	vertices := make([]vertex, nVertices)
	for i := 0; i < nVertices; i++ {
		vertices[i] = makeSet(vertexNo(i+1))
	}

	// prepare edges sorted in the ascending order of weight
	edges := newEdgesFromMatrix(matrix)
	sort.Slice(edges, func(i, j int) bool {
		return edges[i].weight < edges[j].weight
	})

	unionCount := 0
	weightSum := 0
	for unionCount < nVertices-1 {
		for i := 0; i < len(edges); i++ {
			edge := edges[i]
			v1 := &vertices[edge.one-1]
			v2 := &vertices[edge.two-1]
			rep1 := findSet(v1)
			rep2 := findSet(v2)
			if rep1.number == rep2.number {
				continue
			}
			union(rep1, rep2)
			edges = append(edges[0:i], edges[i+1:]...)
			weightSum += edge.weight
			unionCount++
			break
		}
	}

	return weightSum
}

// main

func main() {
	sc := bufio.NewScanner(os.Stdin)
	sc.Split(bufio.ScanWords)

	n, err := nextInt(sc)
	if err != nil {
		panic(err)
	}

	matrix := parseMatrix(n, sc)

	edges := newEdgesFromMatrix(matrix)
	sort.Slice(edges, func(i, j int) bool {
		return edges[i].weight < edges[j].weight
	})

	fmt.Println(solve(matrix))
}

func parseMatrix(n int, sc *bufio.Scanner) [][]int {
	matrix := make([][]int, n)
	for i := 0; i < n; i++ {
		matrix[i] = make([]int, n)
		for j := 0; j < n; j++ {
			x, err := nextInt(sc)
			if err != nil {
				panic(err)
			}
			matrix[i][j] = x
		}
	}
	return matrix
}

func nextText(sc *bufio.Scanner) string {
	sc.Scan()
	return sc.Text()
}

func nextInt(sc *bufio.Scanner) (int, error) {
	return strconv.Atoi(nextText(sc))
}

C++: #include <iostream>
#include <set>
#include <vector>
#define FOR(i,k,n) for (int (i)=(k); (i)<(n); ++(i))
#define REP(i,n) FOR(i,0,n)
#define pb push_back
#define mp make_pair
#define fst first
#define snd second
#define all(v) begin(v), end(v)
using namespace std;
typedef pair<int,int> PII;

int P[100]; //union_find

int root(int i){
    if(P[i] == i) return i;
    else return P[i] = root(P[i]);
}

bool same(int x, int y){
    return root(P[x]) == root(P[y]);
}

void unite(int x, int y){
    P[root(x)] = root(y);
}

int main(){
    int n;
    cin >> n;
    int g[n][n];
    vector<pair<int,PII>> V;
    REP(i,n){
        REP(j,n){
            cin >> g[i][j];
            if(i<j && g[i][j] >= 0) V.pb(mp(g[i][j],mp(i,j)));
        }
    }
    sort(all(V));
    REP(i,n){
        P[i] = i;
    }
    int wsum=0;
    REP(i,n-1){
        int x = V[i].snd.fst;
        int y = V[i].snd.snd;
        if(!same(x,y)){
            unite(x,y);
            wsum += V[i].fst;
        }
    }

    cout <<wsum<<endl;

    return 0;
}

C++: #include<stdio.h>
#define MAX 100
#define INFTY 2097152
#define WHITE 0
#define GRAY 1
#define BLACK 2
int prim();
int n,M[MAX][MAX];

int main(){
  int e;
  scanf("%d",&n);
  for(int i=0;i<n;i++){
    for(int j=0;j<n;j++){
      
      scanf("%d",&e);
      if(e==-1)
	M[i][j]=INFTY;
      else
	M[i][j]=e;}}
  printf("%d\n",prim());
  return 0;
}

int prim(){
  int u,minv;
  int d[MAX],p[MAX],color[MAX];
  int sum=0;
  for(int i=0;i<n;i++){
    d[i]=INFTY;
    p[i]=-1;
    color[i]=WHITE;
  }

  d[0]=0;

  while(1){
    minv=INFTY;
    u=-1;
    for(int i=0;i<n;i++){
      if(minv>d[i]&&color[i]!=BLACK){
	u=i;
	minv=d[i];
      }
    }
    if(u==-1)break;
    color[u]=BLACK;
    for(int v=0;v<n;v++){
      if(color[v]!=BLACK&&M[u][v]!=INFTY){
	if(d[v]>M[u][v]){
	  d[v]=M[u][v];
	  p[v]=u;
	  color[v]=GRAY;
	}
      }}}

  for(int i=0;i<n;i++){
    if(p[i]!=-1)
      sum+=M[i][p[i]];
  }
  return sum;
}

C++: #include<iostream>
using namespace std;
static const int MAX = 100;
static const int INFTY = (1<<21);
static const int WHITE = 0;
static const int GRAY = 1;
static const int BLACK = 2;

int n, M[MAX][MAX];

int prim() {
    int u, minv;
    int d[MAX], p[MAX], color[MAX];

    for (int i=0; i<n; i++) {
        d[i] = INFTY;
        p[i] = -1;
        color[i] = WHITE;
    }

    d[0] = 0;

    while(1) {
        minv = INFTY;
        u = -1;
        for (int i=0; i<n; i++) {
            if (minv>d[i] && color[i]!=BLACK) {
                u = i;
                minv = d[i];
            }
        }
        if (u==-1) break;
        color[u] = BLACK;
        for (int v=0; v<n; v++) {
            if (color[v]!=BLACK && M[u][v]!=INFTY) {
                if (d[v] > M[u][v]) {
                    d[v] = M[u][v];
                    p[v] = u;
                    color[v] = GRAY;
                }
            }
        }
    }
    int sum=0;
    for (int i=0; i<n; i++) {
        if (p[i]!=-1) sum += M[i][p[i]];
    }

    return sum;
}

int main() {
    cin >> n;

    for (int i=0; i<n; i++) {
        for (int j=0; j<n; j++) {
            int e; cin >> e;
            M[i][j] = (e==-1) ? INFTY : e;
        }
    }

    cout << prim() << endl;

    return 0;
}

C++: #include<iostream>
using namespace std;

//#include "stdio.h"

#define MAX 100
#define WHITE 0
#define GRAY 1
#define BLACK 2
#define INFTY 1<<21

int n;
int color[MAX],d[MAX],p[MAX],M[MAX][MAX];

int prim(){
  int sum=0;

  for(int i=0;i<n;i++){
    color[i] = WHITE;
    d[i] = INFTY;
    p[i] = -1;
  }

  d[0] = 0;
  p[0] = -1;

  while(true){
    int u=-1;
    int minicost=INFTY;

    for(int i=0;i<n;i++){
      if( color[i] != BLACK && minicost > d[i] ){
        minicost = d[i];
        u = i;
      }
    }
    if(u==-1){
      break;
    }
    color[u] = BLACK;

    for(int v=0;v<n;v++){
      if(color[v] != BLACK && d[v] > M[u][v]){
        d[v] = M[u][v];
        p[v] = u;
        color[v] = GRAY;
      }
    }
  }

  for(int i=0;i<n;i++){
    sum = sum + d[i];
  }

  return sum;
}


int main(void){

  cin >> n;

  int weight;
  for(int i=0;i<n;i++){
    for(int j=0;j<n;j++){
      cin >> weight;
 
      if(weight == -1){
        M[i][j] = INFTY;
      }else{
        M[i][j] = weight;
      }
    }
  }

  cout << prim() << endl;

  return 0;
}

C++: #include <iostream>
#include <algorithm>
#include <vector>
using namespace std;
#define INF 1<<30
#define MAX_V 100

int n;
int M[MAX_V][MAX_V];
bool added[MAX_V];
int d[MAX_V], p[MAX_V];

int prim(){
  for(int i = 0; i < n; i++){
    d[i] = INF;
    added[i] = false;
  }

  d[0] = 0; p[0] = -1;

  while(true){
    int minCost = INF, u;
    for(int i = 0; i < n; i++){
      if(!added[i] && d[i] < minCost){
        minCost = d[i];
        u = i;
      }
    }

    if(minCost == INF) break;

    added[u] = true;

    for(int i = 0; i < n; i++){
      if(!added[i] && M[u][i] != -1 && M[u][i] < d[i]){
        d[i] = M[u][i];
        p[i] = u;
      }
    }
  }
  
  int sum = 0;
  for(int i = 0; i < n; i++){
    if(p[i] != -1) sum += M[i][p[i]];
  }

  return sum;
}

int main(void){
  cin >> n;
  for(int i = 0; i < n; i++) for(int j = 0; j < n; j++){
    cin >> M[i][j];
  }
  cout << prim() << endl;
  return 0;
}