[NIch]

Любой функции нужен результат...
Випиши в конце алгоритма твоей функции
Result := ...
Вместо точек ту переменную которая принимает результат...в твоем случае по моему summ, т.е.
Result := summ;