[pascal]Массив Чисел Фибоначчи

[decantnik]

Добрый вечер.
Итак, нам дано число (N), это число обозначает кол. элементов Фибоначчи. Задание, найти в ряду чисел Фибоначчи цифру под номером N.
Например:
Ввод: N=5
Вывод:
11235 Цифра под номером N = 5
Ввод: N=8
Вывод:
1123581321 Цифра под номером N = 3

В целом я задач массив чисел:

var a:array [1..100] of integer; i,n:integer;    s:string;
begin
writeln ('введите кол элементов Фибоначи');
read (n);
a[1]:=1; a[2]:=1;
for i:=3 to n do
a[i]:=a[i-1]+a[i-2];

Как видно, нам будет выводить только сами элементы.
Вопрос состоит в следующем, как все значения элементов, можно соединить в одну переменную.
Т.е. Нам программа выводит в цикле сами значения элементов:
11235 и т.д., а я интересуюсь, как все эти значения соединить в одну переменную, например k:=11235;
Думаю объяснил

[decantnik]

Это нужно для того что бы потом функцией mod найти крайнюю цифру

[ОДИНОЧЕСТВО В СЕТИ]

а не проще найти последнее число и уж от него

функцией mod найти крайнюю цифру

[decantnik]

Там нам нужна цифра под номером N, я не совсем понимаю как ты от последнего числа, сможешь найти цифру.
Допустим, даны 15 элементов чисел фибоначи, они имеют такой вид:
1123581321345589144233377610
Т.е. Число под номером 15, это 610, а цифра под номером 15, это 8

[Anatole]

Ищеш числа фибоначи. переводиш их в строку, затем к какой либо результирующеу строке добавляеш полученные строки. Элемент в результирующей строке с номером N даст искомую цифру

[decantnik]

переводиш их в строку

Как? IntToStr ?
Благодарю.

Но все таки, на будующее, как все элементы объединить в одну переменную?