Как заставить FPC 2.4 использовать ASCII кодировки(Аля BP7.1) заместо UTF-8??

Writeln('вставлен текст в 8битной кодировке'); 
Write('вставлен текст в 8битной кодировке');

Writeln и Write выводят текст в 8 битном виде, а уже консоль отображает его в ASCII, UTF8, UTF16 или в любой другой кодировке в зависимости от собственных настроек.

Ну а предположим мне надо вывести символ ASCII кода , например write(#181); и ничего не выводится.
Основная кодировка терминала UTF-8.
В locales.gen IBM866 отсутствует.

Так ты выводишь один символ, а #181 рисуется тремя а русские буквы двумя

var S:  string;

begin
S[1]:=Chr($E2);
S[2]:=Chr($95);
S[3]:=Chr($A1);
S[0]:=Chr(3);
Writeln(S);
end.

Запускаешь утилиту charmap и ищешь символы псевдографики

Хех это конечно хороший вариант, но в универе стоит BBP70 и там такую псевдографику не примет.

BBP70 это борланд паскаль 7?
Символы выглядят практически одинаково, нужно лишь поискать. Чтобы программа адаптировалась к другому компилятору за минуту, вводи проблемные данные в строковую переменную всегда через определённую функцию. Подставил другую функцию и псевдографика выводится не в UTF-8 а в IBM866.

Символы выглядят идентично.
но дома мне придется писать UTF а там приходить и править для IBM866