#include<stdio.h>
#include<conio.h>
#define uint unsigned int
#define uch unsigned char
#define cmax 5

int vl[cmax],vp[cmax];
int vcost[cmax][cmax]={{-1,50,30,100,10},{-1,-1,-1,-1,-1},{-1,5,-1,50,-1},{-1,20,-1,-1,-1},{-1,-1,-1,10,-1}};

uint fexistal(int pvl[],int pvs[],uint pcmax)
{
	for(uint i=0;i<pcmax;i++)
		if((pvl[i]!=-1)&&(pvs[i]==0)) return 1;
	return 0;
}

uint fminl(int pvl[],int pvs[],uint pcmax)
{       uint min=20000,lmin;
	for(uint i=0;i<pcmax;i++)
		if((min>pvl[i])&&(pvl[i]!=-1)&&(pvs[i]==0))
		{
			lmin=i;
			min=pvl[i];
		}
	return lmin;
}

void dijkstra(int p_vcost[cmax][cmax],
		int p_vl[cmax],int p_vp[cmax],int nr_noduri)
{
	int vs[cmax];
	uch i;
	uint poz;
	vs[0]=1;
	p_vl[0]=0;
	for(i=1;i<nr_noduri;i++)
	{
		vs[i]=0;
		p_vl[i]=0;
	}
	for(i=1;i<nr_noduri;i++)
		if(p_vcost[0][i]!=-1)
		{
			p_vl[i]=p_vcost[0][i];
			p_vp[i]=0;
		}
	while (fexistal(p_vl,vs,nr_noduri))
	{
		poz=fminl(p_vl,vs,nr_noduri);
		vs[poz]=1;
		for(uch k=1;k<nr_noduri;k++)
		{
			if(p_vcost[poz][k]!=-1)
			{
				if(p_vl[k]==-1)
				{
					p_vl[k]=p_vcost[poz][k];
					p_vp[k]=poz;
				}
				else
					if(p_vl[k]>p_vl[poz]+p_vcost[poz][k])
					{
						p_vl[k]=p_vl[poz]+p_vcost[poz][k];
						p_vp[k]=poz;
					};
			};

		}
	}
}


void main()
{
	int i;
	clrscr();
	dijkstra(vcost,vl,vp,sizeof(vcost[0])/sizeof(vcost[0][0]));
	for(i=1;i<cmax;i++)
		printf("\n nod %u lungime %u precedenta %u",i,vl[i],vp[i]);
}