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

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

Vn-Zoom.com Se what others can't see Zenfone2

Tin tức công nghệ mới
Cảnh giác và chung tay bảo vệ người tiêu dùng

Chiêm ngưỡng Báo Mới tuyệt đẹp trên Windows Phone

Nỗi đau của một IT nghèo

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
    36
    Cảm ơn
    5
    Điểm: 1/1 bài viết

    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.752
    Cảm ơn
    40
    Điểm
    695/628 bài viết

    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
    36
    Cảm ơn
    5
    Điểm: 1/1 bài viết

    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
    196/164 bài viết

    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
    36
    Cảm ơn
    5
    Điểm: 1/1 bài viết

    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
    196/164 bài viết

    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
    36
    Cảm ơn
    5
    Điểm: 1/1 bài viết

    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
    196/164 bài viết

    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
    36
    Cảm ơn
    5
    Điểm: 1/1 bài viết

    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
  •