А> Ins:=Double (Series); {Строка 21}
Нельзя привести тип к переменной.
А> Outs:=Double (Days);
и здесь тоже.

Хотя если напишете так
Outs:=Double (_days^); — тоже не то — там же массив.
А> exports Highdays name 'Пример библиотеки' ;
а что это???

В целом, нужно собраться и аккуратно перевести код, подумав предварительно, что он делает