#include<bits/stdc++.h>
#define LL long long
#define SZ(x) ((LL)(x.size()))
using namespace std;
long long read(){
  long long q=0,w=1;
  char ch=getchar();
  while(ch>'9' || ch<'0'){if(ch=='-')w=-1;ch=getchar();}
  while(ch>='0'&&ch<='9'){q=q*10+(ch-'0');ch=getchar();}
  return q*w;
}
void write(LL x){
  if(x<0){putchar('-');x=(-x);}
  if(x>9)write(x/10);
  putchar('0'+x%10);
}
void writeln(LL x){write(x);puts("");}
void writecs(LL x){write(x);putchar(' ');}
LL qpow(LL a,LL b,LL p){
  LL ans=1;
  while(b){
    if(b&1)ans=(ans*a)%p;
    b>>=1;a=(a*a)%p;
  }
  return ans;
}
const long long mod = 998244353;
void addmod(LL &x,LL y){x+=y;if(x>=mod)x-=mod;}
void submod(LL &x,LL y){x-=y;if(x<0)x+=mod;}
LL domod(LL x){
  if(x<0)x+=mod;
  if(x>=mod)x-=mod;
  return x;
}
LL inv(LL x){return qpow(x,mod-2,mod);}
const long long inv2 = inv(2);
struct mat{LL a[3][3];};
mat operator+(mat x,mat y){
  mat z;
  for(LL i=0;i<3;i++)
    for(LL j=0;j<3;j++)z.a[i][j]=0;
  for(LL i=0;i<3;i++)
    for(LL j=0;j<3;j++){
      addmod(z.a[i][j],x.a[i][0]*y.a[0][j]%mod);
      addmod(z.a[i][j],x.a[i][1]*(y.a[0][j]+y.a[1][j])%mod*inv2%mod);
      addmod(z.a[i][j],x.a[i][2]*(y.a[1][j]%mod*inv2%mod+y.a[2][j])%mod);
    }
  return z;
}
const long long N = 300000+95;
long long n,a[N];
struct Edge{
  LL to,nxt;
}e[N<<1];LL head[N],tot;
void add_e(LL u,LL v){
  e[++tot].to=v;e[tot].nxt=head[u];
  head[u]=tot;return ;
}
long long fa[N],dep[N],sz[N],son[N];
void dfs(LL x){
  dep[x]=dep[fa[x]]+1;sz[x]=1;
  for(LL i=head[x];i;i=e[i].nxt){
    if(e[i].to==fa[x])continue;
    fa[e[i].to]=x;dfs(e[i].to);sz[x]+=sz[e[i].to];
    if(sz[son[x]]<sz[e[i].to])son[x]=e[i].to;
  }
  return ;
}
long long dfn[N],low[N],ed[N],tim,seq[N],pf[N];
void dfs2(LL x,LL ac){
  dfn[x]=++tim;seq[tim]=x;ed[ac]=tim;pf[x]=ac;
  if(son[x])dfs2(son[x],ac);
  for(LL i=head[x];i;i=e[i].nxt){
    if(e[i].to==fa[x]||e[i].to==son[x])continue;
    dfs2(e[i].to,e[i].to);
  }
  low[x]=tim;return ;
}
LL ord[N];
bool cmp(LL x,LL y){return a[x]>a[y];}
LL dp[N][3];bool vis[N];
namespace SGT{
  struct node{LL l,r,d1,d2;}s[N<<2];
  void pushup(LL p){
    s[p].d1=s[s[p].l].d1*s[s[p].r].d1%mod;
    s[p].d2=domod(s[s[p].l].d2+s[s[p].r].d2);
    return ;
  }
  void build(LL &p,LL l,LL r){
    p=++tot;s[p].d1=1;s[p].d2=0;
    if(l>=r)return ;
    LL mid=(l+r)>>1;
    build(s[p].l,l,mid);
    build(s[p].r,mid+1,r);
    pushup(p);return ;
  }
  void update(LL p,LL x,LL d1,LL d2,LL l,LL r){
    if(l==r){s[p].d1=d1;s[p].d2=d2;return ;}
    LL mid=(l+r)>>1;
    if(x<=mid)update(s[p].l,x,d1,d2,l,mid);
    else update(s[p].r,x,d1,d2,mid+1,r);
    pushup(p);return ;
  }
  LL query_d1(LL p){return s[p].d1;}
  LL query_d2(LL p){return s[p].d2;}
}
LL rt[N],lim[N],id[N];
void DFS(LL x){
  //  cout<<"> DFS: x = "<<x<<endl;
  if(!vis[x]){dp[x][0]=1;dp[x][1]=0;dp[x][2]=0;}
  else {dp[x][0]=1;dp[x][1]=1;dp[x][2]=0;}
  for(LL i=head[x];i;i=e[i].nxt){
    if(e[i].to==fa[x])continue;
    DFS(e[i].to);LL y=e[i].to;
    LL dp0=dp[x][0],dp1=dp[x][1],dp2=dp[x][2];
    dp[x][0]=(dp0*dp[y][0]%mod);
    dp[x][1]=(dp1*(dp[y][0]+dp[y][1])%mod*inv2%mod);
    dp[x][2]=(dp2*dp[y][0]%mod+dp0*dp[y][1]%mod*inv2%mod+dp0*dp[y][2]%mod)%mod;
    if(y!=son[x]){id[y]=++lim[x];}
  }
  assert(dp[x][0]==1);
  //  cout<<" x = "<<x<<" lim[x] = "<<lim[x]<<endl;
  SGT::build(rt[x],1,lim[x]);
  for(LL i=head[x];i;i=e[i].nxt){
    if(e[i].to==fa[x]||e[i].to==son[x])continue;
    LL y=e[i].to;
    SGT::update(rt[x],id[y],(1+dp[y][1])*inv2%mod,(dp[y][2]+dp[y][1]*inv2)%mod,1,lim[x]);
  }
  return ;
}
mat make(LL x){
  LL dp1=SGT::query_d1(rt[x]),dp2=SGT::query_d2(rt[x]);
  if(!vis[x])dp1=0ll;
  //  cout<<"> x = "<<x<<" dp0 = "<<1<<" dp1 = "<<dp1<<" dp2 = "<<dp2<<endl;
  return (mat){{{1,0,0},{0,dp1,0},{dp2,0,1}}};
}
namespace seg{
  struct node{LL l,r;mat d;}s[N<<2];
  void pushup(LL p){s[p].d=s[p*2].d+s[p*2+1].d;}
  void build(LL p,LL l,LL r){
    s[p].l=l;s[p].r=r;
    if(l==r){s[p].d=make(seq[l]);return ;}
    LL mid=(l+r)>>1;
    build(p*2,l,mid);
    build(p*2+1,mid+1,r);
    pushup(p);return ;
  }
  void update(LL p,LL x){
    if(s[p].l==s[p].r){s[p].d=make(seq[s[p].l]);return ;}
    LL mid=(s[p].l+s[p].r)>>1;
    if(x<=mid)update(p*2,x);
    else update(p*2+1,x);
    pushup(p);return ;
  }
  mat query(LL p,LL l,LL r){
    if(l<=s[p].l&&s[p].r<=r)return s[p].d;
    LL mid=(s[p].l+s[p].r)>>1;
    if(r<=mid)return query(p*2,l,r);
    if(mid<l)return query(p*2+1,l,r);
    return (query(p*2,l,r)+query(p*2+1,l,r));
  }
}
void update(LL x){
  while(x){
    seg::update(1,dfn[x]);
    if(fa[pf[x]]){
      mat vl=seg::query(1,dfn[pf[x]],ed[pf[x]]);
      SGT::update(rt[fa[pf[x]]],id[pf[x]],(1+(vl.a[1][0]+vl.a[1][1]))*inv2%mod,((vl.a[2][0]+vl.a[2][1])+(vl.a[1][0]+vl.a[1][1])*inv2)%mod,1,lim[fa[pf[x]]]);
    }
    x=fa[pf[x]];
  }
  return ;
}
LL query(){
  //  mat vl=seg::query(1,dfn[1]+1,ed[1]);
  /*  cout<<" vl.n = "<<vl.n<<" vl.m = "<<vl.m<<endl;
  for(LL i=0;i<vl.n;i++){
    for(LL j=0;j<vl.m;j++)
      cout<<vl.a[i][j]<<" ";
    cout<<endl;
  }*/
  mat v=seg::query(1,dfn[1],ed[1]);
  /*  cout<<"> query: "<<endl;
  for(LL i=0;i<3;i++){
    for(LL j=0;j<3;j++)
      cout<<v.a[i][j]<<" ";
    cout<<endl;
  }*/
  return domod((v.a[1][0]+v.a[1][1])%mod+(v.a[2][0]+v.a[2][1])%mod);
}
int main(){
  n=read();
  for(LL i=1;i<=n;i++)a[i]=read();
  for(LL i=1;i<n;i++){
    LL u=read(),v=read();
    add_e(u,v);add_e(v,u);
  }
  dfs(1);dfs2(1,1);
  DFS(1);seg::build(1,1,n);
  for(LL i=1;i<=n;i++)ord[i]=i;
  sort(ord+1,ord+n+1,cmp);
  LL ans=0;
  //  cout<<" query() = "<<query()<<endl;
  LL base=1;
  for(LL i=1;i<n;i++)base=(base*2ll)%mod;
  for(LL l=1,r=0;l<=n;l=r+1){
    r=l;while(r<n&&a[ord[r+1]]==a[ord[l]])r++;
    for(LL i=l;i<=r;i++){vis[ord[i]]=true;update(ord[i]);}
    LL SUM=query()*base%mod;
    addmod(ans,SUM*(a[ord[r]]-a[ord[r+1]])%mod);
    /*    cout<<" SUM = "<<SUM<<" l = "<<l<<" r = "<<r<<" a[ord[l]] = "<<a[ord[l]]<<endl;
    for(LL i=1;i<=n;i++)
      cout<<vis[i]<<" ";
    cout<<endl;
    for(LL i=1;i<=n;i++)
      cout<<" i = "<<i<<" dp[i][0] = "<<dp[i][0]<<" dp[i][1] = "<<dp[i][1]<<" dp[i][2] = "<<dp[i][2]<<" son[i] = "<<son[i]<<endl;
    cout<<endl;
    for(LL x=1;x<=n;x++){
      cout<<" x = "<<x<<" seq[x] = "<<seq[x]<<endl;
      mat v=seg::query(1,x,x);
      for(LL i=0;i<3;i++){
	for(LL j=0;j<3;j++)
	  cout<<v.a[i][j]<<" ";
	cout<<endl;
      }
      cout<<endl;
    }
    cout<<endl;*/
  }
  writeln(ans);
  return 0;
}
/*
my hack data:
input:
3
2 1 1 
1 2
2 3
output:
10
*/