Đệ Qui Trong Pascal - Sách Giải

Trang chủ » Tỉa Mảng Pascal » Đệ Qui Trong Pascal - Sách Giải

Có thể bạn quan tâm

sach-giai-logo
  • Môn học
    • Toán học
    • Văn học
    • Vật lý
    • Hoá học
    • Lịch sử
    • Địa lý
    • Anh văn
    • Công nghệ
    • Sinh học
    • Tin học
    • Âm nhạc
    • Mĩ thuật
    • Thể dục
    • Công dân
    • Khoa học
    • Y khoa
    • Ngoại khoá
    • Gương sáng
    • Đề thi, đáp án
    • Thơ văn
    • Đề tài
    • Dạy và học
  • Sách
  • Hỏi đáp
  • Văn bản
  • Tìm kiếm
  • vnedu tra cứu điểm

.

phần mềm tính tiền karaoke vietbill ⇔ kèo nhà cái hôm nay ⇔ Fun88
  • Trang nhất
  • Tin học
Đệ qui trong Pascal 2020-08-06T20:45:07+07:00 https://sachgiai.com/Tin-hoc/de-qui-trong-pascal-13459.html https://sachgiai.com/uploads/news/2020_07/lap-trinh-pascal.jpg Sách Giải Thứ năm - 06/08/2020 20:42 - Một đối tượng gọi là đệ qui nếu có bao gồm chính nó như một bộ phận hoặc nó được định nghĩa dưới dạng chính nó. 1. KHÁI NIỆM - Một đối tượng gọi là đệ qui nếu có bao gồm chính nó như một bộ phận hoặc nó được định nghĩa dưới dạng chính nó. ■ Ví dụ: a) Số tự nhiên: • 1 là một số tự nhiên. • X là số tự nhiên nếu x - 1 là số tự nhiên. b) Hàm n giai thừa: n ! • 0 ! = 1 • Nếu n > 0 thì n ! = n(n - 1) ! 2. THỦ TỤC ĐỆ QUI - Một thủ tục được gọi là đệ qui nếu trong quá trình thực hiện nó có phần phải gọi đến chính nó nhưng với kích thước nhỏ hơn của tham số. ■ Ví dụ: Function GT (n: word) : longint; Begin if n := 0 then GT := else GT := n*GT(n - 1); end; 3. CẤU TRÚC CỦA MỘT THỦ TỤC ĐỆ QUI Một thủ tục đệ qui luôn gồm hai phần: - Phần neo: Trong đó chứa các tác động của hàm hoặc thủ tục với một sô giá trị cụ thể ban đầu của tham số. ■ Ví dụ: if n := 0 then GT := 1 - Phần hạ bậc: Trong đó tác động cần được thực hiện cho giá trị hiện thời của các tham số được định nghĩa bằng các tác động đã được định nghĩa trước đây. ■ Ví dụ: GT := n*GT(n - 1) 4. ƯU ĐIỂM CỦA ĐỆ QUI 1. Đệ qui mạnh ở chỗ có thể định nghĩa một tập rất lớn các tác động chỉ bởi một số hữu hạn các mệnh đề. 2. Rất thích hợp để giải các bài toán có bản chất đệ qui. 3. Một chương trình viết theo giải thuật có tính đệ qui sẽ mang tính “Người” hơn, do đó sẽ: - Sáng sủa. - Dễ hiểu. - Nêu bật được bản chất của vấn đề. 4. Có nhiều bài toán mà việc nghĩ ra lời giải đệ qui thường dễ hơn nhiều so với việc nghĩ ra lời giải dùng vòng lặp. 5. Khử đệ qui: - Có một số giải thuật đệ qui thuộc loại tính toán đơn giản có thể được thay thế bởi một giải thuật khác không tự gọi chúng, sự thay thế đó được gọi là khử đệ qui. - Tuy nhiên điều trên không có nghĩa là phải khử đệ qui bằng mọi giá và không nên e ngại cũng như có ác cảm với việc dùng đệ qui. ■ Ví dụ 1: Thủ tục đệ qui sau: Function GT (n: word) : longint; Begin if n := 0 then GT := 1 else GT := n * GT (n - 1); end; - Có thể được khử đệ qui như sau: Function GT (n: word): longint; Var i: word ; T: longint ; Begin T := 1 if n > 0 then For i := 1 to n do T: = t * i; GT:= T; end; Ví dụ 2: Thủ tục đệ qui Function Fib (n: integer): integer; Begin if n := 0 then Fib := 0 else if n:= 1 then Fib := 1 else Fib := Fib(n - 1) + Fib(n - 2); end; - Có thể được khử đệ qui như sau: Function Fib (n: integer): integer; Var i, x, y: integer; Begin if n := 0 then Fib := 0 else if n := 1 then Fib := else Begin i := 1; y := 0; x := 1; while i < 0 do Begin i := i + 1 x := x + y y := x - y end; Fib := x; end; end; 5. ĐỆ QUI VÀ QUAY LUI - Trong lập trình, phương pháp giải một bài toán tổng quát rất được chú ý. Đó là việc xác định các giải thuật để tìm lời giải cho một số bài toán nào đó không phải theo một luật tính toán cố định mà bằng phương pháp “thử và sai” (Try anf Error). - Thông thường là ta phân tích quá trình thử và sai thành các công việc cục bộ dưới dạng một cây tìm kiếm và ta phải từng bước duyệt cây tìm kiếm đó một cách đệ qui theo cấp của cây. - Trong nhiều bài toán, cây tìm kiếm này lớn lên rất nhanh theo hướng hàm mũ và công sức tìm kiếm cũng tăng theo với sự lớn lên của cây. - Trong thực tế ta phải tỉa cây tìm kiếm bằng các cách Heuristic và như vậy ta đã làm giảm công sức tính toán tới một giới hạn có thể chấp nhận được. - Nét đặc trưng của phương pháp này là ở chỗ các bước đi đến lời giải hoàn toàn bằng cách làm thử. Nếu có một lựa chọn được chấp nhận thì ghi nhớ các thông tin cần thiết và tiến hành các bước thử tiếp theo. Nếu trái lại không có một lựa chọn nào thích hợp cả thì làm lại bước trước, xóa bớt các ghi nhớ và quay về chu trình thử với các lựa chọn còn lại. Hành động này được gọi là quay lui (Back tracking) và các giải thuật thế hiện phương pháp này gọi là các giải thuật quay lui. - Hơn nữa nếu ở mỗi bước số những nước có thể đi là m thì ta có thể dùng một tham số để chỉ độ sâu của sự đệ qui và như thê làm đơn giản đi điều kiện dùng theo sơ đồ sau: Procedure Try (i: integer); Var j: integer; Begin if i > m then XUẤT else For j:= 1 to n do if Nhận được then: Begin Ghi nhận nó. Try (i + 1); Xóa bỏ việc ghi nhận; (quay lui} end; End; - Thủ tục trên sẽ được khởi động bởi lệnh: Try (1); ■ Ví dụ 1: (Bài toán 8 quân hậu) Một bàn cờ quốc tế là một bảng hình vuông gồm có 8 hàng, 8 cột. Quân hậu là một quân cờ có thể ăn được bất kì quân nào nằm trên cùng một hàng, cùng một cột hay cùng một dường chéo. Bài toán đặt ra là: Hãy xếp 8 quân hậu trên bàn cờ sao cho không có quân hậu nào có thể ăn quân hậu nào. Điều đó cũng có nghĩa là trên mỗi hàng, mỗi cột, mỗi dường chéo chỉ có thể có một quân hậu. Bài giải: Program EIGHT_QƯEEN; Var a: array [1..8] of integer; b: array [2.. 16] of integer; c: array [-7..7] of integer; x: array [1..8] of integer; i: integer; procedure print; var j: integer; Begin For j:= 1 to 8 do write (x[k] : 4); Writein; Readln; end; procedure Try (i: integer); var j: integer; Begin if i > 8 then prim else For j := 1 to 8 do if (a[j] = 0) and (b[i + j] = 0) and (c[i – j] = 0) then Begin x[i] := j; a[j] := 1; b[i + j]:= 1; c[i - j]:= 1 Try (+1); a[j]:= 0; b[i + j]:= 0; c[i - j]:= 0 end; end; procedure Init; var j: integer; Begin Fillchar (a, sizeof(a), 0); Fillchar (b, sizeof(b), 0); Fillchar (c, sizeof(c), 0); end; Begin Init Try (1); end. ■ Ví dụ 2: (Bài toán Mã đi tuần) Chu một bàn cờ kích thước n x n. Một con mã di chuyển theo luật cờ vua được đặt trong một ô với tọa độ đầu là (Xo, Yo). Hãy lập trình tim một đường đi với n2 - 1 bước đi sao cho mọi ô trên bàn cờ đều được mã nhảy đến đúng một lần. Bài giải: Program Knighttour; Const a: array [1..8] of integer = (2, 1, -1, -2, -2, -1, 1, 2); b: array [1..8] of integer = (1, 2, 2, 1, -1, -2,-2, -1); n = 5; nsq = 25; Type index = 1..n; Var q: Boolean; dd: Array [index, index] of integer; S: Set of index; x, y: integer; Procedure Init; Begin Fillchar (dd, size of (dd), 0); Writein ('Xin cho biết tọa độ ban đầu của ngựa'); Readln (x, y); dd[x, y] := 1; q := False; S := [1, 2, 3, 4, 5]; end; procedure print; Var i, j: integer; Begin q := True; For j:= 1 to n do Begin For j := 1 to n do write (dd[i, j] : 5); writeln; end; end; procedure Try (i) Var j, u, v: integer; If i > nsq then print Else For j := 1 to 8 do Begin u := x + a[j]; v := y + b[j]; if (u in s) and (v in s) and (dd[u, v] = 0) then Begin dd[u, v] := i; x := u; y := v; Try(i + 1); x := u - a[j]; y := v – b[j]; dd[u, v] := 0 end; end; end; Begin Init; Try (2); if q = False then writeln ('NO SOLUTION'); end; Bản quyền bài viết thuộc về Sachgiai.com. Ghi nguồn Sách giải.com khi đăng lại bài viết này. Tags: Đệ qui trong Pascal

