Hướng dẫn giải của Người đưa thư


Chỉ dùng lời giải này khi không có ý tưởng, và đừng copy-paste code từ lời giải này. Hãy tôn trọng người ra đề và người viết lời giải.
Nộp một lời giải chính thức trước khi tự giải là một hành động có thể bị ban.

Lưu ý: Các code mẫu dưới đây chỉ mang tính tham khảo và có thể không AC được bài tập này

Code mẫu của flashmt

#include<iostream>
using namespace std;
int n,m,a[211][211],st[2000],re[2000],last,cnt;

int main()
{
    int i,x,y;
    cin >> n >> m;
    for (i=1;i<=n;i++) cin >> x;
    for (i=1;i<=m;i++)
    {
        cin >> x >> y;
        a[x][y]++; a[y][x]++;
    }
    st[1]=1; last=1; cnt=0;
    while (last>0)
    {
        x=st[last]; y=0;
        for (i=1;i<=n;i++)
          if (a[x][i])
          {
             last++; st[last]=i;
             a[x][i]--; a[i][x]--;
             y++; break;
          }
        if (y) continue;
        cnt++; re[cnt]=x; last--;
    }
    cout << cnt-1 << endl;
    for (i=1;i<=cnt;i++) cout << re[i] << " ";
    return 0;
}

Code mẫu của ladpro98

#include <bits/stdc++.h>

const int N = 202;

using namespace std;

vector<pair<int, int> > a[N];
bool was[N * N];
int n, m;

void dfs(int u) {
  while (!a[u].empty()) {
    int v = a[u].back().first;
    int edgeID = a[u].back().second;
    if (was[edgeID]) {
      a[u].pop_back();
      continue;
    }
    was[edgeID] = 1;
    dfs(v);
  }
  cout << u << ' ';
}

int main() {
  ios::sync_with_stdio(0); cin.tie(0);
#ifdef _LAD_
  freopen("NKPOS.txt", "r", stdin);
#endif // _LAD_
  cin >> n >> m;
  int u, v, w;
  for (int i = 1; i <= n; ++i)
    cin >> w;
  for (int i = 1; i <= m; ++i) {
    cin >> u >> v;
    a[u].push_back({v, i});
    a[v].push_back({u, i});
  }
  cout << m << '\n';
  dfs(1);
  return 0;
}

Code mẫu của RR

{$R+,Q+}
const
  FINP='';
  FOUT='';
  MAXN=222;
var
  n,m:longint;
  c:array[1..MAXN,1..MAXN] of integer;
  stack,kq:array[1..MAXN*MAXN] of longint;
procedure inp;
var
  f:text;
  i,a,u,v:longint;
begin
  assign(f,FINP); reset(f);
  read(f,n,m);
  for i:=1 to n do read(f,a);
  for i:=m downto 1 do
    begin
      read(f,u,v);
      inc(c[u,v]); inc(c[v,u]);
    end;
  close(f);
end;
procedure ans;
var
  f:text;
  i:longint;
begin
  assign(f,FOUT); rewrite(f);
  writeln(f,m);
  for i:=1 to m do
    write(f,kq[i],' ');
  writeln(f,kq[1]);
  close(f);
end;
procedure solve;
var
  sl,top,i,u,v:longint;
begin
  top:=1; stack[1]:=1; sl:=0;
  while top>0 do
    begin
      u:=stack[top];
      v:=0;
      for i:=1 to n do
        if c[u,i]>0 then
          begin
            v:=i;
            break;
          end;
      if v=0 then
        begin
          dec(top);
          inc(sl); kq[sl]:=u;
        end
      else
        begin
          dec(c[u,v]); dec(c[v,u]);
          inc(top); stack[top]:=v;
        end;
    end;
end;
begin
  inp;
  solve;
  ans;
end.

Code mẫu của hieult

#include <stdio.h>
//#include <conio.h>

int main()
{
    //freopen("NKPOS.in","r",stdin);
    int n,m,x,y,a[201][201],d[201],u,q[100000];
    scanf("%d %d",&n,&m);
    for(int i = 1;i<=n;i++) scanf("%d",&x);
    for(int i = 1;i<=n;i++)
    {
        d[i] = 0;
        for(int j = 1;j<=n;j++)
            a[i][j] = 0;
    }
    for(int i = 1;i<=m;i++) 
    {
        scanf("%d %d",&x,&y);
        a[x][y] ++;
        a[y][x] ++;
        d[x]++;
        d[y]++;
    }
    int top = 1; q[1] = 1;
    printf("%d\n",m);
    do
    {
        u = q[top];
        int flag = 0;
        for(int v = 1;v<=n;v++)
        {
            if(a[u][v]>0)
            {
                 a[u][v]--;
                 a[v][u]--;
                 top++;
                 q[top] = v;
                 flag = 1;
                 break;

            }
        }
        if(flag == 0)
            {
                 printf("%d ",u);
                 top--;
            }   
    }while(top!=0);
    //getch();
}

Code mẫu của ll931110

program NKPOS;
const
  input  = '';
  output = '';
  maxn = 200;
  maxe = 200000;
var
  n,m: longint;
  c: array[1..maxn] of longint;
  a: array[1..maxn,1..maxn] of longint;
  stack: array[1..maxe] of longint;
  top: longint;

procedure init;
var
  f: text;
  i,u,v: longint;
begin
  assign(f, input);
    reset(f);

  readln(f, n, m);
  for i := 1 to n do readln(f, c[i]);

  fillchar(a, sizeof(a), 0);
  for i := 1 to m do
    begin
      readln(f, u, v);
      inc(a[u,v]);  inc(a[v,u]);
    end;

  close(f);
end;

procedure push(x: longint);
begin
  inc(top);  stack[top] := x;
end;

function pop: longint;
begin
  pop := stack[top];  dec(top);
end;

function get: longint;
begin
  get := stack[top];
end;

procedure solve;
var
  f: text;
  u,v: longint;
begin
  assign(f, output);
    rewrite(f);

  writeln(f, m);

  top := 1;  stack[1] := 1;
  while top <> 0 do
    begin
      u := get;

      for v := 1 to n do
        if (u <> v) and (a[u,v] > 0) then
          begin
            dec(a[u,v]);  dec(a[v,u]);
            push(v);
            break;
          end;

      if u = get then
        begin
          v := pop;
          write(f, v, ' ');

          while a[v,v] > 0 do
            begin
              write(f, v, ' ');
              a[v,v] := a[v,v] - 2;
            end;
        end;
    end;
  close(f);
end;

begin
  init;
  solve;
end.

Bình luận

Hãy đọc nội quy trước khi bình luận.


Không có bình luận tại thời điểm này.