Lazarus: цикл з параметром