关闭

26790: 树的数量

96人阅读 评论(0) 收藏 举报
分类:
题目描述
输入森林中的结点关系,统计森林中树的数量,输出树的根。
输入
第一行:n:结点数量;k:边数;(n,k<=100)
以下k行:每行两个结点编号:i,j:i是j的父结点(I,j<=100)。
输出
输出:
第一行:树的数量。
第二行:依次输出森林中树的根结点编号(从小到大)。
样例输入
9 7
1 2
2 3
4 6
4 5
7 8
9 1 
9 4

样例输出
2
7 9

题目描述

输入森林中的结点关系,统计森林中树的数量,输出树的根。

输入

第一行:n:结点数量;k:边数;(n,k<=100
以下k行:每行两个结点编号:ijij的父结点(I,j<=100)

输出

输出:
第一行:树的数量。
第二行:依次输出森林中树的根结点编号(从小到大)。

样例输入

9 7
1 2
2 3
4 6
4 5
7 8
9 1 
9 4

样例输出

2
7 9
program p26790;
var f:array[1..100]of longint;
    i,j,k,m,n,t,x,y,p,q:longint;
begin
 readln(n,k);
 for i:=1 to n do f[i]:=0;
 for i:=1 to k do
  begin
   readln(x,y);
   f[y]:=x;
  end;
 t:=0;
 for i:=1 to n do if f[i]=0 then inc(t);
 writeln(t);
 for i:=1 to n do if f[i]=0 then
 write(i,' ');
end.
0
0

查看评论
* 以上用户言论只代表其个人观点,不代表CSDN网站的观点或立场
    个人资料
    • 访问:15096次
    • 积分:108
    • 等级:
    • 排名:千里之外
    • 原创:91篇
    • 转载:0篇
    • 译文:0篇
    • 评论:0条
    文章分类
    文章存档