Ряд Тейлора.Делфи

[Металлистка]

Помогите пожалуйста переделать программу с Турбо Паскаля в программу в Делфи,или написать заново.
Задание вложено как картинка.
Код в Паскале
uses crt;
var
Xbeg,Xfin,DX,S,X,e:real;
N:WORD;
Nx,i:integer;
Procedure sums (Xs, E:real; var S:real; var Ns:WORD);
var
a:real;
Begin
a:=1;
S:=1;
Ns:=0;
Repeat
Inc(Ns);
a:=-a*Xs/Ns;
S:=S+a;
Until Abs(a)<e;
End;
Begin
clrscr;
write('Xbeg= ');
readln(Xbeg);
write('Xfin= ');
readln(Xfin);
repeat
write('DX= ');
readln(DX);
until(Dx>0) and (Dx<abs(Xfin));
write('E=');
readln(E);
writeln('|----------------------------------------|');
writeln('| Results of calculation |');
writeln('|----------------------------------------|');
writeln('| X | SUM | Exp(-x) | n |');
writeln('|----------------------------------------|');
Nx:=ROUND ((Xfin-Xbeg)/DX);
X:=Xbeg;
For i:=0 to Nx do
begin
X:=Xbeg+DX*i;
SUMS(X,E,S,N);
Writeln('|' ,X:6:2, ' | ' ,S:10:6, '| ',Exp(-x):7:5, ' | ',N:4,'|');
end;
writeln('|----------------------------------------|');
readln;
end.

Как должно выглядеть в Делфи вложено как картинки,там нужно чтобы вводился только один X и не нужно выводить таблицу,тогда по моему и шаг(DX) не нужен.
Программу в Паскале писала не сама,плохо задание поняла(

[Александр Павлович]

1. Создать в Delphi консольное приложение, копировать в его текст программы.

2. Убрать строку
uses crt;

[Металлистка]

Нужно ведь что бы вместо х начального и х конечно только был 1 х и не нужна таблица,т.е. нужно что бы только по одному х прогоняла программа.