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

Tuyển nhân sự diễn đàn 2014

Gameshow “Ai Là Triệu Phú” trên VTV đang chờ đón bạn – Tải ngay!

Cuộc thi khoảnh khắc tuyệt vời cùng Vn-Zoom.com

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

Tin tức công nghệ mới nhất

Sản phẩm đáng chú ý tại Asus Expo 2014
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.600
    Cảm ơn
    38
    Điểm
    654/591 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
  •