Follow us on...
Follow us on Twitter Follow us on Facebook Watch us on YouTube

Mời anh em Vn-Zoom tham gia ASUS EXPO 2014

Tìm HD - Phần mềm tìm và xem phim HD miễn phí

Tuyển Mod box Linux và MacOS

Chiêm ngưỡng BaoMoi đẹp "tuyệt diệu" trên Windows Phone

Tuyển thành viên nhóm Reviews diễn đàn

Tuyển BQT VN-Zoom
kết quả từ 1 tới 9 trên 9

Đề tài: lỗi 202 Pascal

  1. #1
    vipboy_dadieu's Avatar
    vipboy_dadieu vẫn chưa có mặt trong diễn đàn Búa Gỗ Đôi
    Tham gia
    Jan 2010
    Bài
    35
    Cảm ơn
    4
    Điểm: 1/1 bài viết
    VR power
    0

    Default lỗi 202 Pascal

    Mấy bạn giúp mình cách khắc phục lỗi này với:
    đầu tiên bấm Alt + F9 ... vẫn bình thường

    sau đó ctrl + F9........ vẫn không sao

    nhưng nhập giá trị và enter thì lại có sao...........hix

    Đây là lỗi j vậy mọi người làm sao sủa đây.......

  2. #2
    programmer2010's Avatar
    programmer2010 vẫn chưa có mặt trong diễn đàn Rìu Chiến Chấm
    Tham gia
    Feb 2010
    Bài
    2.556
    Cảm ơn
    37
    Điểm
    642/579 bài viết
    VR power
    7

    Default

    Free Pascal thẳng tiến
    Cái này là do đệ quy sâu quá nên toi.

  3. #3
    vipboy_dadieu's Avatar
    vipboy_dadieu vẫn chưa có mặt trong diễn đàn Búa Gỗ Đôi
    Tham gia
    Jan 2010
    Bài
    35
    Cảm ơn
    4
    Điểm: 1/1 bài viết
    VR power
    0

    Default

    đã thử free pascal vẫn bị...............

  4. #4
    lamdetien36's Avatar
    lamdetien36 vẫn chưa có mặt trong diễn đàn Rìu Vàng
    Tham gia
    Jun 2013
    Bài
    688
    Cảm ơn
    52
    Điểm
    195/164 bài viết
    VR power
    0

    Default

    Chắc là code của anh/chị bị lỗi rồi. Anh/chị up code lên thử xem nào

  5. #5
    vipboy_dadieu's Avatar
    vipboy_dadieu vẫn chưa có mặt trong diễn đàn Búa Gỗ Đôi
    Tham gia
    Jan 2010
    Bài
    35
    Cảm ơn
    4
    Điểm: 1/1 bài viết
    VR power
    0

    Default

    code lỗi thì k alt f9 được đâu bạn

  6. #6
    lamdetien36's Avatar
    lamdetien36 vẫn chưa có mặt trong diễn đàn Rìu Vàng
    Tham gia
    Jun 2013
    Bài
    688
    Cảm ơn
    52
    Điểm
    195/164 bài viết
    VR power
    0

    Default

    Trích vipboy_dadieu View Post
    code lỗi thì k alt f9 được đâu bạn
    Tức là lỗi về thuật toán ấy. Có thể anh/chị code procedure try bị sai dẫn đến exit code 202 (tràn Stack)

  7. #7
    vipboy_dadieu's Avatar
    vipboy_dadieu vẫn chưa có mặt trong diễn đàn Búa Gỗ Đôi
    Tham gia
    Jan 2010
    Bài
    35
    Cảm ơn
    4
    Điểm: 1/1 bài viết
    VR power
    0

    Default

    Trích lamdetien36 View Post
    Tức là lỗi về thuật toán ấy. Có thể anh/chị code procedure try bị sai dẫn đến exit code 202 (tràn Stack)
    đã up code cho bạn đây xem giúp mình với nha

  8. #8
    lamdetien36's Avatar
    lamdetien36 vẫn chưa có mặt trong diễn đàn Rìu Vàng
    Tham gia
    Jun 2013
    Bài
    688
    Cảm ơn
    52
    Điểm
    195/164 bài viết
    VR power
    0

    Default

    Anh/chị thử code này xem
    Code:
    procedure try(i: integer);
     var
    	j: integer;
     begin
    	for j := 1 to n do if (c[j] = true) and (j <> i) then
    	begin
    		A[i] := j;
    		if i = n then inkq else
    		begin
    			c[j] := false;
    			try(i + 1);
    			c[j] := true;
    		end;
    	end;
     end;

  9. #9
    vipboy_dadieu's Avatar
    vipboy_dadieu vẫn chưa có mặt trong diễn đàn Búa Gỗ Đôi
    Tham gia
    Jan 2010
    Bài
    35
    Cảm ơn
    4
    Điểm: 1/1 bài viết
    VR power
    0

    Default

    Trích lamdetien36 View Post
    Anh/chị thử code này xem
    Code:
    procedure try(i: integer);
     var
    	j: integer;
     begin
    	for j := 1 to n do if (c[j] = true) and (j <> i) then
    	begin
    		A[i] := j;
    		if i = n then inkq else
    		begin
    			c[j] := false;
    			try(i + 1);
    			c[j] := true;
    		end;
    	end;
     end;
    tks ban da thành công hihi`

 

 

Quyền sử dụng

  • Bạn không thể gửi chủ đề mới
  • Bạn không thể gửi trả lời
  • Bạn không thể gửi file đính kèm
  • Bạn không thể tự sửa bài viết của mình
  •