Cod sursa(job #679137)

Utilizator BlaugranasEnal Gemaledin Blaugranas Data 12 februarie 2012 20:05:07
Problema Sate Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 1.96 kb
#include<cstdio>
#define N 30001
typedef struct nod
{int info,cost;
struct nod *next;}Nod;
struct P
{int a,b;};
P s[N];
Nod *l[N],*t;
int i,n,m,x,y,j,p,u,c[N],k,o;

void A(int i,int j,int k)
{Nod *p=new Nod;
p->info=j;
p->cost=k;
p->next=l[i];
l[i]=p;}

int B(int i,int j)
{Nod *p;
for(p=l[i];p;p=p->next)
if(p->info==j)
      if(i<j)
             return p->cost;
      else
             return -p->cost;
return 0;}

int main()
{FILE *f=fopen("sate.in","r"),*g=fopen("sate.out","w");
fscanf(f,"%d%d%d%d",&n,&m,&x,&y),c[x]=1;
while(m--)
      fscanf(f,"%d%d%d",&i,&j,&k),A(i,j,k),A(j,i,-k);
for(t=l[x];t;t=t->next)
if(t->info>x)
      s[u].a=x,s[u].b=t->info,u++;
else
      s[u].a=t->info,s[u].b=x,u++;
while(p<=u)
      {i=s[p].a,j=s[p].b,p++;
      if(!c[i])
             o=i,c[i]=1;
      else
             if(!c[j])
                    o=j,c[j]=1;
             else
                    break;
      for(t=l[o];t;t=t->next)
             {k=t->info;
             if(!c[k])
                   {if(k<i)
                          if(B(k,i))
                                 s[u].a=k,s[u].b=j,u++,A(k,j,B(i,j)+B(k,i));
                          else
                                 s[u].a=k,s[u].b=i,u++,A(k,i,B(k,j)-B(i,j));             
                   else
                          if(k>i&&k<j)
                                 if(B(i,k))
                                       s[u].a=k,s[u].b=j,u++,A(k,j,B(i,j)-B(i,k));
                                 else
                                       s[u].a=i,s[u].b=k,u++,A(i,k,B(i,j)-B(k,j));
                          else
                                 if(k>j)
                                       if(B(j,k))
                                              s[u].a=i,s[u].b=k,u++,A(i,k,B(i,j)+B(j,k));
                                       else
                                              s[u].a=j,s[u].b=k,u++,A(j,k,B(i,k)-B(i,j));}}}
fprintf(g,"%d",B(x,y));
return 0;}