вторник, 31 марта 2009 г.

"Процессууд" бодлогын бодолт

shagai



var
a:array [1..200,1..200] of integer;
used,p:array [1..200] of boolean;

n,m,i,j,s,f,max,t,sol:integer;
d:boolean;
begin
{assign(input,'in.put');reset(input);}
readln(n,m);
for i:=1 to m do
begin
readln(s,f);
a[f,s]:=1;
end;

m:=n;max:=0;
while m>0 do
begin
inc(sol);
t:=0;
for i:=1 to n do
if not used[i] then
begin
d:=true;
for j:=1 to n do
if (a[i,j]<>0) and (not used[j]) then d:=false;
p[i]:=d;
if d then begin inc(t); dec(m); end;
end;
for j:=1 to n do begin used[j]:=used[j] or p[j]; p[j]:=false; end;
if max<t then max:=t;
end;
max:=1;
while max*sol<n do inc(max);
writeln(sol,' ',max);
end.

1 комментарий:

B.Tserenchimed комментирует...

Buruu bodolt baina.

Сайтад оролцогч сургуулиуд (45)

  • 11-р сургууль
  • 24-р сургууль
  • 27-р сургууль
  • 6-р сургууль
  • 84-р сургууль
  • Aptech сургалтын төв
  • DaTS
  • Dhaka City College
  • Dickinson State University
  • DMTS
  • Huree-ICT
  • Huwsgul MGS
  • Japan TUT
  • MCS
  • MUENCHEN UNI
  • MUST-EHIS
  • NUM-SMCS
  • Osaka University
  • Progress
  • shine-ireedui
  • SHUTIS, HMTS
  • STS
  • Ulaangom College
  • USI MC
  • Баянхонгор аймгийн Номгон сургууль
  • Бээжингийн их сургууль
  • Дармштадтын технологийн их сургууль
  • Дархан хотын RGB 26-р дунд сургууль
  • Дорнод аймгийн 1-р сургууль
  • Калифорнийн их сургууль
  • Массачусетсийн технологийн их сургууль
  • МУБИС
  • МУҮИС
  • МУҮИС МКС
  • МУҮИС МТС
  • Ражив Гандийн нэрэмжит Үйлдвэр урлалын сургууль
  • Сант
  • Токиогийн их сургууль
  • Улаанбаатарын Монгол-Туркийн сургууль
  • Хөвсгөл аймгийн Ирээдүй сургууль
  • Шинэ Монгол
  • Шинэ үе
  • ШУТИС КтМС
  • Эм Ай Ю олон улсын дээд сургууль
  • Эрдэнэтийн Монгол-Туркийн сургууль