[volod3000]

Сообщение от Pilot_Red

познакомься с таким понятием, как рекурсия и будет тебе счастье(да и style программирования улучшишь, без всяких там goto))))

Все правильно, но в случае рекурсии Result := 0;