Program FibinacciString;
const
InputFile = 'FIBISTR.INP';
OutputFile = 'FIBISTR.OUT';
max = 35;
var
S: array[1..13] of String;
F: array[1..40] of LongInt;
OddCenter, EvenCenter: String;
OddCount, EvenCount, OddP, EvenP:
Integer;
n, l: Integer;
Source: String;
tmp: Char;
fi, fo,f0...