Ý kiến bạn đọc

Sắp xếp theo bình luận mới Sắp xếp theo bình luận cũ Sắp xếp theo số lượt thích

Những tin mới hơn

    /assets/news/2020_07/lap-trinh-pascal.jpg Tổ hợp trong Pascal

    /assets/news/2020_08/do-thi-trong-pascal-4.jpg Đồ thị trong Pascal

Những tin cũ hơn

    /assets/news/2020_07/lap-trinh-pascal.jpg Sắp xếp trong Pascal (tiếp theo)

    /assets/news/2020_07/lap-trinh-pascal.jpg Sắp xếp trong Pascal

Lớp 1

Lớp 2

Lớp 3

Lớp 4

Lớp 5

Lớp 6

Lớp 7

Lớp 8

Lớp 9

Lớp 10

Lớp 11

Lớp 12

THÀNH VIÊN

Hãy đăng nhập thành viên để trải nghiệm đầy đủ các tiện ích trên site Nhập mã do ứng dụng xác thực cung cấp Thử cách khác Nhập một trong các mã dự phòng bạn đã nhận được. Thử cách khác Đăng nhập Đăng ký

MÔN HỌC

Lớp 1 Lớp 2 Lớp 3 Lớp 4 Lớp 5
Lớp 6 Lớp 7 Lớp 8 Lớp 9
Lớp 10 Lớp 11 Lớp 12
Trung cấp Cao đẳng Đại học

SÁCH HỌC

Lớp 1 Lớp 2 Lớp 3 Lớp 4 Lớp 5
Lớp 6 Lớp 7 Lớp 8 Lớp 9
Lớp 10 Lớp 11 Lớp 12
Tuyển sinh Thơ Truyện Tử vi
Kênh Bóng đá trực tiếp hôm nay miễn phí ⇔ Kênh 90Phut TV full HD ⇔ sv66 ⇔ 566 ⇔ 78Win ⇔ SHBET ⇔ 78win ⇔ u888 ⇔ 888p ⇔ BL555 ⇔ f168 ⇔ 8x bet ⇔ 789BET ⇔ LC88 ⇔ 789F ⇔ https://789betcom0.com/ ⇔ https://hi88.baby/ ⇔ go88 ⇔ Kkwin ⇔ 88go ⇔ f168 ⇔ QQ88 ⇔ bk8 ⇔ bk8 ⇔ iwinclub ⇔ m88 ⇔ hi88 ⇔ https://fun88.social/ ⇔ thabet ⇔ https://qq88.fun/ ⇔ SHBET ⇔ keo nha cai ⇔ https://bshbet.com/ ⇔ https://uk88.rocks⇔ RR88 ⇔ 188v⇔ 78win ⇔ https://hello8880.net/⇔ mb 66 ⇔ TV88⇔ xoso66 ⇔ X88 ⇔ 88i ⇔ KINGFUN ⇔ https://789club24.com/⇔ https://bet88yk.com/ ⇔ https://alo789apk.app/ ⇔ https://33win100.com/ ⇔ https://u888ny.com/⇔ https://hello880.net/ ⇔ https://789club60.com/ ⇔ https://blc88.net/ ⇔ 23win ⇔ xoso66 ⇔ bomwin⇔ https://789club24.com/ ⇔ 8xbet ⇔ XX88 ⇔ 69vn ⇔ win456 ⇔ Tài xỉu online ⇔ XN88 ⇔ https://33win101.com/ ⇔ Slot365⇔ bet88 ⇔ XX88⇔ 789BET ⇔ OKFUN ⇔ hitclub ⇔ 58WIN⇔ 888new.lol ⇔ K8CC⇔ https://hi88.gives/⇔ https://shbetk.net/ ⇔ https://mm88.us.com/ ⇔ 79king ⇔ ww88 ⇔ https://78win.bot/ ⇔ https://lc88o.com/ ⇔ https://hi88.uno/ ⇔ https://58win1.info/ ⇔ j88 ⇔ j88 ⇔ 69vn ⇔ Slot365 ⇔ 888TO ⇔ wstar77 ⇔ 73bet ⇔ 78win ⇔ Slot365⇔ mv88 ⇔ Bsport ⇔ 888New ⇔ EV99 ⇔ BIN88 ⇔ https://f8bet0.world ⇔ https://qq88.studio/⇔ Leo88 ⇔ hi88 ⇔ 888To⇔ hi88 ⇔ 555WIN⇔ https://f168hi.com/ ⇔ sv66 ⇔ ax88 ⇔ https://32win.vc/ ⇔ PG88 ⇔ PG88 ⇔ EE88 ⇔ QQ88⇔ TD88 ⇔ SV388 ⇔ https://vankhanhtvv.com/ ⇔ Nhà Cái LC88⇔ https://f168.tech/ ⇔ https://8kbetbh.com/ ⇔ https://bong99.onl/⇔ https://rr88.com.se/⇔ https://sunwinn.deal/⇔ https://bong88vn.wiki/⇔ https://shbet.racing/ ⇔ RR99 ⇔ BL555 ⇔ hi88com ⇔ https://w88link1.com/ ⇔ xocdia88 ⇔ vuabet88 ⇔ betvisa ⇔ KJC ⇔ Go8 ⇔ 58Win ⇔ 69VN ⇔ 89bet ⇔ https://luck8.ph/ ⇔ https://j888.us.com/ ⇔ ww88 ⇔ 789WIN ⇔ W88 ⇔ UU88 ⇔ Lc 88 ⇔ TD88 ⇔ https://nohu90i.net/ ⇔ 78Win ⇔ 33win ⇔ https://okwins.vip/ ⇔ 122bet ⇔ 881bet ⇔ xoilac xin ⇔ e2bet ⇔ F168 ⇔ https://go8d.com/ ⇔ luck8 ⇔ https://x88casino.net/ ⇔ sunwin ⇔ https://kjc.events/ ⇔ https://79kings.blue/ ⇔ DR88 ⇔ DR88 ⇔ DR88 ⇔ DR88 ⇔ SHBET ⇔ CM88 ⇔ 888p ⇔ OKFUN ⇔ https://32win.cool/ ⇔ Hb88 ⇔ Bong88 ⇔ https://3winn.in.net/ ⇔ Fun88 ⇔ kkwin ⇔ https://kkwin.fan/ ⇔ win678 ⇔ x88 ⇔ https://j88gg.com/ ⇔ https://u88886.com/ ⇔ LC88 Vip ⇔ 68win ⇔ LC88 ⇔ 79king ⇔ https://hitclub88.us/ ⇔ New88 ⇔ https://fun88link0.com/ ⇔ https://fun88link1.com/ ⇔ https://188betlink0.com/ ⇔ https://188betlink1.com/ ⇔ https://188betlink2.com/ ⇔ https://w88link0.com/ ⇔ thabet ⇔ 888P ⇔ 11UU ⇔ EV88 ⇔ 789F⇔ 77win ⇔ xx88 ⇔ 78win ⇔ https://okfun.bz/ ⇔ QQ88 ⇔ https://i9betz4.com/ ⇔ w88link2.com ⇔ w88link3.com ⇔ 32WIN ⇔ https://8dayvip.mobi/ ⇔ https://8dayvip.com/⇔ 86bet⇔ https://u888wl.com/ ⇔ kingfun ⇔ GK88 ⇔ https://78wincom.net/ ⇔ TT88 ⇔ https://8kbettt.com/ ⇔ https://86bet.tech/⇔ https://fly88.gifts/⇔ VN88 ⇔ nh88 ⇔ vn88⇔ zx88 ⇔ https://f168.name/ ⇔ https://kjc.ac/⇔ link vn88 ⇔ HZ88⇔ Bet88 ⇔ XN88 ⇔ VN23⇔ https://555win.bike/⇔ 789f ⇔ Hitclub ⇔ https://f8bet80.one/⇔ https://okfun.center/ ⇔ https://hi88.tours/⇔ https://uu88vn.com ⇔ 69VN ⇔ Ok365 ⇔ 6FF ⇔ Nohu90 ⇔ go8 ⇔ 22vip ⇔ https://go8.beer/⇔ https://shbet.gg/ ⇔ OKKING⇔ abc8 ⇔ s666 ⇔ https://fly88.select/⇔ F168⇔ hi88s com ⇔ f168 ⇔ https://88xx.mobi/ ⇔ https://qq88.social/ ⇔ LC88 ⇔ https://j88vm.com/ ⇔ https://78winvina.com/⇔ https://keonhacai.deals/⇔ MB66⇔ https://58win.faith/⇔ https://mk8.ac/⇔ motphimchill ⇔ https://f168.law/ ⇔ https://saobet.shop/ ⇔ win678 ⇔ 33win ⇔ https://xx88tv.com/ ⇔ max79 ⇔ bl-555.site ⇔ https://8scom.dev/ ⇔ au88 ⇔ 8kbet ⇔ https://32win.football/ ⇔ 789P ⇔ 28bet ⇔ 32 win ⇔ https://nohu.com.mx/ ⇔ https://789fnew.com/ ⇔ xin88 ⇔ 88GO ⇔ tv88 ⇔ LC88 ⇔ https://five88.meme/ ⇔ https://13win.vegas/ ⇔ 32win ⇔ 32win ⇔ Kuwin ⇔ HITCLUB ⇔ https://qq88.media/ ⇔ 888vi ⇔ https://keonhacai1.us.com/ ⇔ tt88 ⇔ mn88 ⇔ https://789winst.com/ ⇔ BL555 ⇔ HM88 ⇔ LC88 ⇔ QQ88 ⇔ mb66 ⇔ 88AA ⇔ aalo789 ⇔ PG99 ⇔ PG88 ⇔ QQ88 ⇔ https://s888.baby/ ⇔ 100vip ⇔ E2bet ⇔ F168 ⇔ tr88 ⇔ 888P ⇔ 8xbet ⇔ rr88vip ⇔ https://jun88.black/ ⇔ x88 ⇔ Nhà Cái LC88 ⇔ sv66 ⇔ 789win ⇔ 161bet ⇔ alo789 ⇔ EE88 ⇔ Abc8 ⇔ Sunwin ⇔ SV388 ⇔ S666 đăng nhập ⇔ Nhà cái vn88 ⇔ 89BET ⇔ SUN WIN ⇔ https://98wina1.com/ ⇔ tv88 ⇔ 789f ⇔ bong88 ⇔ sky88 ⇔ abc8 ⇔ good88 ⇔ Cổng game rikvip ⇔ https://u888n.info/ ⇔ https://98winwi.com/ ⇔ hi88 ⇔ 888p ⇔ Bet88 ⇔ MM88 ⇔ https://88hello88vina.com/ ⇔ https://888baz.com/ ⇔ 56win ⇔ 56win ⇔ 888p ⇔ AF88 ⇔ w188 ⇔ SC88 ⇔ S666 ⇔ 77WIN ⇔ CM88 ⇔ lương sơn tv ⇔ 79KING ⇔ https://hb8868.pro/ ⇔ luck8 ⇔ 99OK ⇔ vn88 ⇔ XX88 ⇔ okking ⇔ 88CLB ⇔ AF88 ⇔ https://ok9bet.net/ ⇔ https://fly88.black/ ⇔ RWIN ⇔ Hubet city ⇔ https://ok8386.black/ ⇔ say88 ⇔ au88 ⇔ BL555 ⇔ 8KBET ⇔ Au88 ⇔ https://66btop.com ⇔ ZX88 ⇔ 23WIN ⇔ QQ88 ⇔ EV99 ⇔ https://ee88com.me/ ⇔ f168 ⇔ VN88 ⇔ fly88 ⇔ cm88 ⇔ https://789ff.biz/ ⇔ B52 CLUB ⇔ https://32win.vc/ ⇔ 99win ⇔ alo789 ⇔ MM88 ⇔ QQ88 ⇔ hm88 ⇔ MB66 ⇔ 789BET ⇔ au88 ⇔ 8kbet ⇔ nổ hũ ⇔ MAX79 ⇔ sumclub ⇔ t88 ⇔ 86bet ⇔ w188 ⇔ w188 ⇔ 3win ⇔ 888vi ⇔ n188 ⇔ https://luongson161.tv/ ⇔ https://69vncasino.net/ ⇔ b52 club ⇔ 88bet ⇔ nk88 ⇔ 56win ⇔ Tr88 ⇔ HM88 ⇔ lc88 ⇔ Tỷ lệ kèo nhà cái ⇔ https://cakhiatv88.net/ ⇔ go8 ⇔ TR88 ⇔ tài xỉu online ⇔ Five88 ⇔ j 88 ⇔ https://m88s1.com/ ⇔ rik vip ⇔ https://sv388a.shop/ ⇔ x88 ⇔ n188 ⇔ Kkwin ⇔ xn88 ⇔ https://qq8876.net/ ⇔ https://mk8th.net/ ⇔ Jun88 ⇔ 888top ⇔ nh88 ⇔ TG88 ⇔ 88aa ⇔ RIKVIP ⇔ RIKVIP ⇔ Sunwin ⇔ tt88 ⇔ EV99 ⇔ u88 ⇔ Dom88 ⇔ kuwin ⇔ SHBET ⇔ https://jun88.school/ ⇔ https://bet88.ventures/ ⇔ 888VI ⇔ https://mb668.co/ ⇔ https://qq887p.com/ ⇔ LC88 ⇔ TT88 ⇔ https://tt88.claims/ ⇔ lucky88 ⇔ K9K9 ⇔ 888vi ⇔ ev99 ⇔ hubett2.org ⇔ MB66 ⇔ 123b ⇔ win68 ⇔ 789win ⇔ ACB8 ⇔ na99 link ⇔ P3 link ⇔ pkwin link ⇔ https://thabetp3.com/ ⇔ Man88 ⇔ https://98win9.bid/ ⇔ XN88 ⇔ https://rr8888.in.net/ ⇔ FUN88 ⇔ tr88 nhà cái ⇔ u88 ⇔ 6ff ⇔ 123B ⇔ 88i ⇔ 888p ⇔ https://e2bet2025i.com ⇔ vt88 ⇔ say88 ⇔ B8 ⇔ B8 ⇔ 68gb ⇔ au88 ⇔ ok9 ⇔ https://j88com.today/ ⇔ https://88vvcom.net/ ⇔ OK9 ⇔ https://1j88com.com/ ⇔ 789club ⇔ go88 ⇔ 8XX ⇔ Hu88 ⇔ Nk88 ⇔ https://s8bet.green/ ⇔ 88i ⇔ 777x ⇔ https://kp88.space/ ⇔ EV88 ⇔ 13win ⇔ https://thabets.it.com/ ⇔ https://n88.fan/ ⇔ https://sv88.estate/ ⇔ S8 ⇔ tv88 ⇔ © 2023 Sách Giải. All Right Reserved. Bạn đã không sử dụng Site, Bấm vào đây để duy trì trạng thái đăng nhập. Thời gian chờ: 60 giây

Giới thiệu bài viết cho bạn bè

Từ khóa » Tỉa Mảng Pascal