Ошибка есть и она не одна.
1. Код приведен не полностью - после else должно быть что-то еще и обязательно замыкаться end.
2. abc - не такой функции в Паскале, возможно Вы имели в виду abs - абсолютная величина, т.е. модуль.
3. if ab then ... это тоже не верно, т.к. ab - не является логическим выражением или булевой пременной - видимо не дописал: if ab>ac then...
Считаем символы, "контрольная" - 11, пробел - 12, "работа" - 18.
В байтах: 18*2=36 байт.
В битах: 36*8=288 бит.
1/16кб=64 байта =
64/2=32 байта 1 страница
32 байта = 512 бит
512/256=2
1 символ =2 бита
2^2=4 символа мощность алфавита