php to delphi

← →
xXx (2008-08-19 17:51) [0]

ктонибудь может перевести пару небольших функций с php на delphi? оч надо
напиши на mops@ya.ru или в аську 672769

← →
Dennis I. Komarov © (2008-08-19 17:52) [1]

Порнография прям какая...
Закройте ветку...

← →
xXx (2008-08-19 17:54) [2]

почему?

← →
Vlad Oshin © (2008-08-19 17:56) [3]

потому что для разных целей языки, если конечно функции не тривиальные

← →
McSimm © (2008-08-19 17:57) [4]

пару небольших функций можно было бы и здесь привести.

← →
xXx (2008-08-19 17:57) [5]

ну да, там ничего особенного, обычные математические вычисления, просто синтаксиса php вообще не знаю

← →
McSimm © (2008-08-19 17:58) [6]

Может потянуть на подключение недостающих в Делфи библиотек.

← →
xXx (2008-08-19 18:00) [7]

ну например такая
function get_face_value($pr, $cy, $links_count=10) { $pr = (int) $pr; $cy = (int) $cy; # calc result if ($cy<2300) $cy_part = 10*log(0.0019*$cy+1); if ($cy>=2300) $cy_part = 0.0096*$cy - 8; $st = 0.5755; if ($pr<9) $st = 0.5755; if ($pr==9) $st = 0.8550; if ($pr>9) $st = 0.8508; $v = (pow(2.718, $st*$pr) - 1) + $cy_part; # get coef by links count $k = (int) $links_count; if ($k<4) $k = 2; else $k = 1 / log10($k); # round result return round05($k*0.9*$v); } function factorial($n) { $res = 0; $n = abs(ceil($n)); if ($n>0) { $res = 1; $a = 1; while ($a<=$n) { $res = $res * $a; $a++; } } return $res; }

← →
Dennis I. Komarov © (2008-08-19 18:03) [8]

А не проще писать исходя из требований к функции?

$100 :)
icq 169406011

← →
xXx (2008-08-20 09:35) [10]

[9] - действительно смешно, мне уже помогли, бесплатно

> xXx (20.08.08 09:35) [10]

Смешно - смейся.
Бабло - лучший мотиватор! :)

php to delphi Найти похожие ветки