Если у пользователей слишком быстрые компьютеры, то можно "оптимизировать" код так например :)

Ну или может кому то нужно заложить возможность оптимизации скорости работы программ в будущем  - можно оставить себе такую возможность.. ))

* рекурсивное сложение двух чисел (Visual FoxPro) 

PUBLIC rt1

xSUM(13, 13)

RETURN 

FUNCTION xSUM

 LPARAMETERS A, B

 IF A = 0

  RETURN B

 ENDIF 

 IF B = 0 

  RETURN A

 ENDIF 

 RETURN (1 + (xSUM(A, B - 1) + xSUM(A - 1, B)) / 2)

ENDFUNC