2011程序设计与问题求解IB答案
2011数学建模B题编程最优路径

model: sets:plot/A1,A2,A3,A18,A17,A19,A42,A43,A44,A63,A64,A65,A66,A67,A68,A69,A70,A71,A72,A73 ,A74,A75,A76,A77,A78,A79,A80,A81/:L;roads(plot,plot)/A1,A69 A1,A74 A1,A75 A1,A78A69,A68 A69,A70 A69,A71A74,A80 A74,A71 A74,A73A75,A76 A75,A68A78,A79 A78,A77A68,A67A70,A2 A70,A43A71,A72A80,A79 A80,A18A73,A72 A73,A18A76,A64 A76,A66 A76,A77A79,A19A67,A44 A67,A66A2,A43 A2,A44A43,A72 A43,A42A18,A81A64,A63 A64,A65A66,A65A77,A19A42,A17A44,A3/:D;ENDSETSDATA:D=5.0 6.3 9.3 6.47.1 5.4 6.416.9 6.1 4.03.54.56.7 10.04.18.6 7.65.04.5 8.18.1 19.713.2 9.2 4.54.514.8 4.28.0 9.58.1 8.16.79.1 5.83.29.89.89.5;L=0,,,,,,,,,,,,,,,,,,,,,,,,,,,;ENDDATA@for(plot(i)|i#GT#@index(A1): L(i)=@MIN(roads(j,i):L(j)+D(j,i));); end model: sets:plot/A2,A1,A3,A17,A41,A42,A43,A44,A64,A65,A67,A68,A69,A70,A71,A72,A73,A74,A75,A76 ,A78/:L;roads(plot,plot)/A2,A44 A2,A43 A2,A70A44,A67 A44,A3A43,A72 A43,A70 A43,A42A70,A69A67,A68A3,A65A72,A73 A72,A71A42,A17A69,A71 A69,A68 A69,A1A68,A75A65,A64A73,A74A71,A74A17,A41A1,A75 A1,A78 A1,A74A75,A76A64,A76/:D;ENDSETSDATA:D=9.5 8 8.614.8 11.68.1 7.6 8.15.44.115.28.1 58.56.47.1 54.55.84.06.18.59.3 6.4 6.33.513.2;L=0,,,,,,,,,,,,,,,,,,,,;J v 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 JENDDATA@for(plot(i)|i#GT#@index(A2): L(i)=@MIN(roads(j,i):L(j)+D(j,i));); endA3model: sets: plot/A3,A2,A4,A38,A39,A40,A43,A44,A64,A65,A66,A67,A68,A69,A70,A75/:L; roads(plot,plot)/A3,A65 A3,A44A65,A66 A65,A64A44,A2 A44,A67A66,A67A2,A40 A2,A43 A2,A70A67,A68A40,A39A43,A70A70,A69A68,A69 A68,A75A39,A4 A39,A38/:D;ENDSETSDATA:D=15.2 11.63.2 5.89.5 14.84.219.1 8 8.64.117.77.65.47.1 4.545.6 3;L=0,,,,,,,,,,,,,,,;J v 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 JENDDATA @for(plot(i)|i#GT#@index(A3): L(i)=@MIN(roads(j,i):L(j)+D(j,i));); endmodel: sets:plot/A1,A2,A3,A18,A17,A19,A42,A43,A44,A63,A64,A65,A66,A67,A68,A69,A70,A71,A72,A73 ,A74,A75,A76,A77,A78,A79,A80,A81/:L;roads(plot,plot)/A1,A69 A1,A74 A1,A75 A1,A78A69,A68 A69,A70 A69,A71A74,A80 A74,A71 A74,A73A75,A76 A75,A68A78,A79 A78,A77A68,A67A70,A2 A70,A43A71,A72A80,A79 A80,A18A73,A72 A73,A18A76,A64 A76,A66 A76,A77A79,A19A67,A44 A67,A66A2,A43 A2,A44A43,A72 A43,A42A18,A81A64,A63 A64,A65A66,A65A77,A19A42,A17A44,A3/:D;ENDSETSDATA:D=5.0 6.3 9.3 6.47.1 5.4 6.416.9 6.1 4.03.54.56.7 10.04.18.6 7.65.04.5 8.18.1 19.713.2 9.2 4.54.514.8 4.28.0 9.58.1 8.19.1 5.83.29.89.89.5;L=0,,,,,,,,,,,,,,,,,,,,,,,,,,,;ENDDATA@for(plot(i)|i#GT#@index(A1): L(i)=@MIN(roads(j,i):L(j)+D(j,i));); end model: sets:plot/A2,A1,A3,A17,A41,A42,A43,A44,A64,A65,A67,A68,A69,A70,A71,A72,A73,A74,A75,A76 ,A78/:L;roads(plot,plot)/A2,A44 A2,A43 A2,A70A44,A67 A44,A3A43,A72 A43,A70 A43,A42A70,A69A67,A68A3,A65A72,A73 A72,A71A42,A17A69,A71 A69,A68 A69,A1A68,A75A65,A64A73,A74A71,A74A17,A41A1,A75 A1,A78 A1,A74A75,A76A64,A76/:D;ENDSETSDATA:D=9.5 8 8.614.8 11.68.1 7.6 8.15.44.115.28.1 58.56.47.1 54.55.84.06.18.59.3 6.4 6.313.2;L=0,,,,,,,,,,,,,,,,,,,,;J v 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 JENDDATA@for(plot(i)|i#GT#@index(A2): L(i)=@MIN(roads(j,i):L(j)+D(j,i));); endA3 model: sets: plot/A3,A2,A4,A38,A39,A40,A43,A44,A64,A65,A66,A67,A68,A69,A70,A75/:L; roads(plot,plot)/A3,A65 A3,A44A65,A66 A65,A64A44,A2 A44,A67A66,A67A2,A40 A2,A43 A2,A70A67,A68A40,A39A43,A70A70,A69A68,A69 A68,A75A39,A4 A39,A38/:D;ENDSETSDATA:D=15.2 11.63.2 5.89.5 14.84.219.1 8 8.64.117.77.65.47.1 4.545.6 3;L=0,,,,,,,,,,,,,,,;J v 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 JENDDATA@for(plot(i)|i#GT#@index(A3): L(i)=@MIN(roads(j,i):L(j)+D(j,i));); end model: sets:plot/A1,A2,A3,A18,A17,A19,A42,A43,A44,A63,A64,A65,A66,A67,A68,A69,A70,A71,A72,A73 ,A74,A75,A76,A77,A78,A79,A80,A81/:L;roads(plot,plot)/A1,A69 A1,A74 A1,A75 A1,A78A69,A68 A69,A70 A69,A71A74,A80 A74,A71 A74,A73A75,A76 A75,A68A78,A79 A78,A77A68,A67A70,A2 A70,A43A71,A72A80,A79 A80,A18A73,A72 A73,A18A76,A64 A76,A66 A76,A77A79,A19A67,A44 A67,A66A2,A43 A2,A44A43,A72 A43,A42A18,A81A64,A63 A64,A65A66,A65A77,A19A42,A17A44,A3/:D;ENDSETSDATA:D=5.0 6.3 9.3 6.47.1 5.4 6.416.9 6.1 4.03.54.56.7 10.04.18.6 7.65.04.5 8.18.1 19.713.2 9.2 4.54.514.8 4.28.0 9.58.1 8.16.79.1 5.83.29.89.89.5;L=0,,,,,,,,,,,,,,,,,,,,,,,,,,,;ENDDATA@for(plot(i)|i#GT#@index(A1): L(i)=@MIN(roads(j,i):L(j)+D(j,i));); endmodel: sets:plot/A2,A1,A3,A17,A41,A42,A43,A44,A64,A65,A67,A68,A69,A70,A71,A72,A73,A74,A75,A76 ,A78/:L;roads(plot,plot)/A2,A44 A2,A43 A2,A70A44,A67 A44,A3A43,A72 A43,A70 A43,A42A70,A69A67,A68A3,A65A72,A73 A72,A71A42,A17A69,A71 A69,A68 A69,A1A68,A75A65,A64A73,A74A71,A74A17,A41A1,A75 A1,A78 A1,A74A75,A76A64,A76/:D;ENDSETSDATA:D=9.5 8 8.614.8 11.68.1 7.6 8.15.44.115.28.1 58.56.47.1 519.1 8 8.64.117.77.65.47.1 4.545.6 3;4.55.84.06.18.59.3 6.4 6.33.513.2;L=0,,,,,,,,,,,,,,,,,,,,; J v 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 JENDDATA@for(plot(i)|i#GT#@index(A2): L(i)=@MIN(roads(j,i):L(j)+D(j,i));); endA3model: sets: plot/A3,A2,A4,A38,A39,A40,A43,A44,A64,A65,A66,A67,A68,A69,A70,A75/:L; roads(plot,plot)/A3,A65 A3,A44A65,A66 A65,A64A44,A2 A44,A67A66,A67A2,A40 A2,A43 A2,A70A67,A68A40,A39A43,A70A70,A69A68,A69 A68,A75A39,A4 A39,A38/:D;ENDSETSDATA:D=15.2 11.63.2 5.89.5 14.84.2L=0,,,,,,,,,,,,,,,;J v 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 JENDDATA@for(plot(i)|i#GT#@index(A3): L(i)=@MIN(roads(j,i):L(j)+D(j,i));); end model: sets: plot/A1,A2,A3,A18,A17,A19,A42,A43,A44,A63,A64,A65,A66,A67,A68,A69,A70,A71,A72,A73 ,A74,A75,A76,A77,A78,A79,A80,A81/:L;roads(plot,plot)/A1,A69 A1,A74 A1,A75 A1,A78A69,A68 A69,A70 A69,A71A74,A80 A74,A71 A74,A73A75,A76 A75,A68A78,A79 A78,A77A68,A67A70,A2 A70,A43A71,A72A80,A79 A80,A18A73,A72 A73,A18A76,A64 A76,A66 A76,A77A79,A19A67,A44 A67,A66A2,A43 A2,A44A43,A72 A43,A42A18,A81A64,A63 A64,A65A66,A65A77,A19A42,A17A44,A3/:D;ENDSETSDATA:D=5.0 6.3 9.3 6.47.1 5.4 6.416.9 6.1 4.03.54.56.7 10.04.18.6 7.65.04.5 8.18.1 19.713.2 9.2 4.54.514.8 4.28.0 9.58.1 8.16.79.1 5.83.29.89.89.5;L=0,,,,,,,,,,,,,,,,,,,,,,,,,,,;ENDDATA@for(plot(i)|i#GT#@index(A1): L(i)=@MIN(roads(j,i):L(j)+D(j,i));); end model: sets:plot/A2,A1,A3,A17,A41,A42,A43,A44,A64,A65,A67,A68,A69,A70,A71,A72,A73,A74,A75,A76 ,A78/:L;roads(plot,plot)/A2,A44 A2,A43 A2,A70A44,A67 A44,A3A43,A72 A43,A70 A43,A42A70,A69A67,A68A3,A65A72,A73 A72,A71A42,A17A69,A71 A69,A68 A69,A1A68,A75A65,A64A73,A74A71,A74A17,A41A1,A75 A1,A78 A1,A74A75,A76A64,A76/:D;ENDSETSDATA:D=9.5 8 8.614.8 11.68.1 7.6 8.15.44.115.28.1 58.56.47.1 54.55.84.06.18.59.3 6.4 6.33.513.2;L=0,,,,,,,,,,,,,,,,,,,,;J v 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 JENDDATA@for(plot(i)|i#GT#@index(A2): L(i)=@MIN(roads(j,i):L(j)+D(j,i));); endA3model: sets: plot/A3,A2,A4,A38,A39,A40,A43,A44,A64,A65,A66,A67,A68,A69,A70,A75/:L; roads(plot,plot)/A3,A65 A3,A44A65,A66 A65,A64A44,A2 A44,A67A66,A67A2,A40 A2,A43 A2,A70A67,A68A40,A39A43,A70A70,A69A68,A69 A68,A75A39,A4 A39,A38/:D;ENDSETSDATA:D=15.2 11.63.2 5.89.5 14.84.219.1 8 8.64.117.77.65.47.1 4.545.6 3;L=0,,,,,,,,,,,,,,,;J v 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 JENDDATA@for(plot(i)|i#GT#@index(A3): L(i)=@MIN(roads(j,i):L(j)+D(j,i));); end model: sets: plot/A1,A2,A3,A18,A17,A19,A42,A43,A44,A63,A64,A65,A66,A67,A68,A69,A70,A71,A72,A73 ,A74,A75,A76,A77,A78,A79,A80,A81/:L;roads(plot,plot)/A1,A69 A1,A74 A1,A75 A1,A78A69,A68 A69,A70 A69,A71A75,A76 A75,A68A78,A79 A78,A77A68,A67A70,A2 A70,A43A71,A72A80,A79 A80,A18A73,A72 A73,A18A76,A64 A76,A66 A76,A77A79,A19A67,A44 A67,A66A2,A43 A2,A44A43,A72 A43,A42A18,A81A64,A63 A64,A65A66,A65A77,A19A42,A17A44,A3/:D;ENDSETSDATA:D=5.0 6.3 9.3 6.47.1 5.4 6.416.9 6.1 4.03.54.56.7 10.04.18.6 7.65.04.5 8.18.1 19.713.2 9.2 4.54.514.8 4.28.0 9.58.1 8.16.79.1 5.83.29.89.89.5;L=0,,,,,,,,,,,,,,,,,,,,,,,,,,,;ENDDATA@for(plot(i)|i#GT#@index(A1): L(i)=@MIN(roads(j,i):L(j)+D(j,i));); end model: sets:plot/A2,A1,A3,A17,A41,A42,A43,A44,A64,A65,A67,A68,A69,A70,A71,A72,A73,A74,A75,A76 ,A78/:L;roads(plot,plot)/A2,A44 A2,A43 A2,A70A44,A67 A44,A3A70,A69A67,A68A3,A65A72,A73 A72,A71A42,A17A69,A71 A69,A68 A69,A1A68,A75A65,A64A73,A74A71,A74A17,A41A1,A75 A1,A78 A1,A74A75,A76A64,A76/:D;ENDSETSDATA:D=9.5 8 8.614.8 11.68.1 7.6 8.15.44.115.28.1 58.56.47.1 54.55.84.06.18.59.3 6.4 6.33.513.2;L=0,,,,,,,,,,,,,,,,,,,,;J v 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 JENDDATA@for(plot(i)|i#GT#@index(A2): L(i)=@MIN(roads(j,i):L(j)+D(j,i));); endA3model: sets: plot/A3,A2,A4,A38,A39,A40,A43,A44,A64,A65,A66,A67,A68,A69,A70,A75/:L; roads(plot,plot)/A3,A65 A3,A44A65,A66 A65,A64A44,A2 A44,A67A66,A67A2,A40 A2,A43 A2,A70A67,A68A40,A39A43,A70A70,A69A68,A69 A68,A75A39,A4 A39,A38/:D;ENDSETSDATA:D=15.2 11.63.2 5.89.5 14.84.219.1 8 8.64.117.77.65.47.1 4.545.6 3;L=0,,,,,,,,,,,,,,,;J v 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 JENDDATA@for(plot(i)|i#GT#@index(A3): L(i)=@MIN(roads(j,i):L(j)+D(j,i));); end model: sets:plot/A1,A2,A3,A18,A17,A19,A42,A43,A44,A63,A64,A65,A66,A67,A68,A69,A70,A71,A72,A73 ,A74,A75,A76,A77,A78,A79,A80,A81/:L;roads(plot,plot)/A1,A69 A1,A74 A1,A75 A1,A78A69,A68 A69,A70 A69,A71A74,A80 A74,A71 A74,A73A75,A76 A75,A68A78,A79 A78,A77A68,A67A70,A2 A70,A43A71,A72A80,A79 A80,A18A73,A72 A73,A18A76,A64 A76,A66 A76,A77A79,A19A67,A44 A67,A66A2,A43 A2,A44A43,A72 A43,A42A18,A81A64,A63 A64,A65A66,A65A77,A19A42,A17A44,A3/:D;ENDSETSDATA:D=5.0 6.3 9.3 6.47.1 5.4 6.416.9 6.1 4.03.54.56.7 10.04.18.6 7.65.04.5 8.18.1 19.713.2 9.2 4.54.514.8 4.28.0 9.58.1 8.16.79.1 5.83.29.89.89.5;L=0,,,,,,,,,,,,,,,,,,,,,,,,,,,;ENDDATA@for(plot(i)|i#GT#@index(A1): L(i)=@MIN(roads(j,i):L(j)+D(j,i));); endmodel: sets:plot/A2,A1,A3,A17,A41,A42,A43,A44,A64,A65,A67,A68,A69,A70,A71,A72,A73,A74,A75,A76 ,A78/:L;roads(plot,plot)/A2,A44 A2,A43 A2,A70A44,A67 A44,A3A43,A72 A43,A70 A43,A42A70,A69A67,A68A3,A65A72,A73 A72,A71A42,A17A69,A71 A69,A68 A69,A1A68,A75A65,A64A73,A74A71,A74A17,A41A1,A75 A1,A78 A1,A74 A75,A76A64,A76/:D;ENDSETSDATA:D=9.5 8 8.614.8 11.68.1 7.6 8.15.44.115.28.1 58.56.47.1 54.55.84.06.18.5L=0,,,,,,,,,,,,,,,,,,,,;J v 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 JENDDATA@for(plot(i)|i#GT#@index(A2): L(i)=@MIN(roads(j,i):L(j)+D(j,i));); endA3model: sets: plot/A3,A2,A4,A38,A39,A40,A43,A44,A64,A65,A66,A67,A68,A69,A70,A75/:L; roads(plot,plot)/A3,A65 A3,A44A65,A66 A65,A64A44,A2 A44,A67A66,A67A2,A40 A2,A43 A2,A70A67,A68A40,A39A43,A70A70,A69A68,A69 A68,A75A39,A4 A39,A38/:D;ENDSETSDATA:D=15.2 11.63.2 5.89.5 14.84.219.1 8 8.64.117.77.65.47.1 4.545.6 3;L=0,,,,,,,,,,,,,,,;J v 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 JENDDATA@for(plot(i)|i#GT#@index(A3): L(i)=@MIN(roads(j,i):L(j)+D(j,i));); end model: sets:plot/A1,A2,A3,A18,A17,A19,A42,A43,A44,A63,A64,A65,A66,A67,A68,A69,A70,A71,A72,A73 ,A74,A75,A76,A77 ,A78,A79,A80,A81/:L; roads(plot,plot)/A1,A69 A1,A74 A1,A75 A1,A78 A69,A68 A69,A70 A69,A71 A74,A80 A74,A71 A74,A73A75,A76 A75,A68A78,A79 A78,A77A68,A67A70,A2 A70,A43A71,A72A80,A79 A80,A18A73,A72 A73,A18A76,A64 A76,A66 A76,A77A79,A19A67,A44 A67,A66A2,A43 A2,A44A43,A72 A43,A42A18,A81A64,A63 A64,A65A66,A65A77,A19A42,A17A44,A3/:D;ENDSETSDATA:D=5.0 6.3 9.3 6.47.1 5.4 6.416.9 6.1 4.03.54.56.7 10.04.18.6 7.65.04.5 8.18.1 19.713.2 9.2 4.54.514.8 4.28.0 9.58.1 8.16.79.1 5.83.29.89.89.5;L=0,,,,,,,,,,,,,,,,,,,,,,,,,,,;ENDDATA@for(plot(i)|i#GT#@index(A1): L(i)=@MIN(roads(j,i):L(j)+D(j,i));); end model: sets:plot/A2,A1,A3,A17,A41,A42,A43,A44,A64,A65,A67,A68,A69,A70,A71,A72,A73,A74,A75,A76,A78/:L;roads(plot,plot)/A2,A44 A2,A43 A2,A70A44,A67 A44,A3A43,A72 A43,A70 A43,A42 A70,A69A67,A68A3,A65A72,A73 A72,A71A42,A17A69,A71 A69,A68 A69,A1 A68,A75A65,A64A73,A74A71,A74A17,A41A1,A75 A1,A78 A1,A74A75,A76A64,A76/:D;ENDSETSDATA:D=9.5 8 8.614.8 11.68.1 7.6 8.15.44.1D=15.2 11.63.2 5.89.5 14.84.219.1 8 8.64.117.7 8.1 58.56.47.1 54.55.84.06.18.59.3 6.4 6.33.513.2;L=0,,,,,,,,,,,,,,,,,,,,; J v 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 JENDDATA@for(plot(i)|i#GT#@index(A2): L(i)=@MIN(roads(j,i):L(j)+D(j,i));); endA3model: sets: plot/A3,A2,A4,A38,A39,A40,A43,A44,A64,A65,A66,A67,A68,A69,A70,A75/:L; roads(plot,plot)/A3,A65 A3,A44A65,A66 A65,A64A44,A2 A44,A67A66,A67A2,A40 A2,A43 A2,A70A67,A68A40,A39A43,A70A70,A69A68,A69 A68,A75A39,A4 A39,A38/:D;ENDSETSDATA:5.47.1 4.545.6 3;L=0,,,,,,,,,,,,,,,;J v 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 JENDDATA@for(plot(i)|i#GT#@index(A3): L(i)=@MIN(roads(j,i):L(j)+D(j,i));); end model: sets: plot/A1,A2,A3,A18,A17,A19,A42,A43,A44,A63,A64,A65,A66,A67,A68,A69,A70,A71,A72,A73 ,A74,A75,A76,A77,A78,A79,A80,A81/:L;roads(plot,plot)/A1,A69 A1,A74 A1,A75 A1,A78A69,A68 A69,A70 A69,A71A74,A80 A74,A71 A74,A73A75,A76 A75,A68A78,A79 A78,A77A68,A67A70,A2 A70,A43A71,A72A80,A79 A80,A18A73,A72 A73,A18A76,A64 A76,A66 A76,A77A79,A19A67,A44 A67,A66A2,A43 A2,A44A43,A72 A43,A42A18,A81A64,A63 A64,A65A66,A65A77,A19A42,A17A44,A3/:D;ENDSETSDATA:D=5.0 6.3 9.3 6.47.1 5.4 6.416.9 6.1 4.03.54.56.7 10.04.18.6 7.65.04.5 8.18.1 19.713.2 9.2 4.54.514.8 4.28.0 9.58.1 8.16.79.1 5.83.29.89.89.5;L=0,,,,,,,,,,,,,,,,,,,,,,,,,,,;ENDDATA@for(plot(i)|i#GT#@index(A1): L(i)=@MIN(roads(j,i):L(j)+D(j,i));); end model: sets:plot/A2,A1,A3,A17,A41,A42,A43,A44,A64,A65,A67,A68,A69,A70,A71,A72,A73,A74,A75,A76 ,A78/:L;roads(plot,plot)/A2,A44 A2,A43 A2,A70A44,A67 A44,A3A43,A72 A43,A70 A43,A42A70,A69A67,A68A3,A65A72,A73 A72,A71A42,A17A69,A71 A69,A68 A69,A1A68,A75A65,A64A73,A74A71,A74A17,A41A1,A75 A1,A78 A1,A74A75,A76A64,A76/:D;ENDSETSDATA:D=9.5 8 8.614.8 11.68.1 7.6 8.15.44.115.28.1 58.56.47.1 54.55.84.06.18.59.3 6.4 6.33.513.2;L=0,,,,,,,,,,,,,,,,,,,,;J v 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 JENDDATA@for(plot(i)|i#GT#@index(A2): L(i)=@MIN(roads(j,i):L(j)+D(j,i));); endA3model: sets: plot/A3,A2,A4,A38,A39,A40,A43,A44,A64,A65,A66,A67,A68,A69,A70,A75/:L; roads(plot,plot)/A3,A65 A3,A44A65,A66 A65,A64A44,A2 A44,A67A66,A67A2,A40 A2,A43 A2,A70A67,A68A40,A39A43,A70A70,A69A68,A69 A68,A75A39,A4 A39,A38/:D;ENDSETSDATA:D=15.2 11.63.2 5.89.5 14.84.219.1 8 8.64.117.77.65.47.1 4.545.6 3;L=0,,,,,,,,,,,,,,,;J v 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 JENDDATA@for(plot(i)|i#GT#@index(A3): L(i)=@MIN(roads(j,i):L(j)+D(j,i));); end model: sets: plot/A1,A2,A3,A18,A17,A19,A42,A43,A44,A63,A64,A65,A66,A67,A68,A69,A70,A71,A72,A73 ,A74,A75,A76,A77,A78,A79,A80,A81/:L;roads(plot,plot)/A1,A69 A1,A74 A1,A75 A1,A78A69,A68 A69,A70 A69,A71A74,A80 A74,A71 A74,A73A75,A76 A75,A68A78,A79 A78,A77A68,A67A70,A2 A70,A43A71,A72A80,A79 A80,A18A73,A72 A73,A18A76,A64 A76,A66 A76,A77A79,A19A67,A44 A67,A66A2,A43 A2,A44A43,A72 A43,A42A18,A81A64,A63 A64,A65A66,A65A77,A19A42,A17A44,A3/:D;ENDSETSDATA:D=5.0 6.3 9.3 6.47.1 5.4 6.416.9 6.1 4.03.54.56.7 10.04.18.6 7.65.04.5 8.18.1 19.713.2 9.2 4.54.514.8 4.28.0 9.58.1 8.16.79.1 5.83.29.89.89.5;L=0,,,,,,,,,,,,,,,,,,,,,,,,,,,;ENDDATA@for(plot(i)|i#GT#@index(A1): L(i)=@MIN(roads(j,i):L(j)+D(j,i));); end model: sets:plot/A2,A1,A3,A17,A41,A42,A43,A44,A64,A65,A67,A68,A69,A70,A71,A72,A73,A74,A75,A76 ,A78/:L;roads(plot,plot)/A44,A67 A44,A3A43,A72 A43,A70 A43,A42A70,A69A67,A68A3,A65A72,A73 A72,A71A42,A17A69,A71 A69,A68 A69,A1A68,A75A65,A64A73,A74A71,A74A17,A41A1,A75 A1,A78 A1,A74A75,A76A64,A76/:D;ENDSETSDATA:D=9.5 8 8.614.8 11.68.1 7.6 8.15.44.115.28.1 58.56.47.1 54.55.84.06.18.59.3 6.4 6.33.513.2;L=0,,,,,,,,,,,,,,,,,,,,;J v 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 JENDDATA@for(plot(i)|i#GT#@index(A2): L(i)=@MIN(roads(j,i):L(j)+D(j,i));); endA3 model: sets: plot/A3,A2,A4,A38,A39,A40,A43,A44,A64,A65,A66,A67,A68,A69,A70,A75/:L; roads(plot,plot)/A3,A65 A3,A44A65,A66 A65,A64A44,A2 A44,A67A66,A67A67,A68A40,A39A43,A70A70,A69A68,A69 A68,A75A39,A4 A39,A38/:D;ENDSETSDATA:D=15.2 11.63.2 5.89.5 14.84.219.1 8 8.64.117.77.65.47.1 4.545.6 3;L=0,,,,,,,,,,,,,,,;J v 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 JENDDATA@for(plot(i)|i#GT#@index(A3): L(i)=@MIN(roads(j,i):L(j)+D(j,i));); end model: sets:plot/A1,A2,A3,A18,A17,A19,A42,A43,A44,A63,A64,A65,A66,A67,A68,A69,A70,A71,A72,A73 ,A74,A75,A76,A77,A78,A79,A80,A81/:L;roads(plot,plot)/A1,A69 A1,A74 A1,A75 A1,A78A69,A68 A69,A70 A69,A71A74,A80 A74,A71 A74,A73A75,A76 A75,A68A78,A79 A78,A77A68,A67A70,A2 A70,A43A71,A72A80,A79 A80,A18A73,A72 A73,A18A76,A64 A76,A66 A76,A77A79,A19A67,A44 A67,A66A2,A43 A2,A44A43,A72 A43,A42A18,A81A64,A63 A64,A65A66,A65A77,A19A42,A17A44,A3/:D;ENDSETSDATA:D=5.0 6.3 9.3 6.47.1 5.4 6.416.9 6.1 4.03.54.56.7 10.04.18.6 7.65.04.5 8.18.1 19.713.2 9.2 4.54.514.8 4.28.0 9.58.1 8.16.79.1 5.83.29.89.89.5;L=0,,,,,,,,,,,,,,,,,,,,,,,,,,,;ENDDATA@for(plot(i)|i#GT#@index(A1): L(i)=@MIN(roads(j,i):L(j)+D(j,i));); endmodel: sets:plot/A2,A1,A3,A17,A41,A42,A43,A44,A64,A65,A67,A68,A69,A70,A71,A72,A73,A74,A75,A76 ,A78/:L;roads(plot,plot)/A2,A44 A2,A43 A2,A70A44,A67 A44,A3A43,A72 A43,A70 A43,A42A70,A69A67,A68A3,A65A72,A73 A72,A71A42,A17A69,A71 A69,A68 A69,A1A68,A75A65,A64A73,A74A71,A74A17,A41A1,A75 A1,A78 A1,A74 A75,A76A64,A76/:D;ENDSETSDATA:D=9.5 8 8.614.8 11.68.1 7.6 8.15.44.115.28.1 58.56.47.1 54.55.84.06.17.65.47.1 4.545.6 3;L=0,,,,,,,,,,,,,,,;J v 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 JENDDATA 8.59.3 6.4 6.33.513.2;L=0,,,,,,,,,,,,,,,,,,,,; J v 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 JENDDATA@for(plot(i)|i#GT#@index(A2): L(i)=@MIN(roads(j,i):L(j)+D(j,i));); endA3model: sets: plot/A3,A2,A4,A38,A39,A40,A43,A44,A64,A65,A66,A67,A68,A69,A70,A75/:L; roads(plot,plot)/A3,A65 A3,A44A65,A66 A65,A64A44,A2 A44,A67A66,A67A2,A40 A2,A43 A2,A70A67,A68A40,A39A43,A70A70,A69A68,A69 A68,A75A39,A4 A39,A38/:D;ENDSETSDATA:D=15.2 11.63.2 5.89.5 14.84.219.1 8 8.64.117.7。
实验指导书2011版真题练习+答案

1、打开proj1.cpp,函数的功能是返回所给字符串中大写字母的个数,删除程序代码里面的下划线,并补充相应的代码。
(注意:不要改动其它代码,不得增行或删行,也不得更改程序的结构)(15分)#include "iostream.h"int fun(char s[]){ int i,c=0;for(i=0;s[i]!='\0';i++)if(____________________) //删除下划线并填入答案c++;return c;}解:s[i]>=’A’&&s[i]<=’Z’2、打开proj1.cpp,程序的功能是统计一个字符串包含英文字母的个数,在两条星线间填入相应的内容,使得程序完成该功能。
(注意:不要改动其它代码,不得更改程序的结构)(15分)#include "iostream.h"#include "stdio.h"void main(){ char text[200]; i nt n=0;cout<<"输入一个字符串:"<<endl;gets(text);//**********两条星线间填入相应的内容*******//**********两条星线间填入相应的内容*******cout<<"英文字母的个数是:"<<n<<endl;}解:int i=0;for(i=0;text[i]!='\0';i++)if(text[i]>='A'&&text[i]<='z')n++;3、打开proj1.cpp,将数组b中的字符串复制到数组a中,在两条星线间填入相应的内容,使得程序完成该功能。
(注意:不要改动其它代码,不得更改程序的结构)(15分)#include "iostream.h"void main(){ char a[100],b[]="Y ou are a student."; int i=0;for( ; a[i]!='\0';i++)//*************两条星线之间填入相应的内容***********//*************两条星线之间填入相应的内容***********cout<<a<<endl;}解:{a[i]=b[i];if(b[i+1]=='\0')break;}a[i+1]='\0';4、打开proj1.cpp 该程序的功能是,求100以内的自然数中被14整除的最大数。
2011年数学建模集训小题目答案

ans =1.4396
2.已知 , ,画出 时, 的图形。
主程序:
syms t,syms h;
f=exp(t+h)*cos(t+h)+(t+h)^2*sin(t+h);
int(f,t,0,10)
ans =
exp(h)*sin(h)+cos(h)*h^2-2*cos(h)-2*sin(h)*h',[-10,10])
[t,x]=45('shier',[0,12],[1,0.5]);
plot(t,x(:,1),'-',t,x(:,2),'*')
[t,x]=45('shier',[0,12],[1,0.7]);
plot(t,x(:,1),'-',t,x(:,2),'*')
[t,x]=ode45('shier',[0,12],[1,0.9]);
Variable Value Reduced Cost
P1 0.000000 20.00000
D11 20.00000 0.000000
P2 0.000000 0.000000
D21 0.000000 0.000000
P3 0.000000 30.00000
D31 30.00000 0.000000
(3)目标函数:
maxz=3000*x1+2000*x2+2900*x3+21000*x4+1870*x5;
8*x1+2*x2+10*x3+12*x4+4*x5<=300;
10*x1+5*x2+8*x3+5*x4+4*x5<=400;
2011年1月MBA联考数学真题及解析

2011年1月联考数学真题(共25题)一、问题求解1.已知船在静水中的速度为28km/h,水流的速度为2km/h ,则此船在相距78km 的两地间往返一次所需时间是()。
A .5.9h B.5.6h C.5.4h D.4.4h E.4h 答案:B 解析:t =7828+2+782828−−2=5.62.若实数a ,b ,c ,满足a −3+3b +5+(5(5c c −4)2=0,则a bc =()。
A .-4 B.-53C.-43D.45E.3 答案:A 解析:a −3+3b +5+(5(5c c −4)2=0,a −3=0,3b +5=0,5c −4=0,a =3,b =−53,c =45,a bc =−43.某年级60名学生中,有30人参加合唱团,45人参加运动队,其中参加合唱团而未参加运动队的有8人,则参加运动队而未参加合唱团的有()A .15人 B.22人C.23人D.30人E.37人答案:C 解析:4.现有一个半径为R 的球体,的球体,拟用刨床将其加工成正方体,拟用刨床将其加工成正方体,拟用刨床将其加工成正方体,则能加工成的最大正方体的则能加工成的最大正方体的体积是()。
A .83R 3B.839R 3C.43R 3D.13R 3E.39R 3答案:B 解析:本题既然求最大内接正方形,可知球的直径即为正方体的对角线,由此可知:2R =3a ,a =23R然后V =a 3=(23R)3=83R 395.2007年,某市的全年研究与试验发展(R&D )经费支出300亿元,比2006年增长20%,该市的GDP 为10000亿元,比2006年增长10%,2006年,该市的R&D 经费支出占当年GDP的()。
A .1.75% B.2% C.2.5% D.2.75% E.3% 答案:D 解析:R&D ,1.2x=300,所以R&D 经费为250 GDP ,1.1y=10000,所以GDP 经费为100001.1R&R&D DGDP =250100001.1=2.75% 6.现从5名管理专业,4名经济专业和1名财会专业的学生中随机派出一个3人小组,则该小组中3个专业各有1名学生的概率为(名学生的概率为( )。
2011年数学建模竞赛A题参考答案

问题重述随着城市经济的快速发展和城市人口的不断增加,人类活动对城市环境质量的影响日显突出。
对城市土壤地质环境异常的查证,以及如何应用查证获得的海量数据资料开展城市环境质量评价,研究人类活动影响下城市地质环境的演变模式,日益成为人们关注的焦点。
按照功能划分,城区一般可分为生活区、工业区、山区、主干道路区及公园绿地区等,分别记为1类区、2类区、……、5类区,不同的区域环境受人类活动影响的程度不同。
现对某城市城区土壤地质环境进行调查。
为此,将所考察的城区划分为间距1公里左右的网格子区域,按照每平方公里1个采样点对表层土(0~10 厘米深度)进行取样、编号,并用GPS记录采样点的位置。
应用专门仪器测试分析,获得了每个样本所含的多种化学元素的浓度数据。
另一方面,按照2公里的间距在那些远离人群及工业活动的自然区取样,将其作为该城区表层土壤中元素的背景值。
附件1列出了采样点的位置、海拔高度及其所属功能区等信息,附件2列出了8种主要重金属元素在采样点处的浓度,附件3列出了8种主要重金属元素的背景值。
现要求你们通过数学建模来完成以下任务:(1) 给出8种主要重金属元素在该城区的空间分布,并分析该城区内不同区域重金属的污染程度。
(2) 通过数据分析,说明重金属污染的主要原因。
(3) 分析重金属污染物的传播特征,由此建立模型,确定污染源的位置。
(4) 分析你所建立模型的优缺点,为更好地研究城市地质环境的演变模式,还应收集什么信息?有了这些信息,如何建立模型解决问题?模型假设基于问题实际,本文作出如下假设:符号说明模型的分析、建立与求解问题分析在遵循合理性、代表性、系统性、可比性、可操作性及可获得性的原则下,我们应用因子分析的方法对重金属污染的主要原因进行分析。
因子分析方法是将具有相关性的多个原始指标的评价问题转换为较少的、新的综合指标的评价问题的一种方法。
其主要原理是利用降维的思想,通过研究指标体系的内在结构关系,把多指标转化成少数几个相互独立而且包含原有指标大部分信息的综合指标的多元统计方法。
2011数学建模试题及答案

城市学院2010—2011学年第二学期《数学建模》课程考试试题(开卷)年级:09级 专业:机械1班 学号:20940501115 姓名:李明泽1. 游泳队员分配问题某游泳队拟选用 甲,乙,丙,丁四名游泳队员组成一个4*100m 混合泳接力队,参加今年的锦标赛。
他们的100m 自由泳,蛙泳,蝶泳,仰泳的成绩如下表所示。
问 甲,乙,丙,丁 四名队员各自游什么姿势,才最有可能取得最好成绩。
请建立数学模型,并写出用Lingo 软件的求解程序。
解:引入0-1变量Xij ,若选择队员i 参加泳姿j 的比赛,记Xij=1,否则记Xij=0根据组成接力队的要求,Xij 应该满足两个约束条件:第一, 每人最多且只能入选4种泳姿之一,即对于i=1234;应有Xij=1;第二, 每种泳姿必须有一人且只能有一人入选,即对于j=1234;应有Xij=1当队员i 入选泳姿j 是,CijXij 表示他的成绩,否则CijXij=0。
于是接力赛成绩可表示为Z=∑∑==4141j i CijXij ,这就是改问题的目标函数。
综上,这个问题的0-1规划模型可写作Min Z= Z=∑∑==4141j i CijXij ;S .t .∑=41j Xjy =1,i=1,2,3,4; ∑=41i Xjy =1,i=1,2,3,4将题目给数据代入这一模型,并输入LIGDO :Min =56*x11+74*x12+61*x13+63*x14+63*x21+69*x22+65*x23+71*x24+57*x31+77*x32+63*x33+67*x34+55*x41+76*x42+62*x43+62*x44;x11+x12+x13+x14=1;x21+x22+x23+x24=1;x31+x32+x33+x34=1;x41+x42+x43+x44=1;x11+x21+x31+x41=1;x12+x22+x32+x42=1;x13+x23+x33+x43=1;x14+x24+x34+x44=1;@bin(x11);@bin(x12);@bin(x13);@bin(x14);@bin(x21);@bin(x22);@bin(x23);@bin(x24);@bin(x31);@bin(x32);@bin(x33);@bin(x34);@bin(x41);@bin(x42);@bin(x43);@bin(x44);求解可以得到最优解如下:2.钢筋切割问题设某种规格的钢筋原材料每根长10m,求解如下优化问题:1) 现需要该种钢筋长度为4m的28根,长度为1.8m的33根,问至少需要购买原材料几根?如何切割?2)如需要该种钢筋长度为4m的28根,长度为1.8m的33根, 长度为3。
2011 第二次上机练习参考答案

运筹学第二次上机练习题参考答案1、安排四个人去做四项不同的工作。
每个工人完成各项工作所消耗的时间如表所示(时间单位:分钟)。
每个工人完成各项工作所消耗的时间(2)如果把(1)中的消耗时间数据看成创造效益的数据,那么应如何指派,可使得总的效益最大?(3)如果在(1)中再增加一项工作E,甲、乙、丙、丁四人完成工作E的时间分别为17分钟、20分钟、15分钟、16分钟,那么应指派这四个人干哪四项工作,使得这四人总的消耗时间最少?(4)如果在(1)中再增加一个人戊,他完成A、B、C、D工作的时间分别为16分钟、17分钟、20分钟、21分钟,这时应指派哪四个人去干这四项工作,使得总的消耗时间最少?解:(1)为典型的指派问题winQSB中指派模型建立与求解如下:基于上述最优指派方案,总的消耗时间最少,为71分钟。
(2)为求总效益最大的指派问题, 只需把目标最小改为目标最大。
基于上述最优指派方案,总效益最大,为102。
(3) 在(1)基础上增加工作E基于上述最优指派方案(其中,工作D没有被安排给任何人执行),此时这四人总的消耗时间最少,为68分钟。
(4)为人多事少的指派问题,添加了一位工人。
基于上述最优指派方案(其中,乙没有被安排任何工作),总的消耗时间最少,为69分钟。
试回答:(1)该项工程从施工开始到全部结束的最短时间?(2)若工序L拖期10天,对整个工程进度有何影响?(3)若工序J的工序时间由12天缩短到8天,对整个工程进度有何影响?(4)为保证整个工程进度在最短周期内完成,工序I最迟必须在哪一天开工?解:(1)有上述结果克制,工程完成的最短时间为80天。
(2)基于(1)的计算结果,工序L的松弛变量取值为28天,且大于10天,因此工序L拖期10天是可以接受得,整个工程仍能够在预计期限内完成。
(3) 基于(1)的计算结果,因为J处于关键路径上,因此如其工期变短,会影响更个工程进度,并且使总工期变短。
(4) 基于(1)的计算结果,I最迟在第56天开工可以保证在最短工期内整个项目完工。
noip2011_解题报告_观光公交

【问题描述】风景迷人的小城Y 市,拥有n 个美丽的景点。
由于慕名而来的游客越来越多,Y 市特意安排了一辆观光公交车,为游客提供更便捷的交通服务。
观光公交车在第0 分钟出现在1号景点,随后依次前往2、3、4……n 号景点。
从第i 号景点开到第i+1 号景点需要Di 分钟。
任意时刻,公交车只能往前开,或在景点处等待。
设共有m 个游客,每位游客需要乘车1 次从一个景点到达另一个景点,第i 位游客在Ti 分钟来到景点Ai,希望乘车前往景点Bi(Ai<Bi)。
为了使所有乘客都能顺利到达目的地,公交车在每站都必须等待需要从该景点出发的所有乘客都上车后才能出发开往下一景点。
假设乘客上下车不需要时间。
一个乘客的旅行时间,等于他到达目的地的时刻减去他来到出发地的时刻。
因为只有一辆观光车,有时候还要停下来等其他乘客,乘客们纷纷抱怨旅行时间太长了。
于是聪明的司机ZZ 给公交车安装了k 个氮气加速器,每使用一个加速器,可以使其中一个Di 减1。
对于同一个Di 可以重复使用加速器,但是必须保证使用后Di 大于等于0。
那么ZZ 该如何安排使用加速器,才能使所有乘客的旅行时间总和最小?【输入】输入文件名为bus.in。
第1 行是3 个整数n, m, k,每两个整数之间用一个空格隔开。
分别表示景点数、乘客数和氮气加速器个数。
第2 行是n-1 个整数,每两个整数之间用一个空格隔开,第i 个数表示从第i 个景点开往第i+1 个景点所需要的时间,即Di。
第3 行至m+2 行每行3 个整数Ti, Ai, Bi,每两个整数之间用一个空格隔开。
第i+2 行表示第i 位乘客来到出发景点的时刻,出发的景点编号和到达的景点编号。
【输出】输出文件名为bus.out。
共一行,包含一个整数,表示最小的总旅行时间。
【输入输出样例】bus.in bus.out3 3 21 40 1 31 1 25 2 310【输入输出样例说明】对D2 使用2 个加速器,从2 号景点到3 号景点时间变为2 分钟。
- 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。
2011-2012学年 第 一 学期
程序设计与问题求解I ( B )卷 参考答案
适用: 计算机与工程学院 系 计算机、信息安全等 专业 2011 级学生
命题教师: 刘少兵
一、程序阅读题,(每题10分,共50分)
评卷说明:本题答案全对满分,只是输出的格式没有完全注意,比如换行空格等错误,
扣3分,输出的结果有2~3个的,可以适当分结果给分,比如第一小题,写出了One World,One
Dream其他出错的话,可以给2分。其他类同。
1、One World,One Dream
No Games
No Games
No Games
2012 welcome to London
2、fedcba
3、1,11
4、a=10, b=9
5、j=3,j=5
二、程序填空题(每个空4分,共20分)
(1) x>0
(2) x
(4) return 1
(5) return n*fac(n-1)
三、程序设计题(第1小题15分,第二小题15分,共30分)
评卷说明:
(1) 程序基本正确,每题不超过3处明显或重要的语法错误,有简单注释,给满分;
(2) 程序基本正确,有1处重要语法错误,扣2分,1处逻辑错误,扣3分;
(3) 程序逻辑基本正确,但语法问题超过5处以上,至多给一半分;
(4) 程序没有注释,扣2分;
(5) 程序错误处较多,难以表达题目要求,1题最多给7分,第2题最多给7分;
(6) 其他情况酌情协商给分。
1、 参考程序如下:(15分)
#include
void main()
{
int i,j,k,count=0;
for(i=1;i<=9;i++)
for(j=0;j<=9;j++)
if(i==j) continue;
else
for(k=0;k<=9;k++)
if(j!=k && i!=k)
{
cout<<100*i+10*j+k<
}
cout<<"count = "<
2、参考程序如下:(15分)
#include
using namespace std;
bool Ispalindrome(int n); //函数原型声明
int main()
{
// 找出并显示1000~10000间的回文数
for(int i=1000; i<10000; i++)
{
if(Ispalindrome(i))
cout<}
cout<
}
// 判断是否回文数函数
bool Ispalindrome(int n)
{
int k, m=0;
k=n;
while(k)
{
m=m*10+k%10;
k=k/10;
}
return (m==n);
}