Всем привет!
Вот моя функция:
Код:
1 2 3 4 5 6 7 8 9 10 11 12 13 | function Through( k, m : integer ; N_f : word ) : longword ;
begin
if (k <= N_f) and (m <= N_f) then
if (m > k) then Result := SQR(m+ 1 )-k
else Result := SQR(k)+ 1 +m
else
if (k > N_f) and (m <= N_f) then
Result := SQR(N_f+ 1 ) + 2 *(k-N_f- 1 )*N_f + k - N_f + m
else if (k <= N_f) and (m > N_f) then
Result := sqr(N_f+ 1 ) + 2 *(m-N_f)*N_f + m - N_f - k
else showmessage( ' DISKRETNYE KOORDINATY - VNE OBLASTI ! ' )
end ;
|
При запуске выдаёт такую ошибку:
Return value of function 'Through' might be undefined
Подскажите пожалуйста, в чём может быть проблема?