типы данных extended

[guffer]

как преобразовать integer в extended???
для решения задачи:

procedure TForm1.Button1Click(Sender: TObject);
var
a,b,n:integer;
s:TStrings;
begin
s:=memo1.Lines;
n:=s;
a:=n/2;
b:=n/2;

[spamer]

А почему бы не сделать переменные a и b типа Extended, раз уже так хочется использовать этот тип.

a,b : Extended;

[Ntlegend]

ну у тебя вообще бред в коде.. попробуй так

var
a,b : Extended;
s:TStrings;
begin
s:=memo1.Lines;
a:=s.Count/2;
b:=s.Count/2;