Так как число может быть большим, то для его описания применим тип longint.
При помощи процедуры Str превращаем число n в строку S, выделяем первую букву этой строки (S[1]), а затем при помощи процедуры Val переводим обратно строку в цифру:
6423
13C
Переводим в двоичные коды и разделяем на триады и тетрады