Tài liệu Giáo trình toán rời rạc - Phụ lục 1 doc

Tài liệu Giáo trình toán rời rạc - Phụ lục 1 docx

... then exit;TL:=BanKinh/L;Q1.X:=round(T1.x+DX*TL);Q1.Y:=round(T1.y+DY*TL);Q2.X:=round(T2.x-DX*TL);Q2.Y:=round(T2.y-DY*TL);T1:=Q1;T2:=Q2;DX:=T2.x-T1.x;DY:=T2.y-T1.y;L:=sqrt(DX*DX+DY*DY);If ... Dx,Dy:integer;beginDx:=T2.x -T1.x ;Dy:=T2.y -T1.y ;MidPoint.x:=T1.x +Round(Dx*PhanTram /10 0);MidPoint.y:=T1.y +Round(Dy*PhanTram /10 0);end;Procedure Veline(T1,T2:TypeToaDo;Gia:real;Pic:Tbitmap;LineColor:Tcolor;TimeDelay:TdateTime);var ... delete(st ,1, L);L:=length(st);end;P:=pos('.',st);i:=L;If P=0 then exit;while (i>P)and(st[i]='0') do i:=i -1 ; 14 1If st[i]='.' then i:=i -1 ; delete(St,i +1, L-i);end;Function...

Tài liệu Giáo trình toán rời rạc - Phụ lục 2 doc

... ok:boolean; a1,b1,k1,l1:real; t,t1,i:integer; BEGIN for i:=0 to L_G1.sodinh -1 do L_p1[i]: = -1 ; L_p1[0]:=0; L_nhan[0]:=true; L_e[0]:=vocung; L_v:=[0] ; L_v1:=[0]; L_pathfound:=true; ... (x<=L_G1.sodinh -1 ) and (ok=true) do Begin If x in L_v then ok:=false Else x:=x +1; End; L_v:=L_v-[x]; For y:=0 to L_G1.sodinh -1 do If L_p1[y] = -1 then Begin L_giatri(L_G1,x,y,t,a1,b1); ... L_giatri(L_G1,x,y,t,a1,b1); {a:=c[x,y],b:=f[x,y]} L_giatri(L_G1,y,x,t1,k1,l1); {k:=c[y,x],l:=f[y,x]} If (a1>0) and (b1<a1) then Begin L_p1[y]:=x; L_nhan[y]:=true; L_e[y]:=L_min(L_e[x],a1-b1); ...

Tài liệu Giáo trình toán rời rạc - Phụ lục 2 pdf

... tam:=tam +1; if tam> ;1 then L_inc_flow(L_G1) else stop:=true; end; f:=0; for y:= 0 to L_G1.sodinh -1 do begin L_giatri(L_G1,0,y,t1,a1,b1); f:=f+b1; end; for y:=0 to L_G1.Socanh -1 do ... xet; 16 4 }VAR x,y:integer; ok:boolean; a1,b1,k1,l1:real; t,t1,i:integer; BEGIN for i:=0 to L_G1.sodinh -1 do L_p1[i]: = -1 ; L_p1[0]:=0; L_nhan[0]:=true; L_e[0]:=vocung; L_v:=[0] ; L_v1:=[0]; ... L_G1:L_typedothi); { tang luong theo duong tang } 16 7 var x,y,t,t1:integer; tang,a,k:real; s,s1,s2,s3,s4:string; ok:boolean; begin x:=L_G1.sodinh -1 ; y:=L_G1.sodinh -1 ; tang:=L_e[L_G1.sodinh -1 ] ;...

Tài liệu Giáo trình toán rời rạc - Chương 5 ppt

... ∞∞∞∞∞∞040 013 04322 412 22900053 513 152429 013 1 10 1402 711 .∞∞∞∞∞00 013 022 412 22900 513 15242 913 1 →M’’ = ∞∞∞∞∞00 013 022 412 22900 513 15232 812 0.Tổng ... sau:∞∞∞∞∞∞874325346294 414 212 02 714 23073 311 222334 216 9243 214 4525.87v8v9v 10 v 11 15 12 2024 1 3022220L(a) L(b) L(c) L(d) L(e) L(g) L(h) L(k) L(m) L(n)5 .1. 4. Định lý: Thuật toán Dijkstra ...  1 429243 14 27, W2 = 2 51 1042925843 14 8 211 7W3 = 82 51 510 4292 11 5843 714 14 8 211 7, W4...

Tài liệu Giáo trình toán rời rạc - Loi noi dau + Muc luc doc

... toán 4 1. 2. Thuật toán tìm kiếm 5 1. 3. Độ phức tạp của thuật toán 7 1. 4. Số nguyên và thuật toán 12 1. 5. Thuật toán đệ quy 17 Bài tập Chương I 19 Chương II: Bài toán đếm 222 .1. Cơ sở của phép ... học ngànhPhương pháp giảng dạy Toán, chúng tôi mạnh dạn viết giáo trình Toán rời rạc trong khitrên thị trường sách có khá nhiều tài liệu liên quan đến Toán rời rạc. Điều mà chúng tôimong muốn ... chỉ giáo của các đồng nghiệp và độc giả về nhữngthiếu sót khó tránh khỏi của cuốn sách.Mùa Thu năm 2003MỤC LỤC 1 Lời nói đầu 1 Mục lục 2Chương I: Thuật toán 4 1. 1. Khái niệm thuật toán 4 1. 2....

Xem thêm