аЯрЁБс>ўџ  ўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџRoot Entryџџџџџџџџ*0_šюЯЛђР№^рш/MуЮФ РContentsџџџџџџџџџџџџŒџџџџџџџџџџџџџџџџџџџџџџџџўџџџ§џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўџџџўџџџ  џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџRoot Entryџџџџџџџџ*0_šюЯЛђР№^@јр@уЮФРContentsџџџџџџџџџџџџŒџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўџџџ§џџџўџџџўџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ  !"ўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ x, fo; \par \plain\f2\fs20\cf3 enddata\plain\f2\fs20\cf0 \par \par \par \plain\f2\fs20\cf3 END\plain\f2\fs20\cf0 \par \par } D\plain\f4\fs20\cf0 \par \pard\plain\f4\fs20\cf0 \par } \par } f2 @for\plain\f4\fs20\cf0 ( matriz: \plain\f4\fs20\cf2 @bin\plain\f4\fs20\cf0 ( x)); \par \plain\f4\fs20\cf2 @for\plain\f4\fs20\cf0 ( matriz(i,j): y(i,j) <= (N-1)*x(i,j)); \par \par \plь‹{\rtf1\ansi\deff0\deftab720{\fonttbl{\f0\fswiss MS Sans Serif;}{\f1\froman\fcharset2 Symbol;}{\f2\fmodern Courier New;}{\f3\fswiss\fprq2 System;}} {\colortbl\red0\green0\blue0;\red255\green0\blue0;\red0\green175\blue0;\red0\green0\blue255;} \deflang1046\pard\plain\f2\fs20\cf3 model\plain\f2\fs20\cf0 : \par \plain\f2\fs20\cf3 sets\plain\f2\fs20\cf0 : \par cidades / \plain\f2\fs20\cf3 @ole\plain\f2\fs20\cf0 ('pcv.xls','cidades')/: ; \par matriz( cidades, cidades): \par DIST, \plain\f2\fs20\cf2 ! Matriz de dist\'e2ncias;\plain\f2\fs20\cf0 \par x, \plain\f2\fs20\cf2 ! x(i, j) = 1 se o arco (i,j) fizer parte da solu\'e7\'e3o;\plain\f2\fs20\cf0 \par y; \par \plain\f2\fs20\cf3 endsets\plain\f2\fs20\cf0 \par \plain\f2\fs20\cf3 data\plain\f2\fs20\cf0 : \par DIST = \plain\f2\fs20\cf3 @ole\plain\f2\fs20\cf0 ('pcv.xls','distancias'); \par \plain\f2\fs20\cf3 enddata\plain\f2\fs20\cf0 \par \par [fo] \plain\f2\fs20\cf3 min\plain\f2\fs20\cf0 = \plain\f2\fs20\cf3 @sum\plain\f2\fs20\cf0 (matriz(i,j): dist(i,j)*x(i,j)); \par \par \plain\f2\fs20\cf3 @for\plain\f2\fs20\cf0 (cidades( k): \par \plain\f2\fs20\cf3 @sum\plain\f2\fs20\cf0 (cidades( i): x( i, k)) = 1; \par \plain\f2\fs20\cf3 @sum\plain\f2\fs20\cf0 (cidades( j): x( k, j)) = 1; \par ); \par \par \plain\f2\fs20\cf3 @for\plain\f2\fs20\cf0 (cidades(k) | k #ne# 1: \par \plain\f2\fs20\cf3 @sum\plain\f2\fs20\cf0 (cidades(j): y(j,k)) - \plain\f2\fs20\cf3 @sum\plain\f2\fs20\cf0 (cidades\plain\f2\fs20\cf1 (\plain\f2\fs20\cf0 j\plain\f2\fs20\cf1 )\plain\f2\fs20\cf0 : y(k,j) ) = 1 ); \par \par \plain\f2\fs20\cf3 @for\plain\f2\fs20\cf0 (matriz(i,j): \plain\f2\fs20\cf3 @bin\plain\f2\fs20\cf0 (x(i,j))); \par \par \plain\f2\fs20\cf3 @for\plain\f2\fs20\cf0 (matriz(i,j): y(i,j) <= (\plain\f2\fs20\cf3 @size\plain\f2\fs20\cf0 (cidades)-1)*x(i,j)); \par \par \plain\f2\fs20\cf3 data\plain\f2\fs20\cf0 : \par \plain\f2\fs20\cf3 @ole\plain\f2\fs20\cf0 ('pcv.xls','solu\'e7\'e3o','fo') =  !"ўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ x, fo; \par \plain\f2\fs20\cf3 enddata\plain\f2\fs20\cf0 \par \par \par \plain\f2\fs20\cf3 END\plain\f2\fs20\cf0 \par \par } D\plain\f4\fs20\cf0 \par \pard\plain\f4\fs20\cf0 \par } \par } f2 @for\plain\f4\fs20\cf0 ( matriz: \plain\f4\fs20\cf2 @bin\plain\f4\fs20\cf0 ( x)); \par \plain\f4\fs20\cf2 @for\plain\f4\fs20\cf0 ( matriz(i,j): y(i,j) <= (N-1)*x(i,j)); \par \par \plь‹{\rtf1\ansi\deff0\deftab720{\fonttbl{\f0\fswiss MS Sans Serif;}{\f1\froman\fcharset2 Symbol;}{\f2\fmodern Courier New;}{\f3\fswiss\fprq2 System;}} {\colortbl\red0\green0\blue0;\red255\green0\blue0;\red0\green175\blue0;\red0\green0\blue255;} \deflang1046\pard\plain\f2\fs20\cf3 model\plain\f2\fs20\cf0 : \par \plain\f2\fs20\cf3 sets\plain\f2\fs20\cf0 : \par cidades / \plain\f2\fs20\cf3 @ole\plain\f2\fs20\cf0 ('pcv.xls','cidades')/: ; \par matriz( cidades, cidades): \par DIST, \plain\f2\fs20\cf2 ! Matriz de dist\'e2ncias;\plain\f2\fs20\cf0 \par x, \plain\f2\fs20\cf2 ! x(i, j) = 1 se o arco (i,j) fizer parte da solu\'e7\'e3o;\plain\f2\fs20\cf0 \par y; \par \plain\f2\fs20\cf3 endsets\plain\f2\fs20\cf0 \par \plain\f2\fs20\cf3 data\plain\f2\fs20\cf0 : \par DIST = \plain\f2\fs20\cf3 @ole\plain\f2\fs20\cf0 ('pcv.xls','distancias'); \par \plain\f2\fs20\cf3 enddata\plain\f2\fs20\cf0 \par \par [fo] \plain\f2\fs20\cf3 min\plain\f2\fs20\cf0 = \plain\f2\fs20\cf3 @sum\plain\f2\fs20\cf0 (matriz(i,j): dist(i,j)*x(i,j)); \par \par \plain\f2\fs20\cf3 @for\plain\f2\fs20\cf0 (cidades( k): \par \plain\f2\fs20\cf3 @sum\plain\f2\fs20\cf0 (cidades( i): x( i, k)) = 1; \par \plain\f2\fs20\cf3 @sum\plain\f2\fs20\cf0 (cidades( j): x( k, j)) = 1; \par ); \par \par \plain\f2\fs20\cf3 @for\plain\f2\fs20\cf0 (cidades(k) | k #ne# 1: \par \plain\f2\fs20\cf3 @sum\plain\f2\fs20\cf0 (cidades(j): y(j,k)) - \plain\f2\fs20\cf3 @sum\plain\f2\fs20\cf0 (cidades\plain\f2\fs20\cf1 (\plain\f2\fs20\cf0 j\plain\f2\fs20\cf1 )\plain\f2\fs20\cf0 : y(k,j) ) = 1 ); \par \par \plain\f2\fs20\cf3 @for\plain\f2\fs20\cf0 (matriz(i,j): \plain\f2\fs20\cf3 @bin\plain\f2\fs20\cf0 (x(i,j))); \par \par \plain\f2\fs20\cf3 @for\plain\f2\fs20\cf0 (matriz(i,j): y(i,j) <= (\plain\f2\fs20\cf3 @size\plain\f2\fs20\cf0 (cidades)-1)*x(i,j)); \par \par \plain\f2\fs20\cf3 data\plain\f2\fs20\cf0 : \par \plain\f2\fs20\cf3 @ole\plain\f2\fs20\cf0 ('pcv.xls','solu\'e7\'e3o','fo') =