найти k-цифру фибоначчи

[pizhon1]

допустим я создаю файл записываю туда последовательность фиббоначи потом с помощью spinedit ввожу какую цифру мне нужно найти а как дальше написать в проге чтобы он мне эту цифру в edit закинул?

[Alex Cones]

записываю туда последовательность фиббоначи

А какой размер файла? 100500 Тб?
Либо ищи число просто считая, либо используем Copy, Delete,Pos для поиска числа в файле.

[pizhon1]

нужно не число а цифру

[Hollander]

Если ты каждое число пишешь с новой строке, а в проге выбираешь порядковый номер этого числа, то просто читай строки. Как читать, уже много раз разбиралось.

[pizhon1]

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

[Alex Cones]

Цифру?
Цифры это:
0,1,2,3,4,5,6,7,8,9
Числа это:
12425,2346,25,7,2345,246
Так тебе все еще нужна цифра?

[pizhon1]

допустим идёт последовательность 1123581321
запрашиваю 8 цифру выводит 3

[Alex Cones]

допустим идёт последовательность 1123581321

Ну дык это не последовательность, это строка цифр. Сразу бы и сказал, что без пробелов пишешь.
Вот последовательность Фибонначи:
1 1 2 3 5 8 13 21

В твоем случае решение простейшее:
Edit1.Text:=Stroka[I];

var
F:TextFile;
I:Integer;
S:String;
Begin
 AssignFile(F,'File.txt');
 Reset(F);
 I:=StrToInt(SpinEdit.Text);
 ReadLn(F,S);
 Edit1.Text:=S[I];
 CloseFile(F);
End;

[pizhon1]

спасибо большое