Кто может перевести программу с Бейсика на C++Builder?

Программа на Бейсике. Метод Хорд.

DIM P(9)
PRINT "A,B,E"; \ INPUT A,B,E
PRINT "СКОЛЬКО ПАРАМЕТРОВ"; \ INPUT N
FOR K=1 TO N \ PRINT "P"K; \ INPUT P(K) \ NEXT K
GOBUS 100
PRINT "X="X
GO TO 20
X=A\ X1=A \ GOBUS 200
S=SGN(F) \ F1=F \ X=B\ GOBUS 200
F2=F
IF ABS(X-X1)