程序问题

wudi

此段程序是在应用遗传算法时编写的，写在setParameter中，但是调试时出现问题

" P( [4 B( u2 i8 G* w; E. V9 k1 Q
$ n% `' R. V( F4 H附件中有文件，是”生产系统仿真“中第三章3.1到3.5节内容，希望大家可以看看，帮我把遗传算法仿真调通，新手，实在是不好意思哈，非常感谢

婺源指并

先要声明外部变量（i:integer）
1 {+ R- q7 h) L  U8 C
但是关于这个问题还有一个问题，如下图，望高手指教
8 w5 `3 @3 U, E) f6 R* n6 C