¾Ë°í¸®Áò :: TravelingSalesman :: BitonicTour.

ºñÆ®·Î´Ð Åõ¾î·Î À¯Å¬¸®µå ¿©Çà - ¼¼ÀÏÁî¸Ç ¹®Á¦ ÇØ°á
Áö±Ý ´Ù¿î·Îµå

¾Ë°í¸®Áò :: TravelingSalesman :: BitonicTour. ¼øÀ§ ¹× ¿ä¾à

±¤°í

  • Rating:
  • ƯÇã:
  • Perl Artistic License
  • °¡°Ý:
  • FREE
  • °Ô½ÃÀÚ À̸§:
  • John J. Trammell
  • °Ô½ÃÀÚ À¥»çÀÌÆ®:
  • http://search.cpan.org/~jtrammell/

¾Ë°í¸®Áò :: TravelingSalesman :: BitonicTour. ű×


¾Ë°í¸®Áò :: TravelingSalesman :: BitonicTour. ¼³¸í

ºñÆ®·Î´Ð Åõ¾î¿¡¼­ À¯Å¬¸®µå ¿©Çà - ¼¼ÀÏÁî¸Ç ¹®Á¦ ÇØ°á ¾Ë°í¸®Áò :: TravelingSalesman :: BitonicTour´Â ºñÆ®·Î´Ð ŽÇèÀ¸·Î À¯Å¬¸®µå ¿©Çà - ¼¼ÀÏÁî¸Ç ¹®Á¦¸¦ ÇØ°áÇÏ´Â Perl ¸ðµâÀÔ´Ï´Ù .Synopsis Algorithm :: TravelingSalesman :: BitonicTour; MY $ BT = ¾Ë°í¸®Áò :: TravelingSalesman :: BitonicTour-> New; $ bt-> add_point ($ x1, $ y1); $ bt-> add_point ($ x2, $ y2); $ bt-> add_point ($ x3, $ y3); # ... ÇÊ¿ä¿¡ µû¶ó ´Ù¸¥ Á¡ Ãß°¡ ... # ¼Ö·ç¼ÇÀ» ¾ò°í ÀμâÇϽʽÿÀ My ($ len, @coords) = $ bt-> ÇØ°á; Àμâ "ÃÖÀûÀÇ °æ·Î ±æÀÌ : $ len \ n"; "ÃÖÀû °æ·ÎÀÇ ÁÂÇ¥ : \ n"À» ÀμâÇϽʽÿÀ; @CoordsÀÇ °æ¿ì "($ _-> , $ _-> \ n") Àμâ; ¿ä±¸ »çÇ× : ¡¤ Perl.


¾Ë°í¸®Áò :: TravelingSalesman :: BitonicTour. °ü·Ã ¼ÒÇÁÆ®¿þ¾î

dx_central.

»ç¿ëÇϱ⠽¬¿î Çü½ÄÀÇ ´Ù¸¥ ¼Ò½º¿¡¼­ µ¥½ºÅ©Å¾ ±×·¡ÇÈ µð½ºÇ÷¹ÀÌ ...

126

´Ù¿î·Îµå