'10' - это не символ, а строка, поэтому и ругается.
А еще будет ругаться на gr1:=gr+1; - тут gr не описано.
Да и вывода результатов нет.
In= I * X * Y, где
In - информационный объём памяти
I - глубина цвета
X*Y - кол-во точек изображения
In = 4*8*600*1200 = 23 040 000 бит = 2 880 000 байт = 2 812,5 Кбайт = 2,75 Мбайт
В алфавите 124 буквы.
124 не является квадратом двойки, нужно найти ближайшее число, большее чем 124 но являющееся квадратом двойки. (Если число будет меньше, то для записи некоторых букв алфавита просто не хватит символов.)
бит.
Ответ: одна буква несёт в себе информацию, равную 7ю битам.
Вот программа на языках:
1) Python 3.6.3
2) PascalABC
3) C#
В каждом случае я описал алгоритм как можно подробней