... G : s 0 A= u 0 v t s u v t Tương tự từ mạng G’: u- u- s+ s- t- t+ + v v- Ta có ma trận biểu diễn mạng G’ sau: A’ = s+ 0000 s- u+ 0000000 u - v+ 000000 v- t+ t0 0000000 s+ su+ ... đại cho mạng G’ ta mạng cực đại ma trận biểu diễn sau: C= s+ 0000 s- u+ 0000000 u - v+ 000000 v- t+ t0 0000000 s+ su+ uv+ vt+ t- Với Val(f*) = Bài toán luồng cực đại mạng ... 6 ,0 5 ,0 c 5 ,0 7 ,0 9 ,0 a(s+,6) b(a+,6) 5 ,0 c(s+,4) 5 ,0 3 ,0 9 ,0 d(s+,7) a 4,4 4 ,0 c 5 ,0 t 3 ,0 a(s+,2) 7,4 6,4 12 ,0 e 9 ,0 d + Bước lặp 2: s → a → b → c → e → t, δ2 = 5 ,0 b(a+,2) 4 ,0 4 ,0 7 ,0 12,0...
... G : s 0 A= u 0 v t s u v t Tương tự từ mạng G’: u- u- s+ s- t- t+ + v v- Ta có ma trận biểu diễn mạng G’ sau: A’ = s+ 0000 s- u+ 0000000 u - v+ 000000 v- t+ t0 0000000 s+ su+ ... đại cho mạng G’ ta mạng cực đại ma trận biểu diễn sau: C= s+ 0000 s- u+ 0000000 u - v+ 000000 v- t+ t0 0000000 s+ su+ uv+ vt+ t- Với Val(f*) = Bài toán luồng cực đại mạng ... 6 ,0 5 ,0 c 5 ,0 7 ,0 9 ,0 a(s+,6) b(a+,6) 5 ,0 c(s+,4) 5 ,0 3 ,0 9 ,0 d(s+,7) a 4,4 4 ,0 c 5 ,0 t 3 ,0 a(s+,2) 7,4 6,4 12 ,0 e 9 ,0 d + Bước lặp 2: s → a → b → c → e → t, δ2 = 5 ,0 b(a+,2) 4 ,0 4 ,0 7 ,0 12,0...
... var m:array[1 200 ,1 200 ] of byte; a,b,c,dt:array[1 200 ] of byte; s:string; n:byte; f:text; time:longint; tich:longint absolute 0: $46c; procedure input; var i,j:byte; begin ... fillchar(a,sizeof(a) ,0) ; fillchar(b,sizeof(b) ,0) ; fillchar(dx,sizeof(dx) ,0) ; max: =0; for i:=1 to n for j:=1 to n if m[i,j]>max then max:=m[i,j]; repeat max1: =0; for i:=1 to n for j:=1 to n if (dx[i,j] =0) and ... until j =0; goto done; end; end; until s=''; done: end; writeln(tich-time); assign(f,fo); rewrite(f); k: =0; for i:=1 to n if a[i]< >0 then inc(k); writeln(f,k); for i:=1 to n if a[i]< >0 then writeln(f,i,'...
... InputFile=’Input.Txt’; OutputFile=’Output.Txt’; Var a,x:Array[1 100 ,1 100 ]of Integer; TraceX,TraceY:Array[1 100 ]of Integer; p:Array[1 100 ]of Integer; Start,Finish,n,m,s,t,Delta,No:Integer; fi,fo:Text; ... FunctionFindPath:Boolean; Var Queue:Array[1 100 ]of Integer; i,j,First,Last,v:Integer; Begin Fillchar(TraceX,Sizeof(TraceX) ,0) ; Fillchar(TraceY,Sizeof(TraceY) ,0) ; First:=1;Last: =0; For i:=1 to m If x[s,i] inc(last); ... i:=Queue[First];Inc(first); For j:=1 to n If (traceY[j] =0) and(x[i,j] traceY[j]:=i; If x[j,t] Finish:=j; FindPath:=True; Exit; end; For v:=1 to m if (TraceX[v] =0) and(x[v,j] >0) then begin Inc(Last); Queue[Last]:=v;...
... luong.inp 616 03 400 000 03 20 0 100 30 000 004 00000 3 000000 luong.out 03 300 0000 300 00 003 000000 3 00000 3 000000 Nội dung chương trình sau: var vt,e,p:array [1 50] of integer; c, f:array [1 50, 1 50] of byte; ... (c[u,v] > 0) and (f[u,v] < c[u,v]) then Begin p[v]:=u; e [v]:=min{ e [u],c[u,v]-f[u,v]}; VT:=VT hợp {v};(*nạp v vào danh sách đỉnh có nhãn*) If v=t then exit; End; If (c[u,v] > 0) and (f[u,v] > 0) then ... begin if (c[u,v] >0) and(f[u,v] begin p[v]:=u;e[v]:=e[u]; if e[v]>c[u,v]-f[u,v] then e[v]:=c[u,v]-f[u,v]; l:=l+1;vt[l]:=v;vt1:=vt1+[v]; if v=t then exit; end; if (c[v,u] >0) and(f[v,u] >0) then begin p[v]:=-u;e[v]:=e[u];...
... Qu,Qt,Qd:mang1; begin fillchar(Qu,sizeof(Tx) ,0) ; fillchar(Qd,sizeof(Tx) ,0) ; fillchar(Qt,sizeof(Tx) ,0) ; fillchar(Tx,sizeof(Tx) ,0) ; fillchar(Ty,sizeof(Ty) ,0) ; f:=1; r:=1; Qu[r]:=i; Tx[i]:=-1; Qt[r]:=1; ... j:=1 to M if L[i,j] >0 then writeln(f,i,' ',j,' ',L[i,j]:5); end; close(f); end; (*********************) begin nhap; xuly; inkq; end Một số toán Bài toán (Đề thi HSGQG 200 0 Bảng A) Có N công nhân ... đường tr[j] =0 tức đỉnh j chưa thăm procedure find(x); begin queue := ∅ tr[j] := với j ; put(x); repeat get(i); for j := to n if (tr[j] = 0) and (i,j) thuộc E then tr[j] := i; if my[j] =0 then begin...
... tác động chọn theo nguyên tắc bậc thang vượt giới hạn cho phép III.3 Độ nhạy: Độ nhạy bảo vệ bị hạn chế phải chọn dòng khởi động lớn dòng làm việc cực đại Ilv max có kể đến hệ số mở máy kmm động ... BVCN phía A tác động * Ngắn mạch đoạn lCNB có BVCN phía B tác động * Khi ngắn mạch đoạn BVCN tác động Tuy nhiên (lCNA + lCNB) > l ngắn mạch đoạn hai BVCN tác động ** Hiện tượng khởi động không đồng ... rơle RU không khởi động bảo vệ tác động Rõ ràng không kể đến hệ số kmm dòng khởi động bảo vệ dòng có kiểm tra áp nhỏ nhiều so với dòng khởi động bảo vệ dòng cực đại tương ứng độ nhạy nâng cao đáng...
... tình, giúp cho hoàn thành thực tập Nha Trang, 10/ 200 3 TÀI LIỆU THAM KHẢO [1] Đinh Mạnh Tường - Đỗ Xuân Lôi - Cấu trúc liệu giải thuật – NXBTK.19 90 [2] Nguyễn Đức Nghĩa - Nguyễn Tô Thành – Toán ... dt t- Giải toán Từ mạng G = (V,E) khả thông qua cung đỉnh Ta giải theo hai bước sau: 10 Xác định mạng G’ 20 Tìm luồng cực đại mạng G’ Bắt đầu từ luồng zero với khả thông qua cung Hai bước ta biểu ... hiệu kinh tế Bài toán luồng cực đại mạng có nhiều ứng dụng thực tế như: Bài toán xác định cường độ dòng lớn dòng vận tải hai nút đồ giao thông, toán tìm luồng dầu lớn bơm từ tàu chở dầu vào bể...
... 1(13)/ 200 6, 53-58 [2] Trần Quốc Chiến ( 200 6), Thuật toán hoán chuyển nguồn đích tìm luồng cực đại (2), Tạp chí Khoa học & Công nghệ, Đại học Đà Nẵng, 3(15)-4(16)/ 200 6, 77-82 [3] Trần Quốc Chiến ( 200 5), ... trình Lý thuyết đồ thị, Đại học Đà Nẵng 200 5 [4] Đoàn Văn Ban, Nguyễn Mậu Hân ( 200 2), Xử lý song song & phân tán, Viện Công nghệ Thông tin [5] Lê Minh Hoàng ( 200 2), Giải thuật & lập trình, Đại học ... Anh Thư (chủ biên - 200 2), Giáo trình Thuật toán, Nhà xuất Thống kê [8] L R Ford and D R Fulkerson (1962), Flows in Networks, Princeton University [9] Reihard Diestel ( 200 5), Graphic Theory,...
... luồng đơn giản mà |ƒ*| lớn Một luồng cực đại mạng có giá trị 2 ,00 0 ,00 0: 1 ,00 0 ,00 0 đơn vị luồng băng ngang lộ trình s → u → t, 1 ,00 0 ,00 0 đơn vị khác băng ngang lộ trình s → v → t Nếu lộ trình tăng ... Ta thực tổng 2 ,00 0 ,00 0 lần tăng cường, lần tăng giá trị luồng lên đơn vị Có thể cải thiện cận FORD-FULKERSON ta thực thi phép tính lộ trình tăng cường p dòng thuật toán tìm kiếm độ rộng đầu tiên, ... chu trình p = ( v0, v1, …, vk ), v0 = vk k >0 Bởi cạnh p chấp nhận được, ta có h (vi) = h(vi) +1 với i = 1,2, … k Tổng cộng quanh chu trình cho ta Nhóm - Lớp KHMT B 201 0- 201 2 50 ...
... với E b/N0 trung bình anten nhận cho khoảng trễ khác Các mô sử dụng cho hệ thống a(2,2) ( ví dụ hệ thống a với cấu hình anten (Nt,Nr)=(2,2) liệu mã hóa với tốc độ ½ mã chập TG= 800 ns Tốc độ bit ... chỉnh lỗi qua sóng mang phụ sử dụng với tốc độ mã hóa thay đổi, cho trước tốc độ mã hóa thay đổi từ tới 54 Mbps Mã chập thực với tốc độ chuẩn công nghệ 1/2, độ dài mã cưỡng với đa thức sinh (133,171) ... dựa công nghệ OFDM chuẩn IEEE 802 .11a Điều chế Tốc độ mã hóa Số sóng mang phụ Số sóng mang phụ sử dụng Thời gian tồn ký hiệu QPSK ½ 64 48 µs OFDM Khoảng bảo vệ 800 ns B.Mô kết Các mô sử dụng cho...
... A= s 0 u 0 44 v t s u v t Tương tự từ mạng G’: u- u- + t+ - s s t6 v+ v- Ta có ma trận biểu diễn mạng G’ sau: s+ 0000 A’ = s- u+ 0000000 u- v+ 000000 v- t+ t0 0000000 s+ su+ ... cực đại cho mạng G’ ta mạng cực đại ma trận biểu diễn sau: C= s+ 0000 s- u+ 0000000 u- v+ 000000 v- t+ t0 0000000 s+ su+ uv+ vt+ t- Với Val(f*) = III MỘT SỐ HÀM VÀ THỦ TỤC CỦA ... 7 ,0 6 ,0 5 ,0 4 ,0 4 ,0 s c 5 ,0 7 ,0 + Bước lặp 1: s → a → b → t, δ1 = 9 ,0 a(s+,6) 5 ,0 3 ,0 9 ,0 a 4 ,0 4,4 c 5 ,0 d 12 ,0 b 5 ,0 4 ,0 t(e+,2) e(d+,4) 7,4 6,4 7 ,0 4 ,0 4 ,0 c(s+,4) d(s+,7) s b(a+,6) 5 ,0 7,0...
... cận điểm x0 (có thể trừ x0) 1) Nếu f’(x) > khoảng (x0 - ;x0); f’(x) < khoảng (x0 ;x0+ ) x0 điểm cực đại hàm số f(x) 2) Nếu f’(x) < khoảng (x0 - ;x0); f’(x) > khoảng (x0 ;x0+ ) x0 điểm cực ... f(x) có đạo hàm liên tục tới cấp Tại x0 f’(x0) = 0, f’’(x0) x0 điểm cực trò hàm số Hơn nữa, 1) Nếu f’’(x0) > thò x0 điểm cực tiểu 2) Nếu f’’(x0) < thò x0 điểm cực đại Qui tắc II để tìm điểm ... điểm x0 (a;b) a) V( ) = (x0 - ; x0+ ), > gọi lân cận điểm x0 b) Điểm x0 gọi điểm cực đại hàm số y = f(x) với x thuộc lân cận V() (a;b) điểm x0, ta có Kí hiệu fCĐ = f(x0) f(x) < f(x0)...
... thứ tự (v,v 0) , (v0,v), (v,v1),(v1,v) w chưa mang nhãn Với cung dạng (v,w), fvw < cvw, đặt nhãn đỉnh w (v, {∆, cvw - fvw}), fvw = cvw , không đặt nhãn đỉnh w Với cung dạng (w, v), fwv >0, đặt nhãn ... (c[u,v] >0) and (f[u,v]< c[u,v]) then begin p[v]:= u; ε[v]:= { ε[u],c[u,v] – f[u,v]}; VT = VT ∪ {v}; (* Nạp v vào danh sách đỉnh có nhãn *) If v=t then exit; end; if (c[v,u] >0) and (f[v,u] >0) then ... u ⇐ VT; For v∈V\VT False C[u,v] >0 and (F[u,v]0 and F[v,u] >0 True P[v]:= -u; ε[v]:= min{ε[u],F[v,u]}...
... cận điểm x0 1/Nếu f(x) đổi dấu từ dơng sang âm x qua x0 x0 điểm cực đại 2/Nếu f(x) đổi dấu từ âm sang dơng x qua x0 x0 điểm cực tiểu Bảng biến thiên thể tính chất cực trị x x0 - x0 x0 + F(x ... F(x + ) Cực đại f(x) x x0 - F(x ) x0 + - x0 + định (a ; b) - Nhận xét tiếp tuyến với đồ thị hàm số điểm cực trị ? - Hệ số góc tiếp tuyến ? Có quan hệ với trục toạ độ ? - Điểm cực trị có điểm ... Chứng minh : Sgk ý nghĩa hình học định lý Fecmar: Nếu f(x) có đạo hàm x0 đạt cực trị tiếp tuyến điểm (x0 ; f(x0)) song song với trục hoành Hệ quả: Mọi điểm cực trị hàm số y = f(x) điểm tới